mirrors/cosmopolitan
1
0
Fork 0
mirror of https://github.com/jart/cosmopolitan.git synced 2025-07-20 17:40:30 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add scouts honor escape hatch for source embedding

Browse source
This commit is contained in:
Justine Tunney 2020-06-15 19:01:28 -07:00
parent c91b3c5006
commit b4269930f7
547 changed files with 1516 additions and 944 deletions
Download patch file Download diff file Expand all files Collapse all files

10
tool/emacs/cosmo-asm-mode.el
View file

@ -8,6 +8,7 @@
;; Reconfigures GNU Emacs syntax highlighting for GNU Assembler syntax.
(require 'asm-mode)
(require 'cosmo-cpp-constants)
(defun cosmo-regexpify (x)
(let ((join (lambda (sep lis)
@ -144,6 +145,11 @@
;;
("^/.*$" . font-lock-comment-face)
;; Preprocessor Constants
;; TODO(jart): Why won't it work?? ;_;
(,(concat "\\b" (cosmo-regexpify cosmo-cpp-constants) "\\b") ;; regexp-opt
1 font-lock-constant-face)
;; Immediate Argument
;;
;; - Valid
@ -192,7 +198,7 @@
cpp-font-lock-keywords
'(;; GNU-Style Assembler Comment (Ltd. 80x86 &c.)
`(;; GNU-Style Assembler Comment (Ltd. 80x86 &c.)
;;
;; - Valid
;;
@ -273,7 +279,7 @@
(1 font-lock-constant-face)
(2 font-lock-constant-face))
;; Decimal Literal
;; Bultin Constants
;;
;; - Valid
;;