home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Vectronix 2
/
VECTRONIX2.iso
/
FILES_01
/
LATTIC_3.LZH
/
WERCS
/
WERCS.LNG
< prev
next >
Wrap
Text File
|
1988-10-03
|
1KB
|
88 lines
*LANGUAGE C
*SOURCE .H
*TREE
#define %T %V
*OBJECT
#define %N %V
*INITIAL A-Z,a-z,_
*FOLLOW A-Z,a-z,0-9,_
*SIGNIFICANCE 16
*CASING Upper
*LANGUAGE Pascal
*SOURCE .INC
*INIT
CONST
*TREE
%T=%V;
*OBJECT
%N=%V;
*INITIAL A-Z,a-z
*FOLLOW A-Z,a-z,0-9
*SIGNIFICANCE 16
*CASING Lower
*LANGUAGE Modula-2
*SOURCE .DEF
*INIT
DEFINITION MODULE %F;
CONST
*TREE
%T=%V;
*OBJECT
%N=%V;
*EXIT
END %F.
*INITIAL A-Z,a-z,_,$
*FOLLOW A-Z,a-z,0-9,_,$
*SIGNIFICANCE 16
*CASING None
*LANGUAGE Fortran
*SOURCE .INC
*TREE
INTEGER*4 %T
PARAMETER (%T=%V)
*OBJECT
INTEGER*4 %N
PARAMETER (%N=%V)
*INITIAL A-Z,a-z
*FOLLOW A-Z,a-z,0-9,_
*SIGNIFICANCE 16
*CASING Upper
*LANGUAGE Assembler
*SOURCE .I
*TREE
%T EQU %V
*OBJECT
%N EQU %V
*INITIAL A-Z,a-z,_
*FOLLOW A-Z,a-z,0-9,_,.
*SIGNIFICANCE 16
*CASING None
*LANGUAGE BASIC
*SOURCE .BH
*TREE
CONST %T%% = %V
*OBJECT
CONST %N%% = %V
*INITIAL A-Z,a-z
*FOLLOW A-Z,a-z,0-9,_
*SIGNIFICANCE 16
*CASING None
*END