json-lang.scm (TeXmacs-2.1.1-src) | : | json-lang.scm (TeXmacs-2.1.2-src) | ||
---|---|---|---|---|
skipping to change at line 14 | skipping to change at line 14 | |||
;; MODULE : json-lang.scm | ;; MODULE : json-lang.scm | |||
;; DESCRIPTION : JSON Language | ;; DESCRIPTION : JSON Language | |||
;; COPYRIGHT : (C) 2020 Darcy Shen | ;; COPYRIGHT : (C) 2020 Darcy Shen | |||
;; | ;; | |||
;; This software falls under the GNU general public license version 3 or later. | ;; This software falls under the GNU general public license version 3 or later. | |||
;; It comes WITHOUT ANY WARRANTY WHATSOEVER. For details, see the file LICENSE | ;; It comes WITHOUT ANY WARRANTY WHATSOEVER. For details, see the file LICENSE | |||
;; in the root directory or <http://www.gnu.org/licenses/gpl-3.0.html>. | ;; in the root directory or <http://www.gnu.org/licenses/gpl-3.0.html>. | |||
;; | ;; | |||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |||
(texmacs-module (prog json-lang)) | (texmacs-module (json-lang)) | |||
(tm-define (parser-feature lan key) | (tm-define (parser-feature lan key) | |||
(:require (and (== lan "json") (== key "keyword"))) | (:require (and (== lan "json") (== key "keyword"))) | |||
`(,(string->symbol key) | `(,(string->symbol key) | |||
(constant | (constant | |||
"false" "true" "null"))) | "false" "true" "null"))) | |||
;; Ref: https://ecma-international.org/ecma-262/10.0/index.html#sec-update-expre ssions | ;; Ref: https://ecma-international.org/ecma-262/10.0/index.html#sec-update-expre ssions | |||
(tm-define (parser-feature lan key) | (tm-define (parser-feature lan key) | |||
(:require (and (== lan "json") (== key "operator"))) | (:require (and (== lan "json") (== key "operator"))) | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |