1324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver/* 2324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver[The "BSD licence"] 3324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverCopyright (c) 2007-2008 Leon Jen-Yuan Su 4324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverAll rights reserved. 5324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 6324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverRedistribution and use in source and binary forms, with or without 7324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruvermodification, are permitted provided that the following conditions 8324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverare met: 9324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 10324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 1. Redistributions of source code must retain the above copyright 11324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver notice, this list of conditions and the following disclaimer. 12324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 2. Redistributions in binary form must reproduce the above copyright 13324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver notice, this list of conditions and the following disclaimer in the 14324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver documentation and/or other materials provided with the distribution. 15324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 3. The name of the author may not be used to endorse or promote products 16324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver derived from this software without specific prior written permission. 17324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 18324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverTHIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 19324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverIMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 20324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverOF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 21324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverIN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 22324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverINCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 23324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverNOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 24324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverDATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 25324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverTHEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 26324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 27324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverTHIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 28324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver*/ 29324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 30324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruvergrammar StGUnit; 31324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 32324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruveroptions {language=Java;} 33324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 34324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruvertokens { 35324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver OK = 'OK'; 36324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver FAIL = 'FAIL'; 37324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver DOC_COMMENT; 38324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver} 39324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 40324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver@header { 41324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverpackage org.antlr.gunit.swingui.parsers; 42324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverimport org.antlr.gunit.swingui.model.*; 43324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverimport org.antlr.gunit.swingui.runner.*; 44324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver} 45324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 46324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver@lexer::header {package org.antlr.gunit.swingui.parsers;} 47324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 48324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver@members { 49324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverpublic TestSuiteAdapter adapter ;; 50324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver} 51324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 52324c4644fee44b9898524c09511bd33c3f12e2dfBen GruvergUnitDef 53324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : 'gunit' name=id {adapter.setGrammarName($name.text);} 54324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ('walks' id)? ';' 55324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver header? suite* 56324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 57324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 58324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverheader 59324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : '@header' ACTION 60324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 61324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 62324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruversuite 63324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : ( parserRule=RULE_REF ('walks' RULE_REF)? 64324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver {adapter.startRule($parserRule.text);} 65324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | lexerRule=TOKEN_REF 66324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver {adapter.startRule($lexerRule.text);} 67324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ) 68324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ':' 69324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver test+ 70324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver {adapter.endRule();} 71324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 72324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 73324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruvertest 74324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : input expect 75324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver {adapter.addTestCase($input.in, $expect.out);} 76324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 77324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 78324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverexpect returns [ITestCaseOutput out] 79324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : OK {$out = adapter.createBoolOutput(true);} 80324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | FAIL {$out = adapter.createBoolOutput(false);} 81324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 'returns' RETVAL {$out = adapter.createReturnOutput($RETVAL.text);} 82324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '->' output {$out = adapter.createStdOutput($output.text);} 83324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '->' AST {$out = adapter.createAstOutput($AST.text);} 84324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 85324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 86324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverinput returns [ITestCaseInput in] 87324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : STRING {$in = adapter.createStringInput($STRING.text);} 88324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | ML_STRING {$in = adapter.createMultiInput($ML_STRING.text);} 89324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | fileInput {$in = adapter.createFileInput($fileInput.path);} 90324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 91324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 92324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruveroutput 93324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : STRING 94324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | ML_STRING 95324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | ACTION 96324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 97324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 98324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverfileInput returns [String path] 99324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : id {$path = $id.text;} (EXT {$path += $EXT.text;})? 100324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 101324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 102324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverid : TOKEN_REF 103324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | RULE_REF 104324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 105324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 106324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver// L E X I C A L R U L E S 107324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 108324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverSL_COMMENT 109324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : '//' ~('\r'|'\n')* '\r'? '\n' {$channel=HIDDEN;} 110324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 111324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 112324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverML_COMMENT 113324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : '/*' {$channel=HIDDEN;} .* '*/' 114324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 115324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 116324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverSTRING 117324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : '"' ( ESC | ~('\\'|'"') )* '"' 118324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 119324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 120324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverML_STRING 121324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : '<<' .* '>>' 122324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 123324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 124324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverTOKEN_REF 125324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : 'A'..'Z' ('a'..'z'|'A'..'Z'|'_'|'0'..'9')* 126324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 127324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 128324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverRULE_REF 129324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : 'a'..'z' ('a'..'z'|'A'..'Z'|'_'|'0'..'9')* 130324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 131324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 132324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverEXT : '.'('a'..'z'|'A'..'Z'|'0'..'9')+; 133324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 134324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverRETVAL : NESTED_RETVAL 135324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 136324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 137324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverfragment 138324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverNESTED_RETVAL : 139324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver '[' 140324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ( options {greedy=false;} 141324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : NESTED_RETVAL 142324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | . 143324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver )* 144324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ']' 145324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 146324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 147324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverAST : NESTED_AST (' '? NESTED_AST)*; 148324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 149324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverfragment 150324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverNESTED_AST : 151324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver '(' 152324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ( options {greedy=false;} 153324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : NESTED_AST 154324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | . 155324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver )* 156324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ')' 157324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 158324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 159324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverACTION 160324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : NESTED_ACTION 161324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 162324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 163324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverfragment 164324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverNESTED_ACTION : 165324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver '{' 166324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ( options {greedy=false; k=3;} 167324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : NESTED_ACTION 168324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | STRING_LITERAL 169324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | CHAR_LITERAL 170324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | . 171324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver )* 172324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver '}' 173324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 174324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 175324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverfragment 176324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverCHAR_LITERAL 177324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : '\'' ( ESC | ~('\''|'\\') ) '\'' 178324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 179324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 180324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverfragment 181324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverSTRING_LITERAL 182324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver : '"' ( ESC | ~('\\'|'"') )* '"' 183324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 184324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 185324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverfragment 186324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverESC : '\\' 187324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ( 'n' 188324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 'r' 189324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 't' 190324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 'b' 191324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 'f' 192324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '"' 193324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '\'' 194324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '\\' 195324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '>' 196324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 'u' XDIGIT XDIGIT XDIGIT XDIGIT 197324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | . // unknown, leave as it is 198324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ) 199324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 200324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 201324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverfragment 202324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverXDIGIT : 203324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver '0' .. '9' 204324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 'a' .. 'f' 205324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | 'A' .. 'F' 206324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 207324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 208324c4644fee44b9898524c09511bd33c3f12e2dfBen GruverWS : ( ' ' 209324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '\t' 210324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver | '\r'? '\n' 211324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver )+ 212324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver {$channel=HIDDEN;} 213324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver ; 214