--- gforth/gforth.el 1996/01/25 16:45:51 1.18 +++ gforth/gforth.el 1996/05/06 12:38:59 1.19 @@ -36,7 +36,7 @@ (defvar forth-positives - " : :noname code ;code does> begin do ?do +do -do u+do u-do while if ?dup-if ?dup-0=-if else case struct [if] [else] " + " : :noname code interpretation: ;code does> begin do ?do +do -do u+do u-do while if ?dup-if ?dup-0=-if else case struct [if] [else] " "Contains all words which will cause the indent-level to be incremented on the next line. OBS! All words in forth-positives must be surrounded by spaces.") @@ -48,7 +48,7 @@ on the current line. OBS! All words in forth-negatives must be surrounded by spaces.") (defvar forth-zeroes - " : :noname code " + " : :noname code interpretation: " "Contains all words which causes the indent to go to zero") (defvar forth-prefixes