git.oblomov.eu Git - ohcount/blob - test/src_dir/factor1.factor

   1 ! This is a comment
   2 ! Factor syntax is very simple, it just contains words separated by spaces
   3 ! '!' is a line comment word
   4 ! "whatever" is a string word
   5 USING: kernel io ; ! This is a vocabulary inclusion word
   6 IN: testing
   7
   8 : test-string ( -- )
   9   "this is a string" print ;
  10
  11 : test ( x -- y ) ! Parenthesis define a stack effect declaration
  12   dup swap drop ;
  13
  14 MAIN: test