Make package work without 'interface.g'

peal · Aug 26, 2024 · 13e4ee3 · 13e4ee3
1 parent 22e177b
commit 13e4ee3
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 4 deletions.
diff --git a/gap/BacktrackKit.gd b/gap/BacktrackKit.gd
@@ -1,4 +1,5 @@
 
+#! @Chapter Executing a search
 
 #! @Section Extra information and stats
 

diff --git a/gap/constraint.gi b/gap/constraint.gi
@@ -27,9 +27,9 @@ function(con)
 
     # TODO: Add an Info statement saying that a search is about to happen and might be slow.
 
-    return BTKit_SimpleSinglePermSearch(
+    return _BTKit.SimpleSinglePermSearch(
         PartitionStack(LargestRelevantPoint(con)),
-        [BTKit_RefinerFromConstraint(con)]);
+        [BTKit_RefinerFromConstraint(con)],[])[1];
 end);
 
 InstallImmediateMethod(Representative, "for a group constraint",
@@ -264,7 +264,7 @@ Constraint.Conjugate := function(G, H)
 
     con := Constraint.Transport(G, H, OnPoints);
     con!.Name := StringFormatted("<constraint: conjugate {} {} to {}>", type, G, H);
-    
+
     if IsPerm(G) and (CycleIndex(G) <> CycleIndex(H)) then
         SetIsEmptyConstraint(con, true);
     fi;
@@ -394,7 +394,7 @@ ProcessConstraints := function(args...)
         if IsGroupConstraint(con) and HasUnderlyingGroup(con) and IsNaturalAlternatingGroup(UnderlyingGroup(con)) then
             Add(constraints, Constraint.IsEven);
             constraints[i] := Constraint.MovedPoints(MovedPoints(UnderlyingGroup(con)));
-        
+
         # In coset of Sym(x) -> combination
         elif IsInCosetByGensConstraint(con) and not IsGroupConstraint(con) and IsNaturalSymmetricGroup(UnderlyingGroup(con)) then
             G := UnderlyingGroup(con);