add s:const to stdlib

FossilOrigin-Name: 87ce2066d166476f2739747e97d4daa070b674173433fbf912cc6fba94afcbdd

Words.txt

@@ -349,6 +349,7 @@ s:
   s:append
   s:case
   s:chop
+  s:const
   s:contains-char?
   s:contains-string?
   s:copy

doc/Glossary.txt

@@ -2389,6 +2389,18 @@ Example:
 
 -+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
 
+s:const
+
+  ss-
+
+Create a string constant.
+
+Example:
+
+  'Test_String 'HELLO s:const
+
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
+
 s:evaluate
 
   s-?

literate/RetroForth.md

@@ -938,6 +938,10 @@ The format language is simple:
 }}
 ~~~
 
+~~~
+:s:const (ss-)  [ s:keep ] dip const ;
+~~~
+
 ## Sets
 
 Sets are statically sized arrays. They are represented in memory as:

literate/Rx.md

@@ -1,7 +1,7 @@
     ____  _   _
     || \\ \\ //
     ||_//  )x(
-    || \\ // \\ 2017.10
+    || \\ // \\ 2017.11
     a minimalist forth for nga
 
 *Rx* (*retro experimental*) is a minimal Forth implementation for the
@@ -55,7 +55,7 @@ r 9999
 d 1536
 
 : Version
-d 201710
+d 201711
 ~~~
 
 Both of these are pointers. `Dictionary` points to the most recent