From dc1ef25f1a7f8e36e93928e5b0288e203833e14a Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Fri, 18 Feb 2022 09:39:53 +0200 Subject: Clean up --- samples/eval.slam | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 samples/eval.slam (limited to 'samples/eval.slam') diff --git a/samples/eval.slam b/samples/eval.slam new file mode 100644 index 0000000..927621b --- /dev/null +++ b/samples/eval.slam @@ -0,0 +1,14 @@ +define update + $update_var ! + $update_phrase ! + $update_var @ @ $update_phrase @ unphrase + $update_var @ ! + $update_var forget $update_phrase forget + ; + +10 $num ! +[ 1 + ] $num update +$num ? + +[ 5 / ] $num update +$num ? \ No newline at end of file -- cgit v1.3