gforth/gforth.el - diff

Return to gforth.el CVS log

Up to [gforth] / gforth

Diff for /gforth/gforth.el between versions 1.39 and 1.42

version 1.39, 2000/04/09 20:57:25	version 1.42, 2000/09/12 19:20:06
Line 1000 The region is sent terminated by a newli	Line 1000 The region is sent terminated by a newli
'(forth-mode)	'(forth-mode)
(append	(append
'(("\\\\ \$.*\$$" nil comment)) ; comments	'(("\\\\ \$.*\$$" nil comment)) ; comments
'(("( [^)\n]* -- [^)\n]* )" nil decl))	'(("\\\\[gG] \$.*\$$" nil comment)) ; comments
'(("( -- [^)\n]* )" nil decl))	'(("(\$ [^)\n]* \\\| \$--\$ [^)\n]* \\\| \$)" nil decl))
'(("( [^)\n]* -- )" nil decl))
'(("( -- )" nil decl))
'(("( " ")" comment))	'(("( " ")" comment))
'(("\" [^\"\n]*\"" nil string))	'(("\" [^\"\n]*\"" nil string))
'(("\$\\[IF]\\\|\\[IFDEF]\\\|\\[IFUNDEF]\\\|\\[ELSE]\\\|\\[THEN]\\\|IF\\\|ELSE\\\|THEN\\\|BEGIN\\\|WHILE\\\|REPEAT\\\|UNTIL\\\|?DO\\\|DO\\\|\+LOOP\\\|LOOP\$" nil keyword))	'(("\$\\[IF]\\\|\\[IFDEF]\\\|\\[IFUNDEF]\\\|\\[ELSE]\\\|\\[THEN]\\\|IF\\\|ELSE\\\|THEN\\\|CASE\\\|ENDCASE\\\|OF\\\|ENDOF\\\|BEGIN\\\|WHILE\\\|REPEAT\\\|UNTIL\\\|AGAIN\\\|DOES>\\\|?DO\\\|DO\\\|\+LOOP\\\|UNLOOP\\\|LOOP\\\|EXIT\$" nil keyword))
	'(("\$\\[if]\\\|\\[ifdef]\\\|\\[ifundef]\\\|\\[else]\\\|\\[then]\\\|if\\\|else\\\|then\\\|case\\\|endcase\\\|of\\\|endof\\\|begin\\\|while\\\|repeat\\\|until\\\|again\\\|does>\\\|?do\\\|do\\\|\+loop\\\|unloop\\\|loop\\\|exit\$" nil keyword))
'((": [^ \n]" nil defun))	'((": [^ \n]" nil defun))
'(("Defer [^ \n]" nil defun))	'(("Defer [^ \n]" nil defun))
'(("Variable [^ \n]" nil define))	'(("\$Variable\\\|Constant\\\|Value\\\|Create\$ [^ \n]" nil define))
'(("Constant [^ \n]" nil define))	'(("\$include\\\|require\$ [^ \n]" nil include))
'(("include [^ \n]" nil include))
'(("require [^ \n]" nil include))
'(("[\n ]\$\\$[0-9A-Fa-f]+[\n ]\\\|&[0-9]+[\n ]\\\|[0-9]+[\n ]\\\|%[01]+[\n ]\\\|'[^ \n]+\$+" nil formula))	'(("[\n ]\$\\$[0-9A-Fa-f]+[\n ]\\\|&[0-9]+[\n ]\\\|[0-9]+[\n ]\\\|%[01]+[\n ]\\\|'[^ \n]+\$+" nil formula))
'((":noname" nil defun))))	'((":noname" nil defun))))

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

version 1.39, 2000/04/09 20:57:25	version 1.42, 2000/09/12 19:20:06
Line 1000 The region is sent terminated by a newli	Line 1000 The region is sent terminated by a newli
'(forth-mode)	'(forth-mode)
(append	(append
'(("\\\\ \\(.*\\)$" nil comment)) ; comments	'(("\\\\ \\(.*\\)$" nil comment)) ; comments
'(("( [^)\n]* -- [^)\n]* )" nil decl))	'(("\\\\[gG] \\(.*\\)$" nil comment)) ; comments
'(("( -- [^)\n]* )" nil decl))	'(("(\\( [^)\n]* \\\| \\)--\\( [^)\n]* \\\| \\))" nil decl))
'(("( [^)\n]* -- )" nil decl))
'(("( -- )" nil decl))
'(("( " ")" comment))	'(("( " ")" comment))
'(("\" [^\"\n]*\"" nil string))	'(("\" [^\"\n]*\"" nil string))
'(("\\(\\[IF]\\\|\\[IFDEF]\\\|\\[IFUNDEF]\\\|\\[ELSE]\\\|\\[THEN]\\\|IF\\\|ELSE\\\|THEN\\\|BEGIN\\\|WHILE\\\|REPEAT\\\|UNTIL\\\|?DO\\\|DO\\\|\+LOOP\\\|LOOP\\)" nil keyword))	'(("\\(\\[IF]\\\|\\[IFDEF]\\\|\\[IFUNDEF]\\\|\\[ELSE]\\\|\\[THEN]\\\|IF\\\|ELSE\\\|THEN\\\|CASE\\\|ENDCASE\\\|OF\\\|ENDOF\\\|BEGIN\\\|WHILE\\\|REPEAT\\\|UNTIL\\\|AGAIN\\\|DOES>\\\|?DO\\\|DO\\\|\+LOOP\\\|UNLOOP\\\|LOOP\\\|EXIT\\)" nil keyword))
	'(("\\(\\[if]\\\|\\[ifdef]\\\|\\[ifundef]\\\|\\[else]\\\|\\[then]\\\|if\\\|else\\\|then\\\|case\\\|endcase\\\|of\\\|endof\\\|begin\\\|while\\\|repeat\\\|until\\\|again\\\|does>\\\|?do\\\|do\\\|\+loop\\\|unloop\\\|loop\\\|exit\\)" nil keyword))
'((": [^ \n]" nil defun))	'((": [^ \n]" nil defun))
'(("Defer [^ \n]" nil defun))	'(("Defer [^ \n]" nil defun))
'(("Variable [^ \n]" nil define))	'(("\\(Variable\\\|Constant\\\|Value\\\|Create\\) [^ \n]" nil define))
'(("Constant [^ \n]" nil define))	'(("\\(include\\\|require\\) [^ \n]" nil include))
'(("include [^ \n]" nil include))
'(("require [^ \n]" nil include))
'(("[\n ]\\(\\$[0-9A-Fa-f]+[\n ]\\\|&[0-9]+[\n ]\\\|[0-9]+[\n ]\\\|%[01]+[\n ]\\\|'[^ \n]+\\)+" nil formula))	'(("[\n ]\\(\\$[0-9A-Fa-f]+[\n ]\\\|&[0-9]+[\n ]\\\|[0-9]+[\n ]\\\|%[01]+[\n ]\\\|'[^ \n]+\\)+" nil formula))
'((":noname" nil defun))))	'((":noname" nil defun))))

Removed from v.1.39
changed lines
	Added in v.1.42