script1.stx
author Claus Gittinger <cg@exept.de>
Wed, 11 Jun 2014 12:28:23 +0200
changeset 1349 cc4ef8ce80c7
child 1392 359fc4f22cd6
permissions -rwxr-xr-x
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1349
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
#!stx --script
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
"/
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
"/ just prints some numbers
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
"/
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
1 to:10 do:[:i |
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
   ('the factorial of %1 is %2'
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
	bindWith:i with:i factorial) printCR
cc4ef8ce80c7 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
].