1324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver/*
2324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * [The "BSD licence"]
3324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Copyright (c) 2005-2008 Terence Parr
4324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * All rights reserved.
5324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *
6324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Conversion to C#:
7324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Copyright (c) 2008-2009 Sam Harwell, Pixel Mine, Inc.
8324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * All rights reserved.
9324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *
10324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * Redistribution and use in source and binary forms, with or without
11324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * modification, are permitted provided that the following conditions
12324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * are met:
13324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * 1. Redistributions of source code must retain the above copyright
14324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    notice, this list of conditions and the following disclaimer.
15324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * 2. Redistributions in binary form must reproduce the above copyright
16324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    notice, this list of conditions and the following disclaimer in the
17324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    documentation and/or other materials provided with the distribution.
18324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * 3. The name of the author may not be used to endorse or promote products
19324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *    derived from this software without specific prior written permission.
20324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver *
21324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver */
32324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
33324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruvergrammar Expr;
34324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
35324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver/*
36324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	I had to make the following changes to the basic Expr grammar to make it work with the CSharp3 target in "Java compatibility mode".
37324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	For reference, see http://www.antlr.org/wiki/display/ANTLR3/Expression+evaluator.
38324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
39324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	Add an options section to set the language to CSharp3.
40324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
41324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	In the @header section, add:
42324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver		// 'member' is obsolete
43324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver		#pragma warning disable 612
44324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver		using Antlr.Runtime.JavaExtensions;
45324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
46324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	In the @header section, replace:
47324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver			import java.util.HashMap;
48324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver		with:
49324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver			using HashMap = System.Collections.Generic.Dictionary<object,object>;
50324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
51324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	Change all instances of "System.out" with "JSystem.@out".
52324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
53324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	Change all instances of "System.err" with "JSystem.err".
54324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
55324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	Change all instances of "skip()" with "Skip()".
56324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver */
57324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
58324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruveroptions
59324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver{
60324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver	language=CSharp3;
61324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
62324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
63324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver@header {
64324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver// 'member' is obsolete
65324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver#pragma warning disable 612
66324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
67324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverusing Antlr.Runtime.JavaExtensions;
68324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverusing HashMap = System.Collections.Generic.Dictionary<object,object>;
69324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverusing Integer = java.lang.Integer;
70324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
71324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
72324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver@members {
73324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver/** Map variable name to Integer object holding value */
74324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverHashMap memory = new HashMap();
75324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver}
76324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
77324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverprog:   stat+ ;
78324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
79324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverstat:   expr NEWLINE {JSystem.@out.println($expr.value);}
80324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    |   ID '=' expr NEWLINE
81324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        {memory.put($ID.text, new Integer($expr.value));}
82324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    |   NEWLINE
83324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ;
84324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
85324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverexpr returns [int value]
86324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    :   e=multExpr {$value = $e.value;}
87324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        (   '+' e=multExpr {$value += $e.value;}
88324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        |   '-' e=multExpr {$value -= $e.value;}
89324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        )*
90324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ;
91324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
92324c4644fee44b9898524c09511bd33c3f12e2dfBen GruvermultExpr returns [int value]
93324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    :   e=atom {$value = $e.value;} ('*' e=atom {$value *= $e.value;})*
94324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ;
95324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
96324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruveratom returns [int value]
97324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    :   INT {$value = Integer.parseInt($INT.text);}
98324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    |   ID
99324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        {
100324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        Integer v = (Integer)memory.get($ID.text);
101324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        if ( v!=null ) $value = v.intValue();
102324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        else JSystem.err.println("undefined variable "+$ID.text);
103324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver        }
104324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    |   '(' expr ')' {$value = $expr.value;}
105324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver    ;
106324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver
107324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverID  :   ('a'..'z'|'A'..'Z')+ ;
108324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverINT :   '0'..'9'+ ;
109324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverNEWLINE:'\r'? '\n' ;
110324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverWS  :   (' '|'\t')+ {Skip();} ;
111