24-game: remove broken "spin" definition.
parent
837b22336e
commit
8e0df4df9c
|
@ -8,7 +8,6 @@ arrays words quotations accessors math.parser backtrack assocs ;
|
||||||
IN: 24-game
|
IN: 24-game
|
||||||
SYMBOL: commands
|
SYMBOL: commands
|
||||||
: nop ( -- ) ;
|
: nop ( -- ) ;
|
||||||
: spin ( a b c -- c b a ) swapd swap swap ;
|
|
||||||
: do-something ( a b -- c ) { + - * } amb-execute ;
|
: do-something ( a b -- c ) { + - * } amb-execute ;
|
||||||
: maybe-swap ( a b -- a b ) { nop swap } amb-execute ;
|
: maybe-swap ( a b -- a b ) { nop swap } amb-execute ;
|
||||||
: some-rots ( a b c -- a b c )
|
: some-rots ( a b c -- a b c )
|
||||||
|
|
Loading…
Reference in New Issue