aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/tests/quotations-test.frt
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/tests/quotations-test.frt')
-rw-r--r--amforth-6.5/tests/quotations-test.frt19
1 files changed, 0 insertions, 19 deletions
diff --git a/amforth-6.5/tests/quotations-test.frt b/amforth-6.5/tests/quotations-test.frt
deleted file mode 100644
index 26057a8..0000000
--- a/amforth-6.5/tests/quotations-test.frt
+++ /dev/null
@@ -1,19 +0,0 @@
-\ anonymous definitions in a definition
-
-: if-else ( ... f xt1 xt2 -- ... )
-\ Postscript-style if-else
- rot if
- drop
- else
- nip
- then
- execute ;
-
-: test ( f -- )
- [: ." true" ;]
- [: ." false" ;]
- if-else ;
-
-\ 1 test cr \ writes "true"
-\ 0 test cr \ writes "false"
-