Changeset 1641

Timestamp:

10/25/04 14:00:39 (4 years ago)

Author:

pmoura

Message:

Corrected silly bug in the definition of the predicate repeat/1.

Files:

• trunk/examples/benchmarks/benchmark.pl (modified) (1 diff)

trunk/examples/benchmarks/benchmark.pl

@@ -31 +31 @@
 % the definition that follows
 
-repeat(0) :-
-    !.
+repeat(_).
 
 repeat(N) :-
+    N > 1,
     N2 is N - 1,
     repeat(N2).