]> gitweb.factorcode.org Git - factor.git/blob - basis/tools/deploy/test/12/12.factor
3ee0643c38f3966eda297d0694b46a8d5b06888a
[factor.git] / basis / tools / deploy / test / 12 / 12.factor
1 ! Copyright (C) 2009 Slava Pestov.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: call math.parser io math ;
4 IN: tools.deploy.test.12
5
6 : execute-test ( a b w -- c ) execute( a b -- c ) ;
7
8 : foo ( -- ) 1 2 \ + execute-test number>string print ;
9
10 MAIN: foo