| 1 |
grozin 14/03/25 05:49:23 |
| 2 |
|
| 3 |
Modified: gvcl-mode.el |
| 4 |
Log: |
| 5 |
Version bump, thanks to Claus-Justus Heine <himself@××××××××××××××××××.de>, #504372 |
| 6 |
|
| 7 |
(Portage version: 2.2.8-r1/cvs/Linux i686, signed Manifest commit with key 0x3AFFCE974D34BD8C!) |
| 8 |
|
| 9 |
Revision Changes Path |
| 10 |
1.2 sci-mathematics/geomview/files/gvcl-mode.el |
| 11 |
|
| 12 |
file : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-mathematics/geomview/files/gvcl-mode.el?rev=1.2&view=markup |
| 13 |
plain: http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-mathematics/geomview/files/gvcl-mode.el?rev=1.2&content-type=text/plain |
| 14 |
diff : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/sci-mathematics/geomview/files/gvcl-mode.el?r1=1.1&r2=1.2 |
| 15 |
|
| 16 |
Index: gvcl-mode.el |
| 17 |
=================================================================== |
| 18 |
RCS file: /var/cvsroot/gentoo-x86/sci-mathematics/geomview/files/gvcl-mode.el,v |
| 19 |
retrieving revision 1.1 |
| 20 |
retrieving revision 1.2 |
| 21 |
diff -u -r1.1 -r1.2 |
| 22 |
--- gvcl-mode.el 6 Jul 2007 07:30:51 -0000 1.1 |
| 23 |
+++ gvcl-mode.el 25 Mar 2014 05:49:23 -0000 1.2 |
| 24 |
@@ -66,7 +66,7 @@ |
| 25 |
|
| 26 |
(defconst gvcl-font-lock-keywords-1 |
| 27 |
(list |
| 28 |
- '("(\\(progn\\|backcolor\\|read\\|camera\\|new-geometry\\|car\\|cdr\\|emodule-\\S-+\\|ui-\\S-+\\|normalization\\)\\>" . font-lock-builtin-face) |
| 29 |
+ '("(\\s-*\\(redraw\\|process-events\\|interest\\|time-interests\\|and\\|sleep-\\(for\\|until\\)\\|or\\|hdefine\\|geometry\\|quote\\|eval\\|if\\|while\\|setq\\|echo\\|let\\|exit\\|quit\\|lambda\\|defun\\|progn\\|backcolor\\|read\\|camera\\|new-geometry\\|car\\|cdr\\|cons\\|emodule\\S-*\\|ui-\\S-+\\|normalization\\)\\>" . font-lock-builtin-face) |
| 30 |
'("\\(\"\\w*\"\\)" . font-lock-variable-name-face)) |
| 31 |
"Minimal highlighting expressions for GVCL mode.") |
| 32 |
|
| 33 |
@@ -74,24 +74,27 @@ |
| 34 |
(append gvcl-font-lock-keywords-1 |
| 35 |
(list |
| 36 |
'("\\<\\(\\(location\\|origin\\)\\s-+\\(camera\\|local\\|global\\|ndc\\|screen\\)\\)\\>" . font-lock-constant-face) |
| 37 |
- '("\\<\\(define\\|geom\\(etry\\)?\\|camera\\|window\\)\\>" . font-lock-keyword-face))) |
| 38 |
+ '("\\<\\(define\\|geom\\(etry\\)?\\|camera\\|window\\|inertia\\|allgeoms\\|focus-change\\)\\>" . font-lock-keyword-face))) |
| 39 |
"Additional Keywords to highlight in GVCL mode.") |
| 40 |
|
| 41 |
(defconst gvcl-font-lock-keywords-3 |
| 42 |
(append gvcl-font-lock-keywords-2 |
| 43 |
(list |
| 44 |
- '("\\<\\(yes\\|no\\|on\\|off\\|toggle\\|center\\|none\\|focus-change\\|allgeoms\\)\\>" . font-lock-constant-face) |
| 45 |
'("\\<\\(INST\\|T?LIST\\|\\(ST\\)?Z?u?v?C?N?U?4?n?\\(OFF\\|MESH\\|SKEL\\|VECT\\|QUAD\\|BEZ\\|BBP\\|BBOX\\|SPHERE\\|GROUP\\|DISCGRP\\|COMMENT\\)\\)\\>" . font-lock-type-face) |
| 46 |
+ ;; more OOGL keywords |
| 47 |
+ '("\\<\\(SINUSOIDAL\\|CYLINDRICAL\\|RECTANGULAR\\|STEREOGRAPHIC\\|ONEFACE\\)\\>" . font-lock-keyword-face) |
| 48 |
;; apperance constants |
| 49 |
- '("\\<\\(apply\\s-+\\(blend\\|modulate\\|replace\\|decal\\)\\|replacelights\\|face\\|edge\\|vect\\|transparent\\|normal\\|normscale\\|evert\\|texturing\\|mipmap\\|linear\\|mipinterp\\|backcull\\|concave\\|shadelines\\|keepcolor\\|shading\\s-+\\(smooth\\|flat\\|constant\\)\\|replacelights\\|clamp\\s-+\\(s\\|t\\|st\\|none\\)\\)\\>" . font-lock-constant-face) |
| 50 |
+ '("\\<\\(blend\\|modulate\\|replace\\|decal\\|replacelights\\|face\\|edge\\|vect\\|transparent\\|normal\\|normscale\\|evert\\|texturing\\|mipmap\\|linear\\|mipinterp\\|backcull\\|concave\\|shadelines\\|keepcolor\\|smooth\\|flat\\|constant\\|csmooth\\|vcflat\\|replacelights\\|clamp\\s-+\\(s\\|t\\|st\\|none\\)\\)\\>" . font-lock-constant-face) |
| 51 |
;; image constants |
| 52 |
'("\\<\\(RGB\\|RGBA\\|ALPHA\\|LUMINANCE\\|LUMINANCE_ALPHA\\)\\>" . font-lock-constant-face) |
| 53 |
;; image keywords |
| 54 |
'("\\<\\(inertia\\|width\\|height\\|channels\\|maxval\\|data\\)\\>" . font-lock-keyword-face) |
| 55 |
;; apperance keywords |
| 56 |
- '("\\<\\(localviewer\\|attenconst\\|attenmult2?\\|normscale\\|shading\\|linewidth\\|patchdice\\|ka\\|ambient\\|kd\\|diffuse\\|ks\\|specular\\|shininess\\|backdiffuse\\|alpha\\|edgecolor\\|normalcolor\\|color\\|position\\|file\\|alphafile\\|background\\)\\>" . font-lock-keyword-face) |
| 57 |
+ '("\\<\\(apply\\|shading\\|localviewer\\|attenconst\\|attenmult2?\\|normscale\\|shading\\|linewidth\\|patchdice\\|ka\\|ambient\\|kd\\|diffuse\\|ks\\|specular\\|shininess\\|backdiffuse\\|alpha\\|edgecolor\\|normalcolor\\|color\\|position\\|file\\|alphafile\\|background\\|texturing\\)\\>" . font-lock-keyword-face) |
| 58 |
;; some more types |
| 59 |
- '("\\<\\(texture\\|light\\|material\\|lighting\\|light\\|image\\|appearance\\|n?transforms?\\)\\>" . font-lock-type-face) |
| 60 |
+ '("\\<\\(texture\\|light\\|material\\|lighting\\|light\\|image\\|appearance\\|n?transforms?\\|tlist\\)\\>" . font-lock-type-face) |
| 61 |
+ ;; some more constants |
| 62 |
+ '("\\<\\(yes\\|no\\|on\\|off\\|toggle\\|center\\|none\\)\\>" . font-lock-constant-face) |
| 63 |
)) |
| 64 |
"Balls-out highlighting in GVCL mode.") |
Archives