]> Repositorios git - scryer-prolog.git/commitdiff
rely on recently improved argument indexing for determinism
authorMarkus Triska <[email protected]>
Thu, 25 Jan 2024 20:31:08 +0000 (21:31 +0100)
committerMarkus Triska <[email protected]>
Thu, 25 Jan 2024 20:31:08 +0000 (21:31 +0100)
This is possible as of 4fd37335f576240c25dfbfe6e70441aff166c60e.

src/lib/format.pl

index 9280156fe59bb7f2f01794a51aaa45a6c071d5be..b89f892a4b00d46fac5bf15baaa5326b89819e58 100644 (file)
@@ -1,5 +1,5 @@
 /* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-   Written 2020-2023 by Markus Triska ([email protected])
+   Written 2020-2024 by Markus Triska ([email protected])
    Part of Scryer Prolog.
    I place this code in the public domain. Use it in any way you want.
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
@@ -302,8 +302,8 @@ format_number_chars(N0, Chars) :-
         N is N0, % evaluate compound expression
         number_chars(N, Chars).
 
-n_newlines(0) --> !.
 n_newlines(N0) --> { N0 > 0, N is N0 - 1 }, [newline], n_newlines(N).
+n_newlines(0)  --> [].
 
 /* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 ?- phrase(upto_what(Cs, ~), "abc~test", Rest).