--- gforth/gforth.el	1997/04/11 17:42:23	1.22
+++ gforth/gforth.el	1998/04/12 21:49:13	1.25
@@ -36,7 +36,7 @@
 
 
 (defvar forth-positives
-  " : :noname code interpretation: ;code does> begin do ?do +do -do u+do u-do while if ?dup-if ?dup-0=-if else case of struct [if] [else] with public: private: class "
+  " : :noname code interpretation: ;code does> begin do ?do +do -do u+do u-do while if ?dup-if ?dup-0=-if else case of struct [if] [ifdef] [ifundef] [else] with public: private: class "
   "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.")
@@ -54,7 +54,7 @@ OBS! All words in forth-negatives must b
 (setq forth-zero 0)
 
 (defvar forth-zup
-  " how: "
+  " how: implements "
   "Contains all words which causes zero indent level to change")
 
 (defvar forth-zdown
@@ -76,10 +76,6 @@ OBS! All words in forth-negatives must b
 (if (not forth-mode-map)
     (setq forth-mode-map (make-sparse-keymap)))
 
-(global-set-key "\e\C-m" 'forth-send-paragraph)
-(global-set-key "\C-x\C-m" 'forth-split)
-(global-set-key "\e " 'forth-reload)
-
 ;(define-key forth-mode-map "\M-\C-x" 'compile)
 (define-key forth-mode-map "\C-x\\" 'comment-region)
 (define-key forth-mode-map "\C-x~" 'forth-remove-tracers)
@@ -160,7 +156,7 @@ OBS! All words in forth-negatives must b
   "
 Major mode for editing Forth code. Tab indents for Forth code. Comments
 are delimited with \\ and newline. Paragraphs are separated by blank lines
-only. Delete converts tabs to spaces as it moves back.
+only.
 \\{forth-mode-map}
  Forth-split
     Positions the current buffer on top and a forth-interaction window