[gforth] / gforth / gforth.el  

gforth: gforth/gforth.el

Diff for /gforth/gforth.el between version 1.55 and 1.56

version 1.55, Sat Dec 15 22:44:52 2001 UTC version 1.56, Sat Jan 5 17:42:29 2002 UTC
Line 164 
Line 164 
   
         (("true" "false" "c/l" "bl" "cell" "pi" "w/o" "r/o" "r/w")          (("true" "false" "c/l" "bl" "cell" "pi" "w/o" "r/o" "r/w")
          non-immediate (font-lock-constant-face . 2))           non-immediate (font-lock-constant-face . 2))
         (("~~" "break:") compile-only (font-lock-warning-face . 2))          (("~~" "break:" "dbg") compile-only (font-lock-warning-face . 2))
         (("break\"") compile-only (font-lock-warning-face . 1)          (("break\"") compile-only (font-lock-warning-face . 1)
          "[\"\n]" nil string (font-lock-string-face . 1))           "[\"\n]" nil string (font-lock-string-face . 1))
         (("postpone" "[is]" "defers" "[']" "[compile]")          (("postpone" "[is]" "defers" "[']" "[compile]")
Line 172 
Line 172 
          "[ \t\n]" t name (font-lock-function-name-face . 3))           "[ \t\n]" t name (font-lock-function-name-face . 3))
         (("is" "what's") immediate (font-lock-keyword-face . 2)          (("is" "what's") immediate (font-lock-keyword-face . 2)
          "[ \t\n]" t name (font-lock-function-name-face . 3))           "[ \t\n]" t name (font-lock-function-name-face . 3))
         (("<is>" "'") non-immediate (font-lock-keyword-face . 2)          (("<is>" "'" "see") non-immediate (font-lock-keyword-face . 2)
          "[ \t\n]" t name (font-lock-function-name-face . 3))           "[ \t\n]" t name (font-lock-function-name-face . 3))
         (("[to]") compile-only (font-lock-keyword-face . 2)          (("[to]") compile-only (font-lock-keyword-face . 2)
          "[ \t\n]" t name (font-lock-variable-name-face . 3))           "[ \t\n]" t name (font-lock-variable-name-face . 3))
Line 676 
Line 676 
  your .emacs.")   your .emacs.")
   
 (defvar forth-indent-level 4  (defvar forth-indent-level 4
   "Indentation of Forth statements.")    "*Indentation of Forth statements.")
 (defvar forth-minor-indent-level 2  (defvar forth-minor-indent-level 2
   "Minor indentation of Forth statements.")    "*Minor indentation of Forth statements.")
 (defvar forth-compiled-indent-words nil)  (defvar forth-compiled-indent-words nil)
   
 ;; Return, whether `pos' is the first forth word on its line  ;; Return, whether `pos' is the first forth word on its line

Generate output suitable for use with a patch program
Legend:
Removed from v.1.55  
changed lines
  Added in v.1.56
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help