Initial commit
This commit is contained in:
9
tests/cheese.ppl
Normal file
9
tests/cheese.ppl
Normal file
@@ -0,0 +1,9 @@
|
||||
(let in "no")
|
||||
(while (!= in "yes")
|
||||
(print "Do you like cheese?")
|
||||
(set in (input))
|
||||
(if (!= in "yes")
|
||||
(print "That is sad")
|
||||
)
|
||||
)
|
||||
(print "Awesome! I do too!")
|
||||
11
tests/num.ppl
Normal file
11
tests/num.ppl
Normal file
@@ -0,0 +1,11 @@
|
||||
(let x 0)
|
||||
(if (== x 0)
|
||||
(print "x is zero")
|
||||
(set x 1)
|
||||
(print "now it is" x)
|
||||
)
|
||||
|
||||
(while (!= x 5)
|
||||
(print "x is currently" x "which is not 5. i must make it 5")
|
||||
(set x (+ x 1))
|
||||
)
|
||||
5
tests/to10000.ppl
Normal file
5
tests/to10000.ppl
Normal file
@@ -0,0 +1,5 @@
|
||||
(let x 0)
|
||||
(while (!= x 10000)
|
||||
(set x (+ 1 x))
|
||||
(print x)
|
||||
)
|
||||
Reference in New Issue
Block a user