Restructure Makefile to add automated tests.

[jonesforth.git] / test_number.f

diff --git a/test_number.f b/test_number.f
new file mode 100644 (file)
index 0000000..846347f
--- /dev/null
+++ b/test_number.f
@@ -0,0 +1,11 @@
+( -*- text -*- )
+
+: TEST
+       123                                . CR
+       [ HEX -7F ] LITERAL      DECIMAL   . CR
+       [ HEX 7FF77FF7 ] LITERAL HEX       . CR
+       [ HEX -7FF77FF7 ] LITERAL 2 BASE ! . CR
+       [ 2 BASE ! 1111111111101110111111111110111 ] LITERAL HEX . CR
+;
+
+DECIMAL ( restore immediate-mode base )