Modula-3 Resource Page - Goodies [More Info]

cbind.tar.gz

cbind was originally an Ada bindings to C translator. Mark Schimmel is the author, and his "copyright" on the code is

The code is provided "as is" without any warranty whatsoever. The code is NOT copyrighted but is instead published to the public domain as free software. Any attempt to copyright the tool will be refutable in a court of law.

Thank the folks at Critical Mass for modifying cbind to work for Modula-3.

modula3.el

For more information about modula3.el, go to the DEC SRC gnuemacs page.

m3font.el

It is recommended that you add these lines to your .emacs file so you get the most colors displayed

;; make sure font-lock variables are loaded
(require 'font-lock)

;; html-mode is damaged so this needs to be done this way
;; this is still true in emacs 20.x
(setq font-lock-maximum-decoration '((html-mode . nil) (t . t)))

This is the list of faces that are used by m3font.el

font-lock-comment-face
font-lock-function-name-face
font-lock-keyword-face
font-lock-string-face
font-lock-reference-face
font-lock-type-face
font-lock-warning-face
font-lock-builtin-face

To work with emacs-20.x and emacs-19.x a .emacs file might have this in it:

;; First of all determine which version of emacs is being used
(setq my::emacs-type
      (cond ((string-match "^19\\." emacs-version)
	     "gnu-19")
	    ((string-match "^20\\." emacs-version)
	     "gnu-20")
	    (t
	     "unknown")))

;; will be one or the other, otherwise use default font colors
(if (equal my::emacs-type "gnu-19")
    (load "emacs-19-font-lock"))

(if (equal my::emacs-type "gnu-20")
    (load "emacs-20-font-lock"))

The file emacs-19-font-lock.el will contain appropriate face modifications, as they must be done for versions of emacs 19 and prior.

;; This is to assign the colors, etc. for the fonts used by font-lock
;; in emacs 19.x versions and prior.
;;
;; font-lock-face-attributes
;; (FACE FOREGROUND BACKGROUND BOLD-P ITALIC-P UNDERLINE-P)
;;
(setq font-lock-face-attributes
      '((font-lock-comment-face       "Cyan"        nil nil nil nil)
	(font-lock-function-name-face "SpringGreen" nil nil nil nil)
	(font-lock-keyword-face       "Gold"        nil nil nil nil)
	(font-lock-string-face        "Khaki"       nil t   nil nil)
	(font-lock-reference-face     "Aquamarine"  nil t   nil nil)
	(font-lock-type-face          "LightBlue"   nil t   nil nil)
	(font-lock-warning-face       "Violet"      nil nil nil nil)
	(font-lock-builtin-face       "PaleGreen"   nil t   nil nil)
	(font-lock-variable-name-face "Salmon"      nil nil nil nil)
	)
      )

The file emacs-20-font-lock.el will contain appropriate face modifications, as they must be done for versions of emacs 20 and later.

;; This is to assign the colors, etc. for the fonts used by font-lock
;; in emacs 20.x versions and beyond.
;;
;;(modify-face FACE FOREGROUND BACKGROUND STIPPLE BOLD-P
;; ITALIC-P UNDERLINE-P &optional FRAME)
;;
(modify-face font-lock-comment-face       "Cyan"        nil nil nil nil nil)
(modify-face font-lock-function-name-face "SpringGreen" nil nil nil nil nil)
(modify-face font-lock-keyword-face       "Gold"        nil nil nil nil nil)
(modify-face font-lock-string-face        "Khaki"       nil nil t   nil nil)
(modify-face font-lock-reference-face     "Aquamarine"  nil nil t   nil nil)
(modify-face font-lock-type-face          "LightBlue"   nil nil t   nil nil)
(modify-face font-lock-warning-face       "Violet"      nil nil nil nil nil)
(modify-face font-lock-builtin-face       "PaleGreen"   nil nil t   nil nil)
(modify-face font-lock-variable-name-face "Salmon"      nil nil nil nil nil)

Special thanks to Simon Marshall and Ron Forrester for enhancing the previous version.

regexp-opt.el

This doesn't actually do the best optimization job. If there is enough call for it, m3font.el can be hand optimized, but with a fast enough machine, you probably won't notice the difference.