Added readme.

diff --git a/README.md b/README.md
new file mode 100644 (file)
index 0000000..6a74052
--- /dev/null
+++ b/README.md
@@ -0,0 +1,7 @@
+scheme.forth.jl
+---------------
+
+A hobby scheme implementation for FORTH 83. Specifically it is targeted at my
+own [forth.jl](http://github.com/tgvaughan/forth.jl) which is an implementation
+of FORTH on top of [Julia](http://www.julialang.org), hence the name.  However
+it does not rely on anything but standard FORTH 83 words.

diff --git a/scheme.4th b/scheme.4th
index 63a3420..269eb52 100644 (file)
--- a/scheme.4th
+++ b/scheme.4th
@@ -9,6 +9,7 @@ include defer-is.4th
 2 constant character-type
 3 constant nil-type
 4 constant pair-type
 2 constant character-type
 3 constant nil-type
 4 constant pair-type

+5 constant symbol-type

 : istype? ( obj -- obj b )
     over = ;
 
 : istype? ( obj -- obj b )
     over = ;