# Style sheet for modula-3
# Copyright (c) 1988, 89, 90, 91, 92, 93 Miguel Santana
# Copyright (c) 1995, 96, 97, 98 Akim Demaille, Miguel Santana
# $Id: modula3.ssh,v 1.1.1.1.2.1 2007/12/29 01:58:31 mhatta Exp $
#

#
# This file is part of a2ps.
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3, or (at your option)
# any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; see the file COPYING.  If not, write to
# the Free Software Foundation, 59 Temple Place - Suite 330,
# Boston, MA 02111-1307, USA.
#

## 1.1 Akim Demaille
# Added Doc.

style "Modula 3" is
written by "Akim Demaille <akim@freefriends.org>"
version is 1.1
requires a2ps version 4.9.7

documentation is
   "Modula-3 is a member of the Pascal family of languages. Designed in"
   "the late 1980s at Digital Equipment Corporation and Olivetti, Modula-3"
   "corrects many of the deficiencies of Pascal and Modula-2 for practical"
   "software engineering. In particular, Modula-3 keeps the simplicity of"
   "type safety of the earlier languages, while providing new facilities"
   "for exception handling, concurrency, object-oriented programming, and"
   "automatic garbage collection. Modula-3 is both a practical"
   "implementation language for large software projects and an excellent"
   "teaching language."
   ""
   "This sheet was designed based on url(http://www.research.digital.com/SRC/modula-3/html/home.html)url(Modula 3 home page)url."
end documentation

alphabets are
   "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz_"
case sensitive

# Common to Modula 2 and Modula 3
keywords in Keyword_strong are
  AND, ARRAY, BEGIN, BY, CASE, CONST, DIV, DO, ELSE, ELSIF, END, EXIT,
  FOR, FROM, IF, IMPORT, IN, LOOP, MOD, MODULE, NOT, OF, OR,
  PROCEDURE, RECORD, REPEAT, RETURN, SET, THEN, TO, TYPE, UNTIL, VAR,
  WHILE, WITH
end keywords

# Modula 3 only
keywords in Keyword_strong are
  ANY, AS, BITS, BRANDED, EVAL, EXCEPT, EXCEPTION, EXPORTS, FINALLY,
  GENERIC, INTERFACE, LOCK, METHODS, OBJECT, OVERRIDES, RAISE, RAISES,
  READONLY, REF, REVEAL, ROOT, TRY, TYPECASE, UNSAFE, UNTRACED, VALUE
end keywords

keywords in Keyword are
   ABS, BYTESIZE, EXTENDED, INTEGER, MIN, NUMBER, TEXT, ADDRESS,
   CARDINAL, FALSE, ISTYPE, MUTEX, ORD, TRUE, ADR, CEILING, FIRST,
   LAST, NARROW, REAL, TRUNC, ADRSIZE, CHAR, FLOAT, LONGREAL, NEW,
   REFANY, TYPECODE, BITSIZE, DEC, FLOOR, LOOPHOLE, NIL, ROUND, VAL,
   BOOLEAN, DISPOSE, INC, MAX, NULL, SUBARRAY
end keywords

optional keywords are
   IN \in,
   NOT \not,
   AND \wedge,
   OR \vee
end keywords

optional operators are
   -> \rightarrow,
   <= \leq,
   >= \geq,
   :=,
   "#" \neq,
   = \equiv
end operators

sequences are
    "(*" Plain Comment "*)" Plain,
    C-string,
    C-char
end sequences
end style