factor: fix a few issues with new patch.
							parent
							
								
									9f213f96f6
								
							
						
					
					
						commit
						88e58f9da8
					
				|  | @ -14,6 +14,4 @@ MACRO: shuffle-effect ( effect -- quot ) | |||
| 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 | ||||
|  |  | |||
|  | @ -1,7 +1,7 @@ | |||
| ! 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 ( -- ) ; | ||||
|  |  | |||
|  | @ -90,7 +90,7 @@ ERROR: pcre-error value ; | |||
|     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 ; | ||||
| 
 | ||||
|  |  | |||
		Loading…
	
		Reference in New Issue