FUEL: C: font lock fix.
							parent
							
								
									037ba93c1c
								
							
						
					
					
						commit
						8d18fc10aa
					
				| 
						 | 
					@ -88,6 +88,9 @@
 | 
				
			||||||
  `((,fuel-syntax--stack-effect-regex . 'factor-font-lock-stack-effect)
 | 
					  `((,fuel-syntax--stack-effect-regex . 'factor-font-lock-stack-effect)
 | 
				
			||||||
    (,fuel-syntax--brace-words-regex 1 'factor-font-lock-parsing-word)
 | 
					    (,fuel-syntax--brace-words-regex 1 'factor-font-lock-parsing-word)
 | 
				
			||||||
    (,fuel-syntax--vocab-ref-regexp  2 'factor-font-lock-vocabulary-name)
 | 
					    (,fuel-syntax--vocab-ref-regexp  2 'factor-font-lock-vocabulary-name)
 | 
				
			||||||
 | 
					    (,fuel-syntax--constructor-regex (1 'factor-font-lock-word)
 | 
				
			||||||
 | 
					                                     (2 'factor-font-lock-type-name)
 | 
				
			||||||
 | 
					                                     (3 'factor-font-lock-invalid-syntax nil t))
 | 
				
			||||||
    (,fuel-syntax--declaration-words-regex . 'factor-font-lock-declaration)
 | 
					    (,fuel-syntax--declaration-words-regex . 'factor-font-lock-declaration)
 | 
				
			||||||
    (,fuel-syntax--word-definition-regex 2 'factor-font-lock-word)
 | 
					    (,fuel-syntax--word-definition-regex 2 'factor-font-lock-word)
 | 
				
			||||||
    (,fuel-syntax--alias-definition-regex (1 'factor-font-lock-word)
 | 
					    (,fuel-syntax--alias-definition-regex (1 'factor-font-lock-word)
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -208,6 +208,9 @@
 | 
				
			||||||
          (format ":[^ ]* [^ ]+\\(%s\\)*" fuel-syntax--stack-effect-regex)
 | 
					          (format ":[^ ]* [^ ]+\\(%s\\)*" fuel-syntax--stack-effect-regex)
 | 
				
			||||||
          "M[^:]*: [^ ]+ [^ ]+"))
 | 
					          "M[^:]*: [^ ]+ [^ ]+"))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					(defconst fuel-syntax--constructor-regex
 | 
				
			||||||
 | 
					  "\\_<C: +\\(\\w+\\) +\\(\\w+\\)\\( .*\\)?$")
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					
 | 
				
			||||||
;;; Factor syntax table
 | 
					;;; Factor syntax table
 | 
				
			||||||
 | 
					
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in New Issue