mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-12 13:53:03 +00:00
2007-01-29 Paolo Bonzini <bonzini@gnu.org>
* NEWS: Mention java. * TODO: Remove things that are done. * bootstrap.conf: Add javacomp-script and javaexec-script. * configure.ac: Invoke gt_JAVACOMP and gt_JAVAEXEC. * data/Makefile.am: Add new files. * data/java-skel.m4: New. * data/java.m4: New. * data/lalr1.java: New. * doc/bison.texinfo: Put "A Complete C++ Example" under C++ Parsers. Add Java Parsers. Put C++ Parsers and Java Parsers under Other Languages. * src/getargs.c (valid_languages): Add Java. * src/getargs.h (struct bison_language): Update size of string fields. * tests/Makefile.am: Add java.at. * tests/atlocal.in: Add CONF_JAVA and CONF_JAVAC. * tests/java.at: New. * tests/testsuite.at: Include it.
This commit is contained in:
Paolo Bonzini
415
tests/java.at
Normal file
415
tests/java.at
Normal file
@@ -0,0 +1,415 @@
|
||||
# Simple calculator. -*- Autotest -*-
|
||||
|
||||
# Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006 Free Software
|
||||
# Foundation, Inc.
|
||||
|
||||
# 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 2, 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; if not, write to the Free Software
|
||||
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
|
||||
# 02110-1301, USA.
|
||||
|
||||
AT_BANNER([[Java Calculator.]])
|
||||
|
||||
|
||||
# ------------------------- #
|
||||
# Helping Autotest macros. #
|
||||
# ------------------------- #
|
||||
|
||||
|
||||
# _AT_DATA_JAVA_CALC_Y($1, $2, $3, [BISON-DIRECTIVES], [BISON-EPILOGUE])
|
||||
# ----------------------------------------------------------------------
|
||||
# Produce `calc.y'. Don't call this macro directly, because it contains
|
||||
# some occurrences of `$1' etc. which will be interpreted by m4. So
|
||||
# you should call it with $1, $2, and $3 as arguments, which is what
|
||||
# AT_DATA_JAVA_CALC_Y does.
|
||||
m4_define([_AT_DATA_JAVA_CALC_Y],
|
||||
[m4_if([$1$2$3], $[1]$[2]$[3], [],
|
||||
[m4_fatal([$0: Invalid arguments: $@])])dnl
|
||||
AT_DATA([Calc.y],
|
||||
[[/* Infix notation calculator--calc */
|
||||
%language "Java"
|
||||
%name-prefix "Calc"]
|
||||
%define parser_class_name "Calc"
|
||||
%define public
|
||||
|
||||
$4[
|
||||
%code imports {
|
||||
import java.io.StreamTokenizer;
|
||||
import java.io.InputStream;
|
||||
import java.io.InputStreamReader;
|
||||
import java.io.Reader;
|
||||
import java.io.IOException;
|
||||
}
|
||||
|
||||
/* Bison Declarations */
|
||||
%token <Integer> NUM "number"
|
||||
%type <Integer> exp
|
||||
|
||||
%nonassoc '=' /* comparison */
|
||||
%left '-' '+'
|
||||
%left '*' '/'
|
||||
%left NEG /* negation--unary minus */
|
||||
%right '^' /* exponentiation */
|
||||
|
||||
/* Grammar follows */
|
||||
%%
|
||||
input:
|
||||
line
|
||||
| input line
|
||||
;
|
||||
|
||||
line:
|
||||
'\n'
|
||||
| exp '\n'
|
||||
| error '\n'
|
||||
;
|
||||
|
||||
exp:
|
||||
NUM { $$ = $1; }
|
||||
| exp '=' exp
|
||||
{
|
||||
if ($1.intValue () != $3.intValue ())
|
||||
yyerror ("calc: error: " + $1 + " != " + $3);
|
||||
}
|
||||
| exp '+' exp { $$ = new Integer ($1.intValue () + $3.intValue ()); }
|
||||
| exp '-' exp { $$ = new Integer ($1.intValue () - $3.intValue ()); }
|
||||
| exp '*' exp { $$ = new Integer ($1.intValue () * $3.intValue ()); }
|
||||
| exp '/' exp { $$ = new Integer ($1.intValue () / $3.intValue ()); }
|
||||
| '-' exp %prec NEG { $$ = new Integer (-$2.intValue ()); }
|
||||
| exp '^' exp { $$ = new Integer ((int)
|
||||
Math.pow ($1.intValue (),
|
||||
$3.intValue ())); }
|
||||
| '(' exp ')' { $$ = $2; }
|
||||
| '(' error ')' { $$ = new Integer (1111); }
|
||||
| '!' { $$ = new Integer (0); return YYERROR; }
|
||||
| '-' error { $$ = new Integer (0); return YYERROR; }
|
||||
;
|
||||
%%
|
||||
|
||||
class Position {
|
||||
public int line;
|
||||
|
||||
public Position ()
|
||||
{
|
||||
line = 0;
|
||||
}
|
||||
|
||||
public Position (int l)
|
||||
{
|
||||
line = l;
|
||||
}
|
||||
|
||||
public long getHashCode ()
|
||||
{
|
||||
return line;
|
||||
}
|
||||
|
||||
public boolean equals (Position l)
|
||||
{
|
||||
return l.line == line;
|
||||
}
|
||||
|
||||
public String toString ()
|
||||
{
|
||||
return Integer.toString (line);
|
||||
}
|
||||
|
||||
public int lineno ()
|
||||
{
|
||||
return line;
|
||||
}
|
||||
}
|
||||
|
||||
]$5
|
||||
])
|
||||
])# _AT_DATA_JAVA_CALC_Y
|
||||
|
||||
|
||||
# AT_DATA_CALC_Y([BISON-OPTIONS], [BISON-EPILOGUE])
|
||||
# -------------------------------------------------
|
||||
# Produce `calc.y'.
|
||||
m4_define([AT_DATA_JAVA_CALC_Y],
|
||||
[_AT_DATA_JAVA_CALC_Y($[1], $[2], $[3], [$1], [$2])
|
||||
])
|
||||
|
||||
|
||||
|
||||
# AT_JAVA_COMPILE(SOURCE)
|
||||
# -----------------------
|
||||
# Compile SOURCES into Java class files. Skip the test if java or javac is
|
||||
# not installed.
|
||||
m4_define([AT_JAVA_COMPILE],
|
||||
[AT_CHECK([test -n "$CONF_JAVA$CONF_JAVAC" || exit 77])
|
||||
AT_CHECK([$SHELL ../../../javacomp.sh $1],
|
||||
0, [ignore], [ignore])])
|
||||
|
||||
|
||||
# AT_JAVA_PARSER_CHECK(COMMAND, EXIT-STATUS, EXPOUT, EXPERR, [PRE])
|
||||
# -----------------------------------------------------------------
|
||||
m4_define([AT_JAVA_PARSER_CHECK],
|
||||
[AT_CHECK([$5 $SHELL ../../../javaexec.sh $1], [$2], [$3], [$4])])
|
||||
|
||||
|
||||
# _AT_CHECK_JAVA_CALC_ERROR(BISON-OPTIONS, INPUT,
|
||||
# [VERBOSE-AND-LOCATED-ERROR-MESSAGE])
|
||||
# ---------------------------------------------------------
|
||||
# Run `calc' on INPUT, and expect a `syntax error' message.
|
||||
#
|
||||
# If INPUT starts with a slash, it is used as absolute input file name,
|
||||
# otherwise as contents.
|
||||
#
|
||||
# The VERBOSE-AND-LOCATED-ERROR-MESSAGE is stripped of locations
|
||||
# and expected tokens if necessary, and compared with the output.
|
||||
m4_define([_AT_CHECK_JAVA_CALC_ERROR],
|
||||
[m4_bmatch([$2], [^/],
|
||||
[AT_JAVA_PARSER_CHECK([Calc < $2], 0, [], [stderr])],
|
||||
[AT_DATA([[input]],
|
||||
[[$2
|
||||
]])
|
||||
AT_JAVA_PARSER_CHECK([Calc < input], 0, [], [stderr])])
|
||||
|
||||
# Normalize the observed and expected error messages, depending upon the
|
||||
# options.
|
||||
# 1. Create the reference error message.
|
||||
AT_DATA([[expout]],
|
||||
[$3
|
||||
])
|
||||
# 2. If locations are not used, remove them.
|
||||
AT_YYERROR_SEES_LOC_IF([],
|
||||
[[sed 's/^[-0-9.]*: //' expout >at-expout
|
||||
mv at-expout expout]])
|
||||
# 3. If error-verbose is not used, strip the`, unexpected....' part.
|
||||
m4_bmatch([$1], [%error-verbose], [],
|
||||
[[sed 's/syntax error, .*$/syntax error/' expout >at-expout
|
||||
mv at-expout expout]])
|
||||
# 4. Check
|
||||
AT_CHECK([cat stderr], 0, [expout])
|
||||
])
|
||||
|
||||
# _AT_CHECK_JAVA_CALC([BISON-DIRECTIVES], [BISON-CODE], [BISON-EPILOGUE])
|
||||
# -----------------------------------------------------------------------
|
||||
# Start a testing chunk which compiles `calc' grammar with
|
||||
# BISON-DIRECTIVES, and performs several tests over the parser.
|
||||
m4_define([_AT_CHECK_JAVA_CALC],
|
||||
[# We use integers to avoid dependencies upon the precision of doubles.
|
||||
AT_SETUP([Calculator $1])
|
||||
|
||||
AT_BISON_OPTION_PUSHDEFS([$1])
|
||||
|
||||
AT_DATA_JAVA_CALC_Y([$1
|
||||
%code {
|
||||
$2
|
||||
}], [$3])
|
||||
|
||||
AT_CHECK([bison -o Calc.java Calc.y])
|
||||
AT_JAVA_COMPILE([Calc.java])
|
||||
|
||||
# Test the priorities.
|
||||
AT_DATA([[input]],
|
||||
[[1 + 2 * 3 = 7
|
||||
1 + 2 * -3 = -5
|
||||
|
||||
-1^2 = -1
|
||||
(-1)^2 = 1
|
||||
|
||||
---1 = -1
|
||||
|
||||
1 - 2 - 3 = -4
|
||||
1 - (2 - 3) = 2
|
||||
|
||||
2^2^3 = 256
|
||||
(2^2)^3 = 64
|
||||
]])
|
||||
AT_JAVA_PARSER_CHECK([Calc < input], 0, [], [stderr])
|
||||
|
||||
|
||||
# Some syntax errors.
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [0 0],
|
||||
[1: syntax error, unexpected number])
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [1//2],
|
||||
[1: syntax error, unexpected '/', expecting number or '-' or '(' or '!'])
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [error],
|
||||
[1: syntax error, unexpected $undefined])
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [1 = 2 = 3],
|
||||
[1: syntax error, unexpected '='])
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [
|
||||
+1],
|
||||
[2: syntax error, unexpected '+'])
|
||||
# Exercise error messages with EOF: work on an empty file.
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [/dev/null],
|
||||
[1: syntax error, unexpected end of input])
|
||||
|
||||
# Exercise the error token: without it, we die at the first error,
|
||||
# hence be sure to
|
||||
#
|
||||
# - have several errors which exercise different shift/discardings
|
||||
# - (): nothing to pop, nothing to discard
|
||||
# - (1 + 1 + 1 +): a lot to pop, nothing to discard
|
||||
# - (* * *): nothing to pop, a lot to discard
|
||||
# - (1 + 2 * *): some to pop and discard
|
||||
#
|
||||
# - test the action associated to `error'
|
||||
#
|
||||
# - check the lookahead that triggers an error is not discarded
|
||||
# when we enter error recovery. Below, the lookahead causing the
|
||||
# first error is ")", which is needed to recover from the error and
|
||||
# produce the "0" that triggers the "0 != 1" error.
|
||||
#
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1],
|
||||
[() + (1 + 1 + 1 +) + (* * *) + (1 * 2 * *) = 1],
|
||||
[1: syntax error, unexpected ')', expecting number or '-' or '(' or '!'
|
||||
1: syntax error, unexpected ')', expecting number or '-' or '(' or '!'
|
||||
1: syntax error, unexpected '*', expecting number or '-' or '(' or '!'
|
||||
1: syntax error, unexpected '*', expecting number or '-' or '(' or '!'
|
||||
calc: error: 4444 != 1])
|
||||
|
||||
# The same, but this time exercising explicitly triggered syntax errors.
|
||||
# POSIX says the lookahead causing the error should not be discarded.
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [(!) + (0 0) = 1],
|
||||
[1: syntax error, unexpected number
|
||||
calc: error: 2222 != 1])
|
||||
_AT_CHECK_JAVA_CALC_ERROR([$1], [(- *) + (0 0) = 1],
|
||||
[1: syntax error, unexpected '*', expecting number or '-' or '(' or '!'
|
||||
1: syntax error, unexpected number
|
||||
calc: error: 2222 != 1])
|
||||
AT_BISON_OPTION_POPDEFS
|
||||
|
||||
AT_CLEANUP
|
||||
])# _AT_CHECK_JAVA_CALC
|
||||
|
||||
|
||||
# AT_CHECK_JAVA_CALC([BISON-DIRECTIVES], [BISON-EPILOGUE])
|
||||
# --------------------------------------------------------
|
||||
# Start a testing chunk which compiles `calc' grammar with
|
||||
# BISON-DIRECTIVES, and performs several tests over the parser.
|
||||
# Run the test with and without %error-verbose.
|
||||
m4_define([AT_CHECK_JAVA_CALC],
|
||||
[_AT_CHECK_JAVA_CALC([$1], [$2], [$3])
|
||||
_AT_CHECK_JAVA_CALC([%error-verbose $1], [$2], [$3])
|
||||
])# AT_CHECK_JAVA_CALC
|
||||
|
||||
|
||||
# ------------------------ #
|
||||
# Simple LALR Calculator. #
|
||||
# ------------------------ #
|
||||
|
||||
dnl AT_CHECK_JAVA_CALC([], [])
|
||||
|
||||
AT_CHECK_JAVA_CALC([%define single_class %locations], [[
|
||||
StreamTokenizer st;
|
||||
|
||||
public Calc (InputStream is)
|
||||
{
|
||||
Reader r = new InputStreamReader (is);
|
||||
st = new StreamTokenizer(r);
|
||||
st.resetSyntax ();
|
||||
st.eolIsSignificant (true);
|
||||
st.whitespaceChars (9, 9);
|
||||
st.whitespaceChars (32, 32);
|
||||
st.wordChars (48, 57);
|
||||
|
||||
yyendpos = new Position (1);
|
||||
}
|
||||
|
||||
public int yylex () throws IOException {
|
||||
int ttype = st.nextToken ();
|
||||
yystartpos = yyendpos;
|
||||
if (ttype == st.TT_EOF)
|
||||
return EOF;
|
||||
|
||||
else if (ttype == st.TT_EOL)
|
||||
{
|
||||
yyendpos = new Position (yyendpos.lineno () + 1);
|
||||
return (int) '\n';
|
||||
}
|
||||
|
||||
else if (ttype == st.TT_WORD)
|
||||
{
|
||||
yylval = new Integer (st.sval);
|
||||
return NUM;
|
||||
}
|
||||
|
||||
else
|
||||
return st.ttype;
|
||||
}
|
||||
|
||||
public void yyerror (Location l, String s)
|
||||
{
|
||||
if (l == null)
|
||||
System.err.println (s);
|
||||
else
|
||||
System.err.println (l.begin + ": " + s);
|
||||
}
|
||||
|
||||
public static void main (String args[]) throws IOException
|
||||
{
|
||||
new Calc (System.in).parse ();
|
||||
}
|
||||
]])
|
||||
|
||||
AT_CHECK_JAVA_CALC([%pure-parser], [[
|
||||
public static void main (String args[]) throws IOException
|
||||
{
|
||||
CalcLexer l = new CalcLexer (System.in);
|
||||
Calc p = new Calc (l);
|
||||
p.parse ();
|
||||
}
|
||||
]], [[
|
||||
class CalcLexer implements Calc.Lexer {
|
||||
Integer yylval;
|
||||
|
||||
StreamTokenizer st;
|
||||
|
||||
public Object getLVal ()
|
||||
{
|
||||
return yylval;
|
||||
}
|
||||
|
||||
public CalcLexer (InputStream is)
|
||||
{
|
||||
Reader r = new InputStreamReader (is);
|
||||
st = new StreamTokenizer(r);
|
||||
st.resetSyntax ();
|
||||
st.eolIsSignificant (true);
|
||||
st.whitespaceChars (9, 9);
|
||||
st.whitespaceChars (32, 32);
|
||||
st.wordChars (48, 57);
|
||||
}
|
||||
|
||||
public int yylex () throws IOException {
|
||||
int ttype = st.nextToken ();
|
||||
if (ttype == st.TT_EOF)
|
||||
return Calc.EOF;
|
||||
|
||||
else if (ttype == st.TT_EOL)
|
||||
return (int) '\n';
|
||||
|
||||
else if (ttype == st.TT_WORD)
|
||||
{
|
||||
yylval = new Integer (st.sval);
|
||||
return Calc.NUM;
|
||||
}
|
||||
|
||||
else
|
||||
return st.ttype;
|
||||
}
|
||||
|
||||
|
||||
public void yyerror (String s)
|
||||
{
|
||||
System.err.println (s);
|
||||
}
|
||||
}
|
||||
]])
|
||||
|
||||
dnl AT_CHECK_JAVA_CALC([%pure-parser %locations], [])
|
||||
Reference in New Issue
Block a user