-! (c)2009 Slava Pestov, Eduardo Cavazos, Joe Groff bsd license
+! Copyright (C) 2009 Slava Pestov, Eduardo Cavazos, Joe Groff.
+! See http://factorcode.org/license.txt for BSD license.
USING: fry tools.test math prettyprint kernel io arrays
sequences eval accessors ;
IN: fry.tests
-! (c)2009 Slava Pestov, Eduardo Cavazos, Joe Groff bsd license
+! Copyright (C) 2009 Slava Pestov, Eduardo Cavazos, Joe Groff.
+! See http://factorcode.org/license.txt for BSD license.
USING: accessors combinators kernel locals.backend math parser
quotations sequences sets splitting words ;
IN: fry
] if-empty ;
: prune-curries ( seq -- seq' )
- dup [ empty? not ] find
+ dup [ empty? not ] find
[ [ 1 + tail ] dip but-last prefix ]
[ 2drop { } ] if* ;
}
usage() {
- $ECHO "usage: $0 install|install-x11|install-macosx|self-update|quick-update|update|bootstrap|dlls|net-bootstrap|make-target|report [optional-target]"
+ $ECHO "usage: $0 install|install-x11|install-macosx|self-update|quick-update|update|bootstrap|net-bootstrap|make-target|report [optional-target]"
$ECHO "If you are behind a firewall, invoke as:"
$ECHO "env GIT_PROTOCOL=http $0 <command>"
$ECHO ""