comparison src/ploki/examples/arg.pk @ 4223:ac0403686959

<oerjan> rm -rf src/ploki; mv ploki src
author HackBot
date Fri, 20 Dec 2013 22:18:50 +0000
parents
children
comparison
equal deleted inserted replaced
4222:b0f3e267bb1e 4223:ac0403686959
1 #!../ploki
2 LET i @NEG 1
3 FOR arg LET i i+1
4 IF i < \ARG
5 WUNT ("arg "_ i _ " = " _ \ARG:i _ "\n")
6 NEXT arg
7 FI