SYNTAX: shuffle(
")" parse-effect suffix! \ shuffle-effect suffix! ;
-: spin ( x y z -- z y x ) swap rot ; inline deprecated
-
: 2swap ( x y z t -- z t x y ) 2 2 mnswap ; inline
! Copyright © 2008 Reginald Keith Ford II
! 24, the Factor game!
USING: accessors backtrack combinators continuations formatting fry io
-kernel math prettyprint quotations random sequences shuffle ;
+kernel math prettyprint quotations random sequences ;
IN: 24-game
: nop ( -- ) ;
0 { c-string } [ pcre_study ] with-out-parameters drop ;
: exec ( pcre extra subject ofs opts -- count match-data )
- [ dup length ] 2dip 30 int <c-array> 30 [ pcre_exec ] keepd;
+ [ dup length ] 2dip 30 int <c-array> 30 [ pcre_exec ] keepd ;
TUPLE: matcher pcre extra subject ofs exec-opts ;