dot-lang.scm (TeXmacs-2.1.1-src) | : | dot-lang.scm (TeXmacs-2.1.2-src) | ||
---|---|---|---|---|
skipping to change at line 14 | skipping to change at line 14 | |||
;; MODULE : dot-lang.scm | ;; MODULE : dot-lang.scm | |||
;; DESCRIPTION : the DOT Language | ;; DESCRIPTION : the DOT 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 dot-lang) | (texmacs-module (dot-lang) | |||
(:use (prog default-lang))) | (:use (prog default-lang))) | |||
(tm-define (parser-feature lan key) | (tm-define (parser-feature lan key) | |||
(:require (and (== lan "dot") (== key "keyword"))) | (:require (and (== lan "dot") (== key "keyword"))) | |||
`(,(string->symbol key) | `(,(string->symbol key) | |||
(declare_type "graph" "node" "edge" "digraph" "subgraph") | (declare_type "graph" "node" "edge" "digraph" "subgraph") | |||
(keyword | (keyword | |||
;; Graph attributes | ;; Graph attributes | |||
"center" "layers" "margin" "mclimit" "name" "nodesep" "nslimit" | "center" "layers" "margin" "mclimit" "name" "nodesep" "nslimit" | |||
"ordering" "page" "pagedir" "rank" "rankdir" "ranksep" "ratio" | "ordering" "page" "pagedir" "rank" "rankdir" "ranksep" "ratio" | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |