Merge branch 'master' of git://factorcode.org/git/factor

db4
slava 2008-06-27 21:34:43 -05:00
commit 9140679e9f
3 changed files with 11 additions and 2 deletions

View File

@ -22,7 +22,7 @@ VAR: command-table
: exec-command* ( string -- ) : exec-command* ( string -- )
[ parameter ] [ command ] bi [ parameter ] [ command ] bi
command-table> at dup command-table> at dup
[ 1 tail* call ] [ 3drop ] if ; [ 1 tail* call ] [ 2drop ] if ;
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

View File

@ -0,0 +1,9 @@
IN: ori.tests
USING: ori tools.test ;
\ pitch-up must-infer
\ pitch-down must-infer
\ turn-left must-infer
\ turn-right must-infer
\ roll-left must-infer
\ roll-right must-infer

View File

@ -17,7 +17,7 @@ C: <ori> ori
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
: make-matrix ( quot width -- matrix ) >r { } make r> group ; : make-matrix ( quot width -- matrix ) >r { } make r> group ; inline
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!