Commit 0284c161 authored by POTTIER Francois's avatar POTTIER Francois
Browse files

Re-generated expected output. The only differences are in the white space.

parent 90ddced9
......@@ -231,7 +231,6 @@ let string_of_constant c =
%token <Annotation.t> XMLtag_close
%token <Annotation.t * string> XMLtext
%token <Annotation.t> XMLwhitespace
%type <string AST.program> program
%%
......
......@@ -233,20 +233,20 @@ Warning: symbol integer_list is unreachable from any of the start symbol(s).
%token UPDATE_SUFFIX
%token UPSERT_WITH
%token UPSERT_WITH_BEFORE
%right RARROW
%right LRARROW
%right ELSE IF THEN
%right CASE OF
%right CONCAT
%left OR
%left AND
%left EQ GEQ GT LEQ LT NEQ
%left MINUS PLUS
%left DIVIDE MODULO TIMES
%left ANNOTATE
%right NEG NOT
%left COLON
%nonassoc UMINUS
%right RARROW
%right LRARROW
%right ELSE IF THEN
%right CASE OF
%right CONCAT
%left OR
%left AND
%left EQ GEQ GT LEQ LT NEQ
%left MINUS PLUS
%left DIVIDE MODULO TIMES
%left ANNOTATE
%right NEG NOT
%left COLON
%nonassoc UMINUS
%type <K3.AST.expr_t> expr
%type <K3.AST.program_test_t> expression_test
%type <K3.AST.program_t> program
......
......@@ -214,27 +214,27 @@ let predicate_of_expression (info:info) (e:expression): expression =
%token <int> UIDENTIFIER
%token UMINUS
%token USCORE
%nonassoc KWghost LOWEST_PREC
%nonassoc ASSIGN
%nonassoc KWall KWsome
%right SEMICOL
%right ARROW
%right COMMA
%left COLON
%right DARROW
%left KWand KWor
%nonassoc EQ EQV GE GT KWas KWin LE LT NEQ NEQV NOTIN
%left BAR DBAR
%left MINUS PLUS
%left DIVIDE TIMES
%right CARET DCOLON
%left OPERATOR
%right ROPERATOR
%nonassoc KWnot KWold QMARK
%left DOT
%nonassoc LBRACE LBRACKET LPAREN
%nonassoc UMINUS
%nonassoc HIGHEST_PREC KWdeferred
%nonassoc KWghost LOWEST_PREC
%nonassoc ASSIGN
%nonassoc KWall KWsome
%right SEMICOL
%right ARROW
%right COMMA
%left COLON
%right DARROW
%left KWand KWor
%nonassoc EQ EQV GE GT KWas KWin LE LT NEQ NEQV NOTIN
%left BAR DBAR
%left MINUS PLUS
%left DIVIDE TIMES
%right CARET DCOLON
%left OPERATOR
%right ROPERATOR
%nonassoc KWnot KWold QMARK
%left DOT
%nonassoc LBRACE LBRACKET LPAREN
%nonassoc UMINUS
%nonassoc HIGHEST_PREC KWdeferred
%type <Support.module_declaration> file
%type <Support.use_block> use_block_opt
%%
......
......@@ -10,7 +10,7 @@ open Syntax.Raw
%token FAIL
%token PLUS
%token <string> VAR
%left PLUS
%left PLUS
%type <Syntax.Raw.declarations> declarations
%%
......
......@@ -30,7 +30,6 @@ open Mm.Raw
%token RSQUARE
%token VAL
%token WILDCARD
%type <Mm.Raw.expression> toplevel
%%
......
......@@ -27,7 +27,6 @@ open Fsub.Raw
%token TTOP
%token <string> UCID
%token USCORE
%type <Fsub.Raw.toplevel> toplevel
%%
......
......@@ -51,7 +51,6 @@ open Syntax
%token TYPE
%token <Lexing.position * Lexing.position * string> UID
%token WITH
%type <string * Syntax.declaration list> phrase
%%
......
......@@ -155,43 +155,43 @@ let rec ty_app ts t =
%token TYPEQ
%token UNDERSCORE
%token USE
%right DOT
%left INFIXL1
%right INFIXR1
%nonassoc INFIXN1
%right ARROW DARROW
%left LARROW
%nonassoc SLASH
%nonassoc BAR
%left INFIXL2
%right INFIXR2
%nonassoc INFIXN2
%right SEMI
%left INFIXL3
%right INFIXR3
%nonassoc INFIXN3
%right COMMA
%left INFIXL4
%right INFIXR4
%nonassoc INFIXN4
%nonassoc EQ HASH IS
%left INFIXL5
%right INFIXR5
%nonassoc INFIXN5
%left INFIXL6
%right INFIXR6
%nonassoc INFIXN6
%right CONS
%left INFIXL7
%right INFIXR7
%nonassoc INFIXN7
%left INFIXL8
%right INFIXR8
%nonassoc INFIXN8
%left INFIXL9
%right INFIXR9
%nonassoc INFIXN9
%right BACKSLASH
%right DOT
%left INFIXL1
%right INFIXR1
%nonassoc INFIXN1
%right ARROW DARROW
%left LARROW
%nonassoc SLASH
%nonassoc BAR
%left INFIXL2
%right INFIXR2
%nonassoc INFIXN2
%right SEMI
%left INFIXL3
%right INFIXR3
%nonassoc INFIXN3
%right COMMA
%left INFIXL4
%right INFIXR4
%nonassoc INFIXN4
%nonassoc EQ HASH IS
%left INFIXL5
%right INFIXR5
%nonassoc INFIXN5
%left INFIXL6
%right INFIXR6
%nonassoc INFIXN6
%right CONS
%left INFIXL7
%right INFIXR7
%nonassoc INFIXN7
%left INFIXL8
%right INFIXR8
%nonassoc INFIXN8
%left INFIXL9
%right INFIXR9
%nonassoc INFIXN9
%right BACKSLASH
%type <Absyn.decl list> parse
%type <Absyn.decl list> parse_input_line
%%
......
......@@ -28,7 +28,6 @@
%token Lsemi
%token <Io_types.pos * string> Lstring
%token <Io_types.pos> Lvariable
%type <Io_types.io_ast> parse_io_module
%%
......
......@@ -6,7 +6,6 @@ recommend switching on --infer in order to avoid obscure type error messages.
%token <int> C
%token <int> D
%token <int> EOF
%type <int> phrase
%%
......
......@@ -8,7 +8,6 @@ recommend switching on --infer in order to avoid obscure type error messages.
%token <int> C
%token <int> D
%token <int> EOF
%type <unit> other
%type <(int, int) either> phrase
%%
......
......@@ -7,7 +7,6 @@ recommend switching on --infer in order to avoid obscure type error messages.
%token <int> C
%token <int> D
%token <int> EOF
%type <(int, int) either> phrase
%%
......
......@@ -6,7 +6,6 @@ recommend switching on --infer in order to avoid obscure type error messages.
%token <int> C
%token <int> D
%token <int> EOF
%type <int list> phrase
%%
......
......@@ -31,7 +31,6 @@
%token TILDE
%token TYPE
%token < string > UIDENT
%type < Atd_ast.full_module > full_module
%%
......
......@@ -109,7 +109,7 @@ let rec addbinders tyT l = match l with
%token <string Support.Error.withinfo> UCID
%token <Support.Error.info> USCORE
%token <Support.Error.info> VBAR
%right COMMA
%right COMMA
%type < Syntax.context -> (Syntax.command list * Syntax.context) > toplevel
%%
......
......@@ -88,11 +88,11 @@ let seq e1 e2 =
%token UNIT
%token WILD
%token WITH
%left EQUAL INFIXOP0
%right INFIXOP1
%left INFIXOP2
%left INFIXOP3
%right INFIXOP4
%left EQUAL INFIXOP0
%right INFIXOP1
%left INFIXOP2
%left INFIXOP3
%right INFIXOP4
%type <MiniPrimitives.t Sig.binding list> program
%%
......
......@@ -12,7 +12,6 @@ recommend switching on --infer in order to avoid obscure type error messages.
%token LPARENT
%token RPARENT
%token <string> VARIABLE
%type <Prolog.clause list> clauses
%%
......
......@@ -4,8 +4,8 @@
%token EOF
%token LOG
%token SIZE
%nonassoc BANG
%nonassoc below_NUM
%nonassoc BANG
%nonassoc below_NUM
%type <unit> desc
%%
......
......@@ -19,7 +19,6 @@ Warning: the token Tlbrace is unused.
%token Trbrace
%token Tsharp
%token <string> Tstring
%type <Bibtex.command> command
%type <Bibtex.biblio> command_list
%%
......
......@@ -2,7 +2,6 @@
%token COLON
%token COMMA
%token ID
%type <unit> def
%%
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment