1 files changed, 2 insertions, 2 deletions
diff --git a/test/fivesix.adb b/test/fivesix.adb
index 3eabf6a..a17cbb1 100644
--- a/test/fivesix.adb
+++ b/test/fivesix.adb
@@ -39,9 +39,9 @@ begin
     Sixes.Unify (Sixes.Fresh, 6);
     Sixes.Recurse;
 
-    Result := Disjunct (Fives, Sixes).Take (5);
+    Result := Disjunct (Fives, Sixes);
 
-    TIO.Put_Line (Image (Result));
+    TIO.Put_Line (Image (Result.Take (5)));
 
 end FiveSix;