X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=stdlib%2Fprelude.gl;fp=stdlib%2Fprelude.gl;h=32adf5c827346e5f330a5d9eba55f0f10724009f;hb=5e13f1e2a3dc1237fcf2fa141d8379bdd36bde61;hp=836b5c419b059a96949ab01102ab55755d5baf50;hpb=8a0ede3292b4968b1e3261ad97b96d5ea0ad16fd;p=goals.git diff --git a/stdlib/prelude.gl b/stdlib/prelude.gl index 836b5c4..32adf5c 100644 --- a/stdlib/prelude.gl +++ b/stdlib/prelude.gl @@ -18,10 +18,10 @@ # This file is included first and automatically in all Goalfiles # (unless you use --no-prelude). It contains standard functions and -# tactics. +# predicates. -# The only tactic that ‘make’ has. -tactic *file (filename) = @{ +# The only predicate that ‘make’ has. +predicate is-file (filename) = @{ # Rebuild if the target file doesn't exist at all. test -f %filename || exit 99 @@ -31,9 +31,9 @@ tactic *file (filename) = @{ done } -# This is a simpler tactic than the above since it will +# This is a simpler predicate than the above since it will # rebuild if the file is missing, but not if it is older. -tactic *exists (filename) = @{ +predicate is-file-exists (filename) = @{ test -f %filename || exit 99 } @@ -45,7 +45,7 @@ function error (msg) = @{ exit 1 } -# Wrap list of strings in a call or tactic. +# Wrap list of strings in a call or predicate. pure function wrap (wrapper, xs) = @{ echo '[' for x in %xs; do