-/*\r
- * Mesa 3-D graphics library\r
- * Version: 6.5\r
- *\r
- * Copyright (C) 2004-2006 Brian Paul All Rights Reserved.\r
- *\r
- * Permission is hereby granted, free of charge, to any person obtaining a\r
- * copy of this software and associated documentation files (the "Software"),\r
- * to deal in the Software without restriction, including without limitation\r
- * the rights to use, copy, modify, merge, publish, distribute, sublicense,\r
- * and/or sell copies of the Software, and to permit persons to whom the\r
- * Software is furnished to do so, subject to the following conditions:\r
- *\r
- * The above copyright notice and this permission notice shall be included\r
- * in all copies or substantial portions of the Software.\r
- *\r
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS\r
- * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\r
- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL\r
- * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN\r
- * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN\r
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
- */\r
-\r
-/*\r
- * \file slang_shader.syn\r
- * slang vertex/fragment shader syntax\r
- * \author Michal Krol\r
- */\r
-\r
-/*\r
- * usage:\r
- * syn2c slang_shader.syn > slang_shader_syn.h\r
- *\r
- * when modifying or extending this file, several things must be taken into consideration:\r
- * - when adding new operators that were marked as reserved in the initial specification,\r
- * one must only uncomment particular lines of code that refer to operators being added;\r
- * - when adding new shader target, one must reserve new value for shader_type register and\r
- * use it in .if constructs for symbols that are exclusive for that shader;\r
- * - some symbols mimic output of other symbols - the best example is the "for" construct:\r
- * expression "for (foo(); ; bar())" is seen as "for (foo(); true; bar())" by the output\r
- * processor - hence, special care must be taken when rearranging output of essential symbols;\r
- * - order of single-quoted tokens does matter in alternatives - so do not parse "<" operator\r
- * before "<<" and "<<" before "<<=";\r
- * - all double-quoted tokens are internally preprocessed to eliminate problems with parsing\r
- * strings that are prefixes of other strings, like "sampler1D" and "sampler1DShadow";\r
- */\r
-\r
-.syntax translation_unit;\r
-\r
-/* revision number - increment after each change affecting emitted output */\r
-.emtcode REVISION 3\r
-\r
-/* external declaration */\r
-.emtcode EXTERNAL_NULL 0\r
-.emtcode EXTERNAL_FUNCTION_DEFINITION 1\r
-.emtcode EXTERNAL_DECLARATION 2\r
-\r
-/* declaration */\r
-.emtcode DECLARATION_FUNCTION_PROTOTYPE 1\r
-.emtcode DECLARATION_INIT_DECLARATOR_LIST 2\r
-\r
-/* function type */\r
-.emtcode FUNCTION_ORDINARY 0\r
-.emtcode FUNCTION_CONSTRUCTOR 1\r
-.emtcode FUNCTION_OPERATOR 2\r
-\r
-/* operator type */\r
-.emtcode OPERATOR_ADDASSIGN 1\r
-.emtcode OPERATOR_SUBASSIGN 2\r
-.emtcode OPERATOR_MULASSIGN 3\r
-.emtcode OPERATOR_DIVASSIGN 4\r
-/*.emtcode OPERATOR_MODASSIGN 5*/\r
-/*.emtcode OPERATOR_LSHASSIGN 6*/\r
-/*.emtcode OPERATOR_RSHASSIGN 7*/\r
-/*.emtcode OPERATOR_ORASSIGN 8*/\r
-/*.emtcode OPERATOR_XORASSIGN 9*/\r
-/*.emtcode OPERATOR_ANDASSIGN 10*/\r
-.emtcode OPERATOR_LOGICALXOR 11\r
-/*.emtcode OPERATOR_BITOR 12*/\r
-/*.emtcode OPERATOR_BITXOR 13*/\r
-/*.emtcode OPERATOR_BITAND 14*/\r
-.emtcode OPERATOR_LESS 15\r
-.emtcode OPERATOR_GREATER 16\r
-.emtcode OPERATOR_LESSEQUAL 17\r
-.emtcode OPERATOR_GREATEREQUAL 18\r
-/*.emtcode OPERATOR_LSHIFT 19*/\r
-/*.emtcode OPERATOR_RSHIFT 20*/\r
-.emtcode OPERATOR_MULTIPLY 21\r
-.emtcode OPERATOR_DIVIDE 22\r
-/*.emtcode OPERATOR_MODULUS 23*/\r
-.emtcode OPERATOR_INCREMENT 24\r
-.emtcode OPERATOR_DECREMENT 25\r
-.emtcode OPERATOR_PLUS 26\r
-.emtcode OPERATOR_MINUS 27\r
-/*.emtcode OPERATOR_COMPLEMENT 28*/\r
-.emtcode OPERATOR_NOT 29\r
-\r
-/* init declarator list */\r
-.emtcode DECLARATOR_NONE 0\r
-.emtcode DECLARATOR_NEXT 1\r
-\r
-/* variable declaration */\r
-.emtcode VARIABLE_NONE 0\r
-.emtcode VARIABLE_IDENTIFIER 1\r
-.emtcode VARIABLE_INITIALIZER 2\r
-.emtcode VARIABLE_ARRAY_EXPLICIT 3\r
-.emtcode VARIABLE_ARRAY_UNKNOWN 4\r
-\r
-/* type qualifier */\r
-.emtcode TYPE_QUALIFIER_NONE 0\r
-.emtcode TYPE_QUALIFIER_CONST 1\r
-.emtcode TYPE_QUALIFIER_ATTRIBUTE 2\r
-.emtcode TYPE_QUALIFIER_VARYING 3\r
-.emtcode TYPE_QUALIFIER_UNIFORM 4\r
-.emtcode TYPE_QUALIFIER_FIXEDOUTPUT 5\r
-.emtcode TYPE_QUALIFIER_FIXEDINPUT 6\r
-\r
-/* type specifier */\r
-.emtcode TYPE_SPECIFIER_VOID 0\r
-.emtcode TYPE_SPECIFIER_BOOL 1\r
-.emtcode TYPE_SPECIFIER_BVEC2 2\r
-.emtcode TYPE_SPECIFIER_BVEC3 3\r
-.emtcode TYPE_SPECIFIER_BVEC4 4\r
-.emtcode TYPE_SPECIFIER_INT 5\r
-.emtcode TYPE_SPECIFIER_IVEC2 6\r
-.emtcode TYPE_SPECIFIER_IVEC3 7\r
-.emtcode TYPE_SPECIFIER_IVEC4 8\r
-.emtcode TYPE_SPECIFIER_FLOAT 9\r
-.emtcode TYPE_SPECIFIER_VEC2 10\r
-.emtcode TYPE_SPECIFIER_VEC3 11\r
-.emtcode TYPE_SPECIFIER_VEC4 12\r
-.emtcode TYPE_SPECIFIER_MAT2 13\r
-.emtcode TYPE_SPECIFIER_MAT3 14\r
-.emtcode TYPE_SPECIFIER_MAT4 15\r
-.emtcode TYPE_SPECIFIER_SAMPLER1D 16\r
-.emtcode TYPE_SPECIFIER_SAMPLER2D 17\r
-.emtcode TYPE_SPECIFIER_SAMPLER3D 18\r
-.emtcode TYPE_SPECIFIER_SAMPLERCUBE 19\r
-.emtcode TYPE_SPECIFIER_SAMPLER1DSHADOW 20\r
-.emtcode TYPE_SPECIFIER_SAMPLER2DSHADOW 21\r
-.emtcode TYPE_SPECIFIER_STRUCT 22\r
-.emtcode TYPE_SPECIFIER_TYPENAME 23\r
-\r
-/* structure field */\r
-.emtcode FIELD_NONE 0\r
-.emtcode FIELD_NEXT 1\r
-.emtcode FIELD_ARRAY 2\r
-\r
-/* operation */\r
-.emtcode OP_END 0\r
-.emtcode OP_BLOCK_BEGIN_NO_NEW_SCOPE 1\r
-.emtcode OP_BLOCK_BEGIN_NEW_SCOPE 2\r
-.emtcode OP_DECLARE 3\r
-.emtcode OP_ASM 4\r
-.emtcode OP_BREAK 5\r
-.emtcode OP_CONTINUE 6\r
-.emtcode OP_DISCARD 7\r
-.emtcode OP_RETURN 8\r
-.emtcode OP_EXPRESSION 9\r
-.emtcode OP_IF 10\r
-.emtcode OP_WHILE 11\r
-.emtcode OP_DO 12\r
-.emtcode OP_FOR 13\r
-.emtcode OP_PUSH_VOID 14\r
-.emtcode OP_PUSH_BOOL 15\r
-.emtcode OP_PUSH_INT 16\r
-.emtcode OP_PUSH_FLOAT 17\r
-.emtcode OP_PUSH_IDENTIFIER 18\r
-.emtcode OP_SEQUENCE 19\r
-.emtcode OP_ASSIGN 20\r
-.emtcode OP_ADDASSIGN 21\r
-.emtcode OP_SUBASSIGN 22\r
-.emtcode OP_MULASSIGN 23\r
-.emtcode OP_DIVASSIGN 24\r
-/*.emtcode OP_MODASSIGN 25*/\r
-/*.emtcode OP_LSHASSIGN 26*/\r
-/*.emtcode OP_RSHASSIGN 27*/\r
-/*.emtcode OP_ORASSIGN 28*/\r
-/*.emtcode OP_XORASSIGN 29*/\r
-/*.emtcode OP_ANDASSIGN 30*/\r
-.emtcode OP_SELECT 31\r
-.emtcode OP_LOGICALOR 32\r
-.emtcode OP_LOGICALXOR 33\r
-.emtcode OP_LOGICALAND 34\r
-/*.emtcode OP_BITOR 35*/\r
-/*.emtcode OP_BITXOR 36*/\r
-/*.emtcode OP_BITAND 37*/\r
-.emtcode OP_EQUAL 38\r
-.emtcode OP_NOTEQUAL 39\r
-.emtcode OP_LESS 40\r
-.emtcode OP_GREATER 41\r
-.emtcode OP_LESSEQUAL 42\r
-.emtcode OP_GREATEREQUAL 43\r
-/*.emtcode OP_LSHIFT 44*/\r
-/*.emtcode OP_RSHIFT 45*/\r
-.emtcode OP_ADD 46\r
-.emtcode OP_SUBTRACT 47\r
-.emtcode OP_MULTIPLY 48\r
-.emtcode OP_DIVIDE 49\r
-/*.emtcode OP_MODULUS 50*/\r
-.emtcode OP_PREINCREMENT 51\r
-.emtcode OP_PREDECREMENT 52\r
-.emtcode OP_PLUS 53\r
-.emtcode OP_MINUS 54\r
-/*.emtcode OP_COMPLEMENT 55*/\r
-.emtcode OP_NOT 56\r
-.emtcode OP_SUBSCRIPT 57\r
-.emtcode OP_CALL 58\r
-.emtcode OP_FIELD 59\r
-.emtcode OP_POSTINCREMENT 60\r
-.emtcode OP_POSTDECREMENT 61\r
-\r
-/* parameter qualifier */\r
-.emtcode PARAM_QUALIFIER_IN 0\r
-.emtcode PARAM_QUALIFIER_OUT 1\r
-.emtcode PARAM_QUALIFIER_INOUT 2\r
-\r
-/* function parameter */\r
-.emtcode PARAMETER_NONE 0\r
-.emtcode PARAMETER_NEXT 1\r
-\r
-/* function parameter array presence */\r
-.emtcode PARAMETER_ARRAY_NOT_PRESENT 0\r
-.emtcode PARAMETER_ARRAY_PRESENT 1\r
-\r
-.errtext INVALID_EXTERNAL_DECLARATION "error 2001: invalid external declaration"\r
-.errtext INVALID_OPERATOR_OVERRIDE "error 2002: invalid operator override"\r
-.errtext LBRACE_EXPECTED "error 2003: '{' expected but '$err_token$' found"\r
-.errtext LPAREN_EXPECTED "error 2004: '(' expected but '$err_token$' found"\r
-.errtext RPAREN_EXPECTED "error 2005: ')' expected but '$err_token$' found"\r
-\r
-/* tells whether the shader that is being parsed is a built-in shader or not */\r
-/* 0 - normal behaviour */\r
-/* 1 - accepts constructor and operator definitions and __asm statements */\r
-/* the implementation will set it to 1 when compiling internal built-in shaders */\r
-.regbyte parsing_builtin 0\r
-\r
-/* holds the type of the shader being parsed; possible values are listed below */\r
-/* FRAGMENT_SHADER 1 */\r
-/* VERTEX_SHADER 2 */\r
-/* shader type is set by the caller before parsing */\r
-.regbyte shader_type 0\r
-\r
-/*\r
- <variable_identifier> ::= <identifier>\r
-*/\r
-variable_identifier\r
- identifier .emit OP_PUSH_IDENTIFIER;\r
-\r
-/*\r
- <primary_expression> ::= <variable_identifier>\r
- | <intconstant>\r
- | <floatconstant>\r
- | <boolconstant>\r
- | "(" <expression> ")"\r
-*/\r
-primary_expression\r
- floatconstant .or boolconstant .or intconstant .or variable_identifier .or primary_expression_1;\r
-primary_expression_1\r
- lparen .and expression .and rparen;\r
-\r
-/*\r
- <postfix_expression> ::= <primary_expression>\r
- | <postfix_expression> "[" <integer_expression> "]"\r
- | <function_call>\r
- | <postfix_expression> "." <field_selection>\r
- | <postfix_expression> "++"\r
- | <postfix_expression> "--"\r
-*/\r
-postfix_expression\r
- postfix_expression_1 .and .loop postfix_expression_2;\r
-postfix_expression_1\r
- function_call .or primary_expression;\r
-postfix_expression_2\r
- postfix_expression_3 .or postfix_expression_4 .or\r
- plusplus .emit OP_POSTINCREMENT .or\r
- minusminus .emit OP_POSTDECREMENT;\r
-postfix_expression_3\r
- lbracket .and integer_expression .and rbracket .emit OP_SUBSCRIPT;\r
-postfix_expression_4\r
- dot .and field_selection .emit OP_FIELD;\r
-\r
-/*\r
- <integer_expression> ::= <expression>\r
-*/\r
-integer_expression\r
- expression;\r
-\r
-/*\r
- <function_call> ::= <function_call_generic>\r
-*/\r
-function_call\r
- function_call_generic .emit OP_CALL .and .true .emit OP_END;\r
-\r
-/*\r
- <function_call_generic> ::= <function_call_header_with_parameters> ")"\r
- | <function_call_header_no_parameters> ")"\r
-*/\r
-function_call_generic\r
- function_call_generic_1 .or function_call_generic_2;\r
-function_call_generic_1\r
- function_call_header_with_parameters .and rparen .error RPAREN_EXPECTED;\r
-function_call_generic_2\r
- function_call_header_no_parameters .and rparen .error RPAREN_EXPECTED;\r
-\r
-/*\r
- <function_call_header_no_parameters>::= <function_call_header> "void"\r
- | <function_call_header>\r
-*/\r
-function_call_header_no_parameters\r
- function_call_header .and function_call_header_no_parameters_1;\r
-function_call_header_no_parameters_1\r
- "void" .or .true;\r
-\r
-/*\r
- <function_call_header_with_parameters>::= <function_call_header> <assignment_expression>\r
- | <function_call_header_with_parameters> ","\r
- <assignment_expression>\r
-*/\r
-function_call_header_with_parameters\r
- function_call_header .and assignment_expression .and .true .emit OP_END .and\r
- .loop function_call_header_with_parameters_1;\r
-function_call_header_with_parameters_1\r
- comma .and assignment_expression .and .true .emit OP_END;\r
-\r
-/*\r
- <function_call_header> ::= <function_identifier> "("\r
-*/\r
-function_call_header\r
- function_identifier .and lparen;\r
-\r
-/*\r
- <function_identifier> ::= <constructor_identifier>\r
- | <identifier>\r
-\r
-note: <constructor_identifier> has been deleted\r
-*/\r
-function_identifier\r
- identifier;\r
-\r
-/*\r
- <unary_expression> ::= <postfix_expression>\r
- | "++" <unary_expression>\r
- | "--" <unary_expression>\r
- | <unary_operator> <unary_expression>\r
-\r
- <unary_operator> ::= "+"\r
- | "-"\r
- | "!"\r
- | "~" // reserved\r
-*/\r
-unary_expression\r
- postfix_expression .or unary_expression_1 .or unary_expression_2 .or unary_expression_3 .or\r
- unary_expression_4 .or unary_expression_5/* .or unary_expression_6*/;\r
-unary_expression_1\r
- plusplus .and unary_expression .and .true .emit OP_PREINCREMENT;\r
-unary_expression_2\r
- minusminus .and unary_expression .and .true .emit OP_PREDECREMENT;\r
-unary_expression_3\r
- plus .and unary_expression .and .true .emit OP_PLUS;\r
-unary_expression_4\r
- minus .and unary_expression .and .true .emit OP_MINUS;\r
-unary_expression_5\r
- bang .and unary_expression .and .true .emit OP_NOT;\r
-/*unary_expression_6\r
- tilde .and unary_expression .and .true .emit OP_COMPLEMENT;*/\r
-\r
-/*\r
- <multiplicative_expression> ::= <unary_expression>\r
- | <multiplicative_expression> "*" <unary_expression>\r
- | <multiplicative_expression> "/" <unary_expression>\r
- | <multiplicative_expression> "%" <unary_expression> // reserved\r
-*/\r
-multiplicative_expression\r
- unary_expression .and .loop multiplicative_expression_1;\r
-multiplicative_expression_1\r
- multiplicative_expression_2 .or multiplicative_expression_3/* .or multiplicative_expression_4*/;\r
-multiplicative_expression_2\r
- star .and unary_expression .and .true .emit OP_MULTIPLY;\r
-multiplicative_expression_3\r
- slash .and unary_expression .and .true .emit OP_DIVIDE;\r
-/*multiplicative_expression_4\r
- percent .and unary_expression .and .true .emit OP_MODULUS;*/\r
-\r
-/*\r
- <additive_expression> ::= <multiplicative_expression>\r
- | <additive_expression> "+" <multiplicative_expression>\r
- | <additive_expression> "-" <multiplicative_expression>\r
-*/\r
-additive_expression\r
- multiplicative_expression .and .loop additive_expression_1;\r
-additive_expression_1\r
- additive_expression_2 .or additive_expression_3;\r
-additive_expression_2\r
- plus .and multiplicative_expression .and .true .emit OP_ADD;\r
-additive_expression_3\r
- minus .and multiplicative_expression .and .true .emit OP_SUBTRACT;\r
-\r
-/*\r
- <shift_expression> ::= <additive_expression>\r
- | <shift_expression> "<<" <additive_expression> // reserved\r
- | <shift_expression> ">>" <additive_expression> // reserved\r
-*/\r
-shift_expression\r
- additive_expression/* .and .loop shift_expression_1*/;\r
-/*shift_expression_1\r
- shift_expression_2 .or shift_expression_3;*/\r
-/*shift_expression_2\r
- lessless .and additive_expression .and .true .emit OP_LSHIFT;*/\r
-/*shift_expression_3\r
- greatergreater .and additive_expression .and .true .emit OP_RSHIFT;*/\r
-\r
-/*\r
- <relational_expression> ::= <shift_expression>\r
- | <relational_expression> "<" <shift_expression>\r
- | <relational_expression> ">" <shift_expression>\r
- | <relational_expression> "<=" <shift_expression>\r
- | <relational_expression> ">=" <shift_expression>\r
-*/\r
-relational_expression\r
- shift_expression .and .loop relational_expression_1;\r
-relational_expression_1\r
- relational_expression_2 .or relational_expression_3 .or relational_expression_4 .or\r
- relational_expression_5;\r
-relational_expression_2\r
- lessequals .and shift_expression .and .true .emit OP_LESSEQUAL;\r
-relational_expression_3\r
- greaterequals .and shift_expression .and .true .emit OP_GREATEREQUAL;\r
-relational_expression_4\r
- less .and shift_expression .and .true .emit OP_LESS;\r
-relational_expression_5\r
- greater .and shift_expression .and .true .emit OP_GREATER;\r
-\r
-/*\r
- <equality_expression> ::= <relational_expression>\r
- | <equality_expression> "==" <relational_expression>\r
- | <equality_expression> "!=" <relational_expression>\r
-*/\r
-equality_expression\r
- relational_expression .and .loop equality_expression_1;\r
-equality_expression_1\r
- equality_expression_2 .or equality_expression_3;\r
-equality_expression_2\r
- equalsequals .and relational_expression .and .true .emit OP_EQUAL;\r
-equality_expression_3\r
- bangequals .and relational_expression .and .true .emit OP_NOTEQUAL;\r
-\r
-/*\r
- <and_expression> ::= <equality_expression>\r
- | <and_expression> "&" <equality_expression> // reserved\r
-*/\r
-and_expression\r
- equality_expression/* .and .loop and_expression_1*/;\r
-/*and_expression_1\r
- ampersand .and equality_expression .and .true .emit OP_BITAND;*/\r
-\r
-/*\r
- <exclusive_or_expression> ::= <and_expression>\r
- | <exclusive_or_expression> "^" <and_expression> // reserved\r
-*/\r
-exclusive_or_expression\r
- and_expression/* .and .loop exclusive_or_expression_1*/;\r
-/*exclusive_or_expression_1\r
- caret .and and_expression .and .true .emit OP_BITXOR;*/\r
-\r
-/*\r
- <inclusive_or_expression> ::= <exclusive_or_expression>\r
- | <inclusive_or_expression> "|" <exclusive_or_expression> // reserved\r
-*/\r
-inclusive_or_expression\r
- exclusive_or_expression/* .and .loop inclusive_or_expression_1*/;\r
-/*inclusive_or_expression_1\r
- bar .and exclusive_or_expression .and .true .emit OP_BITOR;*/\r
-\r
-/*\r
- <logical_and_expression> ::= <inclusive_or_expression>\r
- | <logical_and_expression> "&&" <inclusive_or_expression>\r
-*/\r
-logical_and_expression\r
- inclusive_or_expression .and .loop logical_and_expression_1;\r
-logical_and_expression_1\r
- ampersandampersand .and inclusive_or_expression .and .true .emit OP_LOGICALAND;\r
-\r
-/*\r
- <logical_xor_expression> ::= <logical_and_expression>\r
- | <logical_xor_expression> "^^" <logical_and_expression>\r
-*/\r
-logical_xor_expression\r
- logical_and_expression .and .loop logical_xor_expression_1;\r
-logical_xor_expression_1\r
- caretcaret .and logical_and_expression .and .true .emit OP_LOGICALXOR;\r
-\r
-/*\r
- <logical_or_expression> ::= <logical_xor_expression>\r
- | <logical_or_expression> "||" <logical_xor_expression>\r
-*/\r
-logical_or_expression\r
- logical_xor_expression .and .loop logical_or_expression_1;\r
-logical_or_expression_1\r
- barbar .and logical_xor_expression .and .true .emit OP_LOGICALOR;\r
-\r
-/*\r
- <conditional_expression> ::= <logical_or_expression>\r
- | <logical_or_expression> "?" <expression> ":"\r
- <conditional_expression>\r
-*/\r
-conditional_expression\r
- logical_or_expression .and .loop conditional_expression_1;\r
-conditional_expression_1\r
- question .and expression .and colon .and conditional_expression .and .true .emit OP_SELECT;\r
-\r
-/*\r
- <assignment_expression> ::= <conditional_expression>\r
- | <unary_expression> <assignment_operator>\r
- <assignment_expression>\r
-\r
- <assignment_operator> ::= "="\r
- | "*="\r
- | "/="\r
- | "+="\r
- | "-="\r
- | "%=" // reserved\r
- | "<<=" // reserved\r
- | ">>=" // reserved\r
- | "&=" // reserved\r
- | "^=" // reserved\r
- | "|=" // reserved\r
-*/\r
-assignment_expression\r
- assignment_expression_1 .or assignment_expression_2 .or assignment_expression_3 .or\r
- assignment_expression_4 .or assignment_expression_5/* .or assignment_expression_6 .or\r
- assignment_expression_7 .or assignment_expression_8 .or assignment_expression_9 .or\r
- assignment_expression_10 .or assignment_expression_11*/ .or conditional_expression;\r
-assignment_expression_1\r
- unary_expression .and equals .and assignment_expression .and .true .emit OP_ASSIGN;\r
-assignment_expression_2\r
- unary_expression .and starequals .and assignment_expression .and .true .emit OP_MULASSIGN;\r
-assignment_expression_3\r
- unary_expression .and slashequals .and assignment_expression .and .true .emit OP_DIVASSIGN;\r
-assignment_expression_4\r
- unary_expression .and plusequals .and assignment_expression .and .true .emit OP_ADDASSIGN;\r
-assignment_expression_5\r
- unary_expression .and minusequals .and assignment_expression .and .true .emit OP_SUBASSIGN;\r
-/*assignment_expression_6\r
- unary_expression .and percentequals .and assignment_expression .and .true .emit OP_MODASSIGN;*/\r
-/*assignment_expression_7\r
- unary_expression .and lesslessequals .and assignment_expression .and .true .emit OP_LSHASSIGN;*/\r
-/*assignment_expression_8\r
- unary_expression .and greatergreaterequals .and assignment_expression .and\r
- .true .emit OP_RSHASSIGN;*/\r
-/*assignment_expression_9\r
- unary_expression .and ampersandequals .and assignment_expression .and .true .emit OP_ANDASSIGN;*/\r
-/*assignment_expression_10\r
- unary_expression .and caretequals .and assignment_expression .and .true .emit OP_XORASSIGN;*/\r
-/*assignment_expression_11\r
- unary_expression .and barequals .and assignment_expression .and .true .emit OP_ORASSIGN;*/\r
-\r
-/*\r
- <expression> ::= <assignment_expression>\r
- | <expression> "," <assignment_expression>\r
-*/\r
-expression\r
- assignment_expression .and .loop expression_1;\r
-expression_1\r
- comma .and assignment_expression .and .true .emit OP_SEQUENCE;\r
-\r
-/*\r
- <constant_expression> ::= <conditional_expression>\r
-*/\r
-constant_expression\r
- conditional_expression .and .true .emit OP_END;\r
-\r
-/*\r
- <declaration> ::= <function_prototype> ";"\r
- | <init_declarator_list> ";"\r
-*/\r
-declaration\r
- declaration_1 .or declaration_2;\r
-declaration_1\r
- function_prototype .emit DECLARATION_FUNCTION_PROTOTYPE .and semicolon;\r
-declaration_2\r
- init_declarator_list .emit DECLARATION_INIT_DECLARATOR_LIST .and semicolon;\r
-\r
-/*\r
- <function_prototype> ::= <function_declarator> ")"\r
-*/\r
-function_prototype\r
- function_declarator .and rparen .error RPAREN_EXPECTED .emit PARAMETER_NONE;\r
-\r
-/*\r
- <function_declarator> ::= <function_header>\r
- | <function_header_with_parameters>\r
-*/\r
-function_declarator\r
- function_header_with_parameters .or function_header;\r
-\r
-/*\r
- <function_header_with_parameters> ::= <function_header> <parameter_declaration>\r
- | <function_header_with_parameters> ","\r
- <parameter_declaration>\r
-*/\r
-function_header_with_parameters\r
- function_header .and parameter_declaration .and .loop function_header_with_parameters_1;\r
-function_header_with_parameters_1\r
- comma .and parameter_declaration;\r
-\r
-/*\r
- <function_header> ::= <fully_specified_type> <identifier> "("\r
-*/\r
-function_header\r
- function_header_nospace .or function_header_space;\r
-function_header_space\r
- fully_specified_type_space .and space .and function_decl_identifier .and lparen;\r
-function_header_nospace\r
- fully_specified_type_nospace .and function_decl_identifier .and lparen;\r
-\r
-/*\r
- <function_decl_identifier> ::= "__constructor"\r
- | <__operator>\r
- | <identifier>\r
-\r
-note: this is an extension to the standard language specification - normally slang disallows\r
- operator and constructor prototypes and definitions\r
-*/\r
-function_decl_identifier\r
- .if (parsing_builtin != 0) __operator .emit FUNCTION_OPERATOR .or\r
- .if (parsing_builtin != 0) "__constructor" .emit FUNCTION_CONSTRUCTOR .or\r
- identifier .emit FUNCTION_ORDINARY;\r
-\r
-/*\r
- <__operator> ::= "__operator" <overriden_op>\r
-\r
-note: this is an extension to the standard language specification - normally slang disallows\r
- operator prototypes and definitions\r
-*/\r
-__operator\r
- "__operator" .and overriden_operator .error INVALID_OPERATOR_OVERRIDE;\r
-\r
-/*\r
- <overriden_op> ::= "="\r
- | "+="\r
- | "-="\r
- | "*="\r
- | "/="\r
- | "%=" // reserved\r
- | "<<=" // reserved\r
- | ">>=" // reserved\r
- | "&=" // reserved\r
- | "^=" // reserved\r
- | "|=" // reserved\r
- | "^^"\r
- | "|" // reserved\r
- | "^" // reserved\r
- | "&" // reserved\r
- | "=="\r
- | "!="\r
- | "<"\r
- | ">"\r
- | "<="\r
- | ">="\r
- | "<<" // reserved\r
- | ">>" // reserved\r
- | "*"\r
- | "/"\r
- | "%" // reserved\r
- | "++"\r
- | "--"\r
- | "+"\r
- | "-"\r
- | "~" // reserved\r
- | "!"\r
-\r
-note: this is an extension to the standard language specification - normally slang disallows\r
- operator prototypes and definitions\r
-*/\r
-overriden_operator\r
- plusplus .emit OPERATOR_INCREMENT .or\r
- plusequals .emit OPERATOR_ADDASSIGN .or\r
- plus .emit OPERATOR_PLUS .or\r
- minusminus .emit OPERATOR_DECREMENT .or\r
- minusequals .emit OPERATOR_SUBASSIGN .or\r
- minus .emit OPERATOR_MINUS .or\r
- bang .emit OPERATOR_NOT .or\r
- starequals .emit OPERATOR_MULASSIGN .or\r
- star .emit OPERATOR_MULTIPLY .or\r
- slashequals .emit OPERATOR_DIVASSIGN .or\r
- slash .emit OPERATOR_DIVIDE .or\r
- lessequals .emit OPERATOR_LESSEQUAL .or\r
- /*lesslessequals .emit OPERATOR_LSHASSIGN .or*/\r
- /*lessless .emit OPERATOR_LSHIFT .or*/\r
- less .emit OPERATOR_LESS .or\r
- greaterequals .emit OPERATOR_GREATEREQUAL .or\r
- /*greatergreaterequals .emit OPERATOR_RSHASSIGN .or*/\r
- /*greatergreater .emit OPERATOR_RSHIFT .or*/\r
- greater .emit OPERATOR_GREATER .or\r
- /*percentequals .emit OPERATOR_MODASSIGN .or*/\r
- /*percent .emit OPERATOR_MODULUS .or*/\r
- /*ampersandequals .emit OPERATOR_ANDASSIGN */\r
- /*ampersand .emit OPERATOR_BITAND .or*/\r
- /*barequals .emit OPERATOR_ORASSIGN .or*/\r
- /*bar .emit OPERATOR_BITOR .or*/\r
- /*tilde .emit OPERATOR_COMPLEMENT .or*/\r
- /*caretequals .emit OPERATOR_XORASSIGN .or*/\r
- caretcaret .emit OPERATOR_LOGICALXOR /*.or\r
- caret .emit OPERATOR_BITXOR*/;\r
-\r
-/*\r
- <parameter_declarator> ::= <type_specifier> <identifier>\r
- | <type_specifier> <identifier> "[" <constant_expression>\r
- "]"\r
-*/\r
-parameter_declarator\r
- parameter_declarator_nospace .or parameter_declarator_space;\r
-parameter_declarator_nospace\r
- type_specifier_nospace .and identifier .and parameter_declarator_1;\r
-parameter_declarator_space\r
- type_specifier_space .and space .and identifier .and parameter_declarator_1;\r
-parameter_declarator_1\r
- parameter_declarator_2 .emit PARAMETER_ARRAY_PRESENT .or\r
- .true .emit PARAMETER_ARRAY_NOT_PRESENT;\r
-parameter_declarator_2\r
- lbracket .and constant_expression .and rbracket;\r
-\r
-/*\r
- <parameter_declaration> ::= <type_qualifier> <parameter_qualifier>\r
- <parameter_declarator>\r
- | <type_qualifier> <parameter_qualifier>\r
- <parameter_type_specifier>\r
- | <parameter_qualifier> <parameter_declarator>\r
- | <parameter_qualifier> <parameter_type_specifier>\r
-*/\r
-parameter_declaration\r
- parameter_declaration_1 .emit PARAMETER_NEXT;\r
-parameter_declaration_1\r
- parameter_declaration_2 .or parameter_declaration_3;\r
-parameter_declaration_2\r
- type_qualifier .and space .and parameter_qualifier .and parameter_declaration_4;\r
-parameter_declaration_3\r
- parameter_qualifier .emit TYPE_QUALIFIER_NONE .and parameter_declaration_4;\r
-parameter_declaration_4\r
- parameter_declarator .or parameter_type_specifier;\r
-\r
-/*\r
- <parameter_qualifier> ::= "in"\r
- | "out"\r
- | "inout"\r
- | ""\r
-*/\r
-parameter_qualifier\r
- parameter_qualifier_1 .or .true .emit PARAM_QUALIFIER_IN;\r
-parameter_qualifier_1\r
- parameter_qualifier_2 .and space;\r
-parameter_qualifier_2\r
- "in" .emit PARAM_QUALIFIER_IN .or\r
- "out" .emit PARAM_QUALIFIER_OUT .or\r
- "inout" .emit PARAM_QUALIFIER_INOUT;\r
-\r
-/*\r
- <parameter_type_specifier> ::= <type_specifier>\r
- | <type_specifier> "[" <constant_expression> "]"\r
-*/\r
-parameter_type_specifier\r
- parameter_type_specifier_1 .and .true .emit '\0' .and parameter_type_specifier_2;\r
-parameter_type_specifier_1\r
- type_specifier_nospace .or type_specifier_space;\r
-parameter_type_specifier_2\r
- parameter_type_specifier_3 .emit PARAMETER_ARRAY_PRESENT .or\r
- .true .emit PARAMETER_ARRAY_NOT_PRESENT;\r
-parameter_type_specifier_3\r
- lbracket .and constant_expression .and rbracket;\r
-\r
-/*\r
- <init_declarator_list> ::= <single_declaration>\r
- | <init_declarator_list> "," <identifier>\r
- | <init_declarator_list> "," <identifier> "[" "]"\r
- | <init_declarator_list> "," <identifier> "["\r
- <constant_expression> "]"\r
- | <init_declarator_list> "," <identifier> "="\r
- <initializer>\r
-*/\r
-init_declarator_list\r
- single_declaration .and .loop init_declarator_list_1 .emit DECLARATOR_NEXT .and\r
- .true .emit DECLARATOR_NONE;\r
-init_declarator_list_1\r
- comma .and identifier .emit VARIABLE_IDENTIFIER .and init_declarator_list_2;\r
-init_declarator_list_2\r
- init_declarator_list_3 .or init_declarator_list_4 .or .true .emit VARIABLE_NONE;\r
-init_declarator_list_3\r
- equals .and initializer .emit VARIABLE_INITIALIZER;\r
-init_declarator_list_4\r
- lbracket .and init_declarator_list_5 .and rbracket;\r
-init_declarator_list_5\r
- constant_expression .emit VARIABLE_ARRAY_EXPLICIT .or .true .emit VARIABLE_ARRAY_UNKNOWN;\r
-\r
-/*\r
- <single_declaration> ::= <fully_specified_type>\r
- | <fully_specified_type> <identifier>\r
- | <fully_specified_type> <identifier> "[" "]"\r
- | <fully_specified_type> <identifier> "["\r
- <constant_expression> "]"\r
- | <fully_specified_type> <identifier> "=" <initializer>\r
-*/\r
-single_declaration\r
- single_declaration_nospace .or single_declaration_space;\r
-single_declaration_space\r
- fully_specified_type_space .and single_declaration_space_1;\r
-single_declaration_nospace\r
- fully_specified_type_nospace .and single_declaration_nospace_1;\r
-single_declaration_space_1\r
- single_declaration_space_2 .emit VARIABLE_IDENTIFIER .or .true .emit VARIABLE_NONE;\r
-single_declaration_nospace_1\r
- single_declaration_nospace_2 .emit VARIABLE_IDENTIFIER .or .true .emit VARIABLE_NONE;\r
-single_declaration_space_2\r
- space .and identifier .and single_declaration_3;\r
-single_declaration_nospace_2\r
- identifier .and single_declaration_3;\r
-single_declaration_3\r
- single_declaration_4 .or single_declaration_5 .or .true .emit VARIABLE_NONE;\r
-single_declaration_4\r
- equals .and initializer .emit VARIABLE_INITIALIZER;\r
-single_declaration_5\r
- lbracket .and single_declaration_6 .and rbracket;\r
-single_declaration_6\r
- constant_expression .emit VARIABLE_ARRAY_EXPLICIT .or .true .emit VARIABLE_ARRAY_UNKNOWN;\r
-\r
-/*\r
- <fully_specified_type> ::= <type_specifier>\r
- | <type_qualifier> <type_specifier>\r
-*/\r
-fully_specified_type_space\r
- fully_specified_type_1 .and type_specifier_space;\r
-fully_specified_type_nospace\r
- fully_specified_type_1 .and type_specifier_nospace;\r
-fully_specified_type_1\r
- fully_specified_type_2 .or .true .emit TYPE_QUALIFIER_NONE;\r
-fully_specified_type_2\r
- type_qualifier .and space;\r
-\r
-/*\r
- <type_qualifier> ::= "const"\r
- | "attribute" // Vertex only.\r
- | "varying"\r
- | "uniform"\r
- | "__fixed_output"\r
- | "__fixed_input"\r
-\r
-note: this is an extension to the standard language specification - normally slang disallows\r
- __fixed_output and __fixed_input type qualifiers\r
-*/\r
-type_qualifier\r
- "const" .emit TYPE_QUALIFIER_CONST .or\r
- .if (shader_type == 2) "attribute" .emit TYPE_QUALIFIER_ATTRIBUTE .or\r
- "varying" .emit TYPE_QUALIFIER_VARYING .or\r
- "uniform" .emit TYPE_QUALIFIER_UNIFORM .or\r
- .if (parsing_builtin != 0) "__fixed_output" .emit TYPE_QUALIFIER_FIXEDOUTPUT .or\r
- .if (parsing_builtin != 0) "__fixed_input" .emit TYPE_QUALIFIER_FIXEDINPUT;\r
-\r
-/*\r
- <type_specifier> ::= "void"\r
- | "float"\r
- | "int"\r
- | "bool"\r
- | "vec2"\r
- | "vec3"\r
- | "vec4"\r
- | "bvec2"\r
- | "bvec3"\r
- | "bvec4"\r
- | "ivec2"\r
- | "ivec3"\r
- | "ivec4"\r
- | "mat2"\r
- | "mat3"\r
- | "mat4"\r
- | "sampler1D"\r
- | "sampler2D"\r
- | "sampler3D"\r
- | "samplerCube"\r
- | "sampler1DShadow"\r
- | "sampler2DShadow"\r
- | <struct_specifier>\r
- | <type_name>\r
-*/\r
-type_specifier_space\r
- "void" .emit TYPE_SPECIFIER_VOID .or\r
- "float" .emit TYPE_SPECIFIER_FLOAT .or\r
- "int" .emit TYPE_SPECIFIER_INT .or\r
- "bool" .emit TYPE_SPECIFIER_BOOL .or\r
- "vec2" .emit TYPE_SPECIFIER_VEC2 .or\r
- "vec3" .emit TYPE_SPECIFIER_VEC3 .or\r
- "vec4" .emit TYPE_SPECIFIER_VEC4 .or\r
- "bvec2" .emit TYPE_SPECIFIER_BVEC2 .or\r
- "bvec3" .emit TYPE_SPECIFIER_BVEC3 .or\r
- "bvec4" .emit TYPE_SPECIFIER_BVEC4 .or\r
- "ivec2" .emit TYPE_SPECIFIER_IVEC2 .or\r
- "ivec3" .emit TYPE_SPECIFIER_IVEC3 .or\r
- "ivec4" .emit TYPE_SPECIFIER_IVEC4 .or\r
- "mat2" .emit TYPE_SPECIFIER_MAT2 .or\r
- "mat3" .emit TYPE_SPECIFIER_MAT3 .or\r
- "mat4" .emit TYPE_SPECIFIER_MAT4 .or\r
- "sampler1D" .emit TYPE_SPECIFIER_SAMPLER1D .or\r
- "sampler2D" .emit TYPE_SPECIFIER_SAMPLER2D .or\r
- "sampler3D" .emit TYPE_SPECIFIER_SAMPLER3D .or\r
- "samplerCube" .emit TYPE_SPECIFIER_SAMPLERCUBE .or\r
- "sampler1DShadow" .emit TYPE_SPECIFIER_SAMPLER1DSHADOW .or\r
- "sampler2DShadow" .emit TYPE_SPECIFIER_SAMPLER2DSHADOW .or\r
- type_name .emit TYPE_SPECIFIER_TYPENAME;\r
-type_specifier_nospace\r
- struct_specifier .emit TYPE_SPECIFIER_STRUCT;\r
-\r
-/*\r
- <struct_specifier> ::= "struct" <identifier> "{" <struct_declaration_list> "}"\r
- | "struct" "{" <struct_declaration_list> "}"\r
-*/\r
-struct_specifier\r
- "struct" .and struct_specifier_1 .and optional_space .and lbrace .error LBRACE_EXPECTED .and\r
- struct_declaration_list .and rbrace .emit FIELD_NONE;\r
-struct_specifier_1\r
- struct_specifier_2 .or .true .emit '\0';\r
-struct_specifier_2\r
- space .and identifier;\r
-\r
-/*\r
- <struct_declaration_list> ::= <struct_declaration>\r
- | <struct_declaration_list> <struct_declaration>\r
-*/\r
-struct_declaration_list\r
- struct_declaration .and .loop struct_declaration .emit FIELD_NEXT;\r
-\r
-/*\r
- <struct_declaration> ::= <type_specifier> <struct_declarator_list> ";"\r
-*/\r
-struct_declaration\r
- struct_declaration_nospace .or struct_declaration_space;\r
-struct_declaration_space\r
- type_specifier_space .and space .and struct_declarator_list .and semicolon .emit FIELD_NONE;\r
-struct_declaration_nospace\r
- type_specifier_nospace .and struct_declarator_list .and semicolon .emit FIELD_NONE;\r
-\r
-/*\r
- <struct_declarator_list> ::= <struct_declarator>\r
- | <struct_declarator_list> "," <struct_declarator>\r
-*/\r
-struct_declarator_list\r
- struct_declarator .and .loop struct_declarator_list_1 .emit FIELD_NEXT;\r
-struct_declarator_list_1\r
- comma .and struct_declarator;\r
-\r
-/*\r
- <struct_declarator> ::= <identifier>\r
- | <identifier> "[" <constant_expression> "]"\r
-*/\r
-struct_declarator\r
- identifier .and struct_declarator_1;\r
-struct_declarator_1\r
- struct_declarator_2 .emit FIELD_ARRAY .or .true .emit FIELD_NONE;\r
-struct_declarator_2\r
- lbracket .and constant_expression .and rbracket;\r
-\r
-/*\r
- <initializer> ::= <assignment_expression>\r
-*/\r
-initializer\r
- assignment_expression .and .true .emit OP_END;\r
-\r
-/*\r
- <declaration_statement> ::= <declaration>\r
-*/\r
-declaration_statement\r
- declaration;\r
-\r
-/*\r
- <statement> ::= <compound_statement>\r
- | <simple_statement>\r
-*/\r
-statement\r
- compound_statement .or simple_statement;\r
-statement_space\r
- compound_statement .or statement_space_1;\r
-statement_space_1\r
- space .and simple_statement;\r
-\r
-/*\r
- <simple_statement> ::= <__asm_statement>\r
- | <selection_statement>\r
- | <iteration_statement>\r
- | <jump_statement>\r
- | <expression_statement>\r
- | <declaration_statement>\r
-\r
-note: this is an extension to the standard language specification - normally slang disallows\r
- use of __asm statements\r
-*/\r
-simple_statement\r
- .if (parsing_builtin != 0) __asm_statement .emit OP_ASM .or\r
- selection_statement .or\r
- iteration_statement .or\r
- jump_statement .or\r
- expression_statement .emit OP_EXPRESSION .or\r
- declaration_statement .emit OP_DECLARE;\r
-\r
-/*\r
- <compound_statement> ::= "{" "}"\r
- | "{" <statement_list> "}"\r
-*/\r
-compound_statement\r
- compound_statement_1 .emit OP_BLOCK_BEGIN_NEW_SCOPE .and .true .emit OP_END;\r
-compound_statement_1\r
- compound_statement_2 .or compound_statement_3;\r
-compound_statement_2\r
- lbrace .and rbrace;\r
-compound_statement_3\r
- lbrace .and statement_list .and rbrace;\r
-\r
-/*\r
- <statement_no_new_scope> ::= <compound_statement_no_new_scope>\r
- | <simple_statement>\r
-*/\r
-statement_no_new_scope\r
- compound_statement_no_new_scope .or simple_statement;\r
-\r
-/*\r
- <compound_statement_no_new_scope> ::= "{" "}"\r
- | "{" <statement_list> "}"\r
-*/\r
-compound_statement_no_new_scope\r
- compound_statement_no_new_scope_1 .emit OP_BLOCK_BEGIN_NO_NEW_SCOPE .and .true .emit OP_END;\r
-compound_statement_no_new_scope_1\r
- compound_statement_no_new_scope_2 .or compound_statement_no_new_scope_3;\r
-compound_statement_no_new_scope_2\r
- lbrace .and rbrace;\r
-compound_statement_no_new_scope_3\r
- lbrace .and statement_list .and rbrace;\r
-\r
-/*\r
- <statement_list> ::= <statement>\r
- | <statement_list> <statement>\r
-*/\r
-statement_list\r
- statement .and .loop statement;\r
-\r
-/*\r
- <expression_statement> ::= ";"\r
- | <expression> ";"\r
-*/\r
-expression_statement\r
- expression_statement_1 .or expression_statement_2;\r
-expression_statement_1\r
- semicolon .emit OP_PUSH_VOID .emit OP_END;\r
-expression_statement_2\r
- expression .and semicolon .emit OP_END;\r
-\r
-/*\r
- <selection_statement> ::= "if" "(" <expression> ")" <selection_rest_statement>\r
-*/\r
-selection_statement\r
- "if" .emit OP_IF .and lparen .error LPAREN_EXPECTED .and expression .and\r
- rparen .error RPAREN_EXPECTED .emit OP_END .and selection_rest_statement;\r
-\r
-/*\r
- <selection_rest_statement> ::= <statement> "else" <statement>\r
- | <statement>\r
-*/\r
-selection_rest_statement\r
- statement .and selection_rest_statement_1;\r
-selection_rest_statement_1\r
- selection_rest_statement_2 .or .true .emit OP_EXPRESSION .emit OP_PUSH_VOID .emit OP_END;\r
-selection_rest_statement_2\r
- "else" .and optional_space .and statement;\r
-\r
-/*\r
- <condition> ::= <expression>\r
- | <fully_specified_type> <identifier> "=" <initializer>\r
-\r
-note: if <condition_1> is executed, the emit format must match <declaration> emit format\r
-*/\r
-condition\r
- condition_1 .emit OP_DECLARE .emit DECLARATION_INIT_DECLARATOR_LIST .or\r
- condition_3 .emit OP_EXPRESSION;\r
-condition_1\r
- condition_1_nospace .or condition_1_space;\r
-condition_1_nospace\r
- fully_specified_type_nospace .and condition_2;\r
-condition_1_space\r
- fully_specified_type_space .and space .and condition_2;\r
-condition_2\r
- identifier .emit VARIABLE_IDENTIFIER .and equals .emit VARIABLE_INITIALIZER .and\r
- initializer .and .true .emit DECLARATOR_NONE;\r
-condition_3\r
- expression .and .true .emit OP_END;\r
-\r
-/*\r
- <iteration_statement> ::= "while" "(" <condition> ")" <statement_no_new_scope>\r
- | "do" <statement> "while" "(" <expression> ")" ";"\r
- | "for" "(" <for_init_statement> <for_rest_statement> ")"\r
- <statement_no_new_scope>\r
-*/\r
-iteration_statement\r
- iteration_statement_1 .or iteration_statement_2 .or iteration_statement_3;\r
-iteration_statement_1\r
- "while" .emit OP_WHILE .and lparen .error LPAREN_EXPECTED .and condition .and\r
- rparen .error RPAREN_EXPECTED .and statement_no_new_scope;\r
-iteration_statement_2\r
- "do" .emit OP_DO .and statement_space .and "while" .and lparen .error LPAREN_EXPECTED .and\r
- expression .and rparen .error RPAREN_EXPECTED .emit OP_END .and semicolon;\r
-iteration_statement_3\r
- "for" .emit OP_FOR .and lparen .error LPAREN_EXPECTED .and for_init_statement .and\r
- for_rest_statement .and rparen .error RPAREN_EXPECTED .and statement_no_new_scope;\r
-\r
-/*\r
- <for_init_statement> ::= <expression_statement>\r
- | <declaration_statement>\r
-*/\r
-for_init_statement\r
- expression_statement .emit OP_EXPRESSION .or declaration_statement .emit OP_DECLARE;\r
-\r
-/*\r
- <conditionopt> ::= <condition>\r
- | ""\r
-\r
-note: <conditionopt> is used only by "for" statement - if <condition> is ommitted, parser\r
- simulates default behaviour, that is simulates "true" expression\r
-*/\r
-conditionopt\r
- condition .or\r
- .true .emit OP_EXPRESSION .emit OP_PUSH_BOOL .emit 2 .emit '1' .emit '\0' .emit OP_END;\r
-\r
-/*\r
- <for_rest_statement> ::= <conditionopt> ";"\r
- | <conditionopt> ";" <expression>\r
-*/\r
-for_rest_statement\r
- conditionopt .and semicolon .and for_rest_statement_1;\r
-for_rest_statement_1\r
- for_rest_statement_2 .or .true .emit OP_PUSH_VOID .emit OP_END;\r
-for_rest_statement_2\r
- expression .and .true .emit OP_END;\r
-\r
-/*\r
- <jump_statement> ::= "continue" ";"\r
- | "break" ";"\r
- | "return" ";"\r
- | "return" <expression> ";"\r
- | "discard" ";" // Fragment shader only.\r
-*/\r
-jump_statement\r
- jump_statement_1 .or jump_statement_2 .or jump_statement_3 .or jump_statement_4 .or\r
- .if (shader_type == 1) jump_statement_5;\r
-jump_statement_1\r
- "continue" .and semicolon .emit OP_CONTINUE;\r
-jump_statement_2\r
- "break" .and semicolon .emit OP_BREAK;\r
-jump_statement_3\r
- "return" .emit OP_RETURN .and optional_space .and expression .and semicolon .emit OP_END;\r
-jump_statement_4\r
- "return" .emit OP_RETURN .and semicolon .emit OP_PUSH_VOID .emit OP_END;\r
-jump_statement_5\r
- "discard" .and semicolon .emit OP_DISCARD;\r
-\r
-/*\r
- <__asm_statement> ::= "__asm" <identifier> <asm_arguments> ";"\r
-\r
-note: this is an extension to the standard language specification - normally slang disallows\r
- __asm statements\r
-*/\r
-__asm_statement\r
- "__asm" .and space .and identifier .and space .and asm_arguments .and semicolon .emit OP_END;\r
-\r
-/*\r
- <asm_arguments> ::= <identifier>\r
- | <asm_arguments> "," <identifier>\r
-\r
-note: this is an extension to the standard language specification - normally slang disallows\r
- __asm statements\r
-*/\r
-asm_arguments\r
- variable_identifier .and .true .emit OP_END .and .loop asm_arguments_1;\r
-asm_arguments_1\r
- comma .and variable_identifier .and .true .emit OP_END;\r
-\r
-/*\r
- <translation_unit> ::= <external_declaration>\r
- | <translation_unit> <external_declaration>\r
-*/\r
-translation_unit\r
- optional_space .emit REVISION .and external_declaration .error INVALID_EXTERNAL_DECLARATION .and\r
- .loop external_declaration .and optional_space .and\r
- '\0' .error INVALID_EXTERNAL_DECLARATION .emit EXTERNAL_NULL;\r
-\r
-/*\r
- <external_declaration> ::= <function_definition>\r
- | <declaration>\r
-*/\r
-external_declaration\r
- function_definition .emit EXTERNAL_FUNCTION_DEFINITION .or\r
- declaration .emit EXTERNAL_DECLARATION;\r
-\r
-/*\r
- <function_definition> :: <function_prototype> <compound_statement_no_new_scope>\r
-*/\r
-function_definition\r
- function_prototype .and compound_statement_no_new_scope;\r
-\r
-/* helper rulez, not part of the official language syntax */\r
-\r
-digit_oct\r
- '0'-'7';\r
-\r
-digit_dec\r
- '0'-'9';\r
-\r
-digit_hex\r
- '0'-'9' .or 'A'-'F' .or 'a'-'f';\r
-\r
-id_character_first\r
- 'a'-'z' .or 'A'-'Z' .or '_';\r
-\r
-id_character_next\r
- id_character_first .or digit_dec;\r
-\r
-identifier\r
- id_character_first .emit * .and .loop id_character_next .emit * .and .true .emit '\0';\r
-\r
-float\r
- float_1 .or float_2;\r
-float_1\r
- float_fractional_constant .and float_optional_exponent_part;\r
-float_2\r
- float_digit_sequence .and .true .emit '\0' .and float_exponent_part;\r
-\r
-float_fractional_constant\r
- float_fractional_constant_1 .or float_fractional_constant_2 .or float_fractional_constant_3;\r
-float_fractional_constant_1\r
- float_digit_sequence .and '.' .and float_digit_sequence;\r
-float_fractional_constant_2\r
- float_digit_sequence .and '.' .and .true .emit '\0';\r
-float_fractional_constant_3\r
- '.' .emit '\0' .and float_digit_sequence;\r
-\r
-float_optional_exponent_part\r
- float_exponent_part .or .true .emit '\0';\r
-\r
-float_digit_sequence\r
- digit_dec .emit * .and .loop digit_dec .emit * .and .true .emit '\0';\r
-\r
-float_exponent_part\r
- float_exponent_part_1 .or float_exponent_part_2;\r
-float_exponent_part_1\r
- 'e' .and float_optional_sign .and float_digit_sequence;\r
-float_exponent_part_2\r
- 'E' .and float_optional_sign .and float_digit_sequence;\r
-\r
-float_optional_sign\r
- float_sign .or .true;\r
-\r
-float_sign\r
- '+' .or '-' .emit '-';\r
-\r
-integer\r
- integer_hex .or integer_oct .or integer_dec;\r
-\r
-integer_hex\r
- '0' .and integer_hex_1 .emit 0x10 .and digit_hex .emit * .and .loop digit_hex .emit * .and\r
- .true .emit '\0';\r
-integer_hex_1\r
- 'x' .or 'X';\r
-\r
-integer_oct\r
- '0' .emit 8 .emit * .and .loop digit_oct .emit * .and .true .emit '\0';\r
-\r
-integer_dec\r
- digit_dec .emit 10 .emit * .and .loop digit_dec .emit * .and .true .emit '\0';\r
-\r
-boolean\r
- "true" .emit 2 .emit '1' .emit '\0' .or\r
- "false" .emit 2 .emit '0' .emit '\0';\r
-\r
-type_name\r
- identifier;\r
-\r
-field_selection\r
- identifier;\r
-\r
-floatconstant\r
- float .emit OP_PUSH_FLOAT;\r
-\r
-intconstant\r
- integer .emit OP_PUSH_INT;\r
-\r
-boolconstant\r
- boolean .emit OP_PUSH_BOOL;\r
-\r
-optional_space\r
- .loop single_space;\r
-\r
-space\r
- single_space .and .loop single_space;\r
-\r
-single_space\r
- white_char .or c_style_comment_block .or cpp_style_comment_block;\r
-\r
-white_char\r
- ' ' .or '\t' .or new_line .or '\v' .or '\f';\r
-\r
-new_line\r
- cr_lf .or lf_cr .or '\n' .or '\r';\r
-\r
-cr_lf\r
- '\r' .and '\n';\r
-\r
-lf_cr\r
- '\n' .and '\r';\r
-\r
-c_style_comment_block\r
- '/' .and '*' .and c_style_comment_rest;\r
-\r
-c_style_comment_rest\r
- .loop c_style_comment_char_no_star .and c_style_comment_rest_1;\r
-c_style_comment_rest_1\r
- c_style_comment_end .or c_style_comment_rest_2;\r
-c_style_comment_rest_2\r
- '*' .and c_style_comment_rest;\r
-\r
-c_style_comment_char_no_star\r
- '\x2B'-'\xFF' .or '\x01'-'\x29';\r
-\r
-c_style_comment_end\r
- '*' .and '/';\r
-\r
-cpp_style_comment_block\r
- '/' .and '/' .and cpp_style_comment_block_1;\r
-cpp_style_comment_block_1\r
- cpp_style_comment_block_2 .or cpp_style_comment_block_3;\r
-cpp_style_comment_block_2\r
- .loop cpp_style_comment_char .and new_line;\r
-cpp_style_comment_block_3\r
- .loop cpp_style_comment_char;\r
-\r
-cpp_style_comment_char\r
- '\x0E'-'\xFF' .or '\x01'-'\x09' .or '\x0B'-'\x0C';\r
-\r
-/* lexical rulez */\r
-\r
-/*ampersand\r
- optional_space .and '&' .and optional_space;*/\r
-\r
-ampersandampersand\r
- optional_space .and '&' .and '&' .and optional_space;\r
-\r
-/*ampersandequals\r
- optional_space .and '&' .and '=' .and optional_space;*/\r
-\r
-/*bar\r
- optional_space .and '|' .and optional_space;*/\r
-\r
-barbar\r
- optional_space .and '|' .and '|' .and optional_space;\r
-\r
-/*barequals\r
- optional_space .and '|' .and '=' .and optional_space;*/\r
-\r
-bang\r
- optional_space .and '!' .and optional_space;\r
-\r
-bangequals\r
- optional_space .and '!' .and '=' .and optional_space;\r
-\r
-/*caret\r
- optional_space .and '^' .and optional_space;*/\r
-\r
-caretcaret\r
- optional_space .and '^' .and '^' .and optional_space;\r
-\r
-/*caretequals\r
- optional_space .and '^' .and '=' .and optional_space;*/\r
-\r
-colon\r
- optional_space .and ':' .and optional_space;\r
-\r
-comma\r
- optional_space .and ',' .and optional_space;\r
-\r
-dot\r
- optional_space .and '.' .and optional_space;\r
-\r
-equals\r
- optional_space .and '=' .and optional_space;\r
-\r
-equalsequals\r
- optional_space .and '=' .and '=' .and optional_space;\r
-\r
-greater\r
- optional_space .and '>' .and optional_space;\r
-\r
-greaterequals\r
- optional_space .and '>' .and '=' .and optional_space;\r
-\r
-/*greatergreater\r
- optional_space .and '>' .and '>' .and optional_space;*/\r
-\r
-/*greatergreaterequals\r
- optional_space .and '>' .and '>' .and '=' .and optional_space;*/\r
-\r
-lbrace\r
- optional_space .and '{' .and optional_space;\r
-\r
-lbracket\r
- optional_space .and '[' .and optional_space;\r
-\r
-less\r
- optional_space .and '<' .and optional_space;\r
-\r
-lessequals\r
- optional_space .and '<' .and '=' .and optional_space;\r
-\r
-/*lessless\r
- optional_space .and '<' .and '<' .and optional_space;*/\r
-\r
-/*lesslessequals\r
- optional_space .and '<' .and '<' .and '=' .and optional_space;*/\r
-\r
-lparen\r
- optional_space .and '(' .and optional_space;\r
-\r
-minus\r
- optional_space .and '-' .and optional_space;\r
-\r
-minusequals\r
- optional_space .and '-' .and '=' .and optional_space;\r
-\r
-minusminus\r
- optional_space .and '-' .and '-' .and optional_space;\r
-\r
-/*percent\r
- optional_space .and '%' .and optional_space;*/\r
-\r
-/*percentequals\r
- optional_space .and '%' .and '=' .and optional_space;*/\r
-\r
-plus\r
- optional_space .and '+' .and optional_space;\r
-\r
-plusequals\r
- optional_space .and '+' .and '=' .and optional_space;\r
-\r
-plusplus\r
- optional_space .and '+' .and '+' .and optional_space;\r
-\r
-question\r
- optional_space .and '?' .and optional_space;\r
-\r
-rbrace\r
- optional_space .and '}' .and optional_space;\r
-\r
-rbracket\r
- optional_space .and ']' .and optional_space;\r
-\r
-rparen\r
- optional_space .and ')' .and optional_space;\r
-\r
-semicolon\r
- optional_space .and ';' .and optional_space;\r
-\r
-slash\r
- optional_space .and '/' .and optional_space;\r
-\r
-slashequals\r
- optional_space .and '/' .and '=' .and optional_space;\r
-\r
-star\r
- optional_space .and '*' .and optional_space;\r
-\r
-starequals\r
- optional_space .and '*' .and '=' .and optional_space;\r
-\r
-/*tilde\r
- optional_space .and '~' .and optional_space;*/\r
-\r
-/* string rulez - these are used internally by the parser when parsing quoted strings */\r
-\r
-.string string_lexer;\r
-\r
-string_lexer\r
- lex_first_identifier_character .and .loop lex_next_identifier_character;\r
-\r
-lex_first_identifier_character\r
- 'a'-'z' .or 'A'-'Z' .or '_';\r
-\r
-lex_next_identifier_character\r
- 'a'-'z' .or 'A'-'Z' .or '0'-'9' .or '_';\r
-\r
-/* error rulez - these are used by error messages */\r
-\r
-err_token\r
- '~' .or '`' .or '!' .or '@' .or '#' .or '$' .or '%' .or '^' .or '&' .or '*' .or '(' .or ')' .or\r
- '-' .or '+' .or '=' .or '|' .or '\\' .or '[' .or ']' .or '{' .or '}' .or ':' .or ';' .or '"' .or\r
- '\'' .or '<' .or ',' .or '>' .or '.' .or '/' .or '?' .or err_identifier;\r
-\r
-err_identifier\r
- id_character_first .and .loop id_character_next;\r
-\r
+/*
+ * Mesa 3-D graphics library
+ *
+ * Copyright (C) 2004-2006 Brian Paul All Rights Reserved.
+ * Copyright (C) 2008 VMware, Inc. All Rights Reserved.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included
+ * in all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+ * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+ * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+ * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+ * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+ */
+
+/*
+ * \file slang_shader.syn
+ * slang vertex/fragment shader syntax
+ * \author Michal Krol
+ */
+
+/*
+ * usage:
+ * syn2c slang_shader.syn > slang_shader_syn.h
+ *
+ * when modifying or extending this file, several things must be taken into
+ * consideration:
+ *
+ * - when adding new operators that were marked as reserved in the
+ * initial specification, one must only uncomment particular lines of
+ * code that refer to operators being added;
+ *
+ * - when adding new shader targets, one must reserve a new value for
+ * shader_type register and use it in .if constructs for symbols that
+ * are exclusive for that shader;
+ *
+ * - some symbols mimic output of other symbols - the best example is
+ * the "for" construct: expression "for (foo(); ; bar())" is seen as
+ * "for (foo(); true; bar())" by the output processor - hence, special
+ * care must be taken when rearranging output of essential symbols;
+ *
+ * - order of single-quoted tokens does matter in alternatives - so do not
+ * parse "<" operator before "<<" and "<<" before "<<=";
+ *
+ * - all double-quoted tokens are internally preprocessed to eliminate
+ * problems with parsing strings that are prefixes of other strings,
+ * like "sampler1D" and "sampler1DShadow";
+ */
+
+.syntax translation_unit;
+
+/* revision number - increment after each change affecting emitted output */
+.emtcode REVISION 5
+
+/* external declaration (or precision or invariant stmt) */
+.emtcode EXTERNAL_NULL 0
+.emtcode EXTERNAL_FUNCTION_DEFINITION 1
+.emtcode EXTERNAL_DECLARATION 2
+.emtcode DEFAULT_PRECISION 3
+.emtcode INVARIANT_STMT 4
+
+/* precision */
+.emtcode PRECISION_DEFAULT 0
+.emtcode PRECISION_LOW 1
+.emtcode PRECISION_MEDIUM 2
+.emtcode PRECISION_HIGH 3
+
+/* declaration */
+.emtcode DECLARATION_FUNCTION_PROTOTYPE 1
+.emtcode DECLARATION_INIT_DECLARATOR_LIST 2
+
+/* function type */
+.emtcode FUNCTION_ORDINARY 0
+.emtcode FUNCTION_CONSTRUCTOR 1
+.emtcode FUNCTION_OPERATOR 2
+
+/* function call type */
+.emtcode FUNCTION_CALL_NONARRAY 0
+.emtcode FUNCTION_CALL_ARRAY 1
+
+/* operator type */
+.emtcode OPERATOR_ADDASSIGN 1
+.emtcode OPERATOR_SUBASSIGN 2
+.emtcode OPERATOR_MULASSIGN 3
+.emtcode OPERATOR_DIVASSIGN 4
+/*.emtcode OPERATOR_MODASSIGN 5*/
+/*.emtcode OPERATOR_LSHASSIGN 6*/
+/*.emtcode OPERATOR_RSHASSIGN 7*/
+/*.emtcode OPERATOR_ORASSIGN 8*/
+/*.emtcode OPERATOR_XORASSIGN 9*/
+/*.emtcode OPERATOR_ANDASSIGN 10*/
+.emtcode OPERATOR_LOGICALXOR 11
+/*.emtcode OPERATOR_BITOR 12*/
+/*.emtcode OPERATOR_BITXOR 13*/
+/*.emtcode OPERATOR_BITAND 14*/
+.emtcode OPERATOR_LESS 15
+.emtcode OPERATOR_GREATER 16
+.emtcode OPERATOR_LESSEQUAL 17
+.emtcode OPERATOR_GREATEREQUAL 18
+/*.emtcode OPERATOR_LSHIFT 19*/
+/*.emtcode OPERATOR_RSHIFT 20*/
+.emtcode OPERATOR_MULTIPLY 21
+.emtcode OPERATOR_DIVIDE 22
+/*.emtcode OPERATOR_MODULUS 23*/
+.emtcode OPERATOR_INCREMENT 24
+.emtcode OPERATOR_DECREMENT 25
+.emtcode OPERATOR_PLUS 26
+.emtcode OPERATOR_MINUS 27
+/*.emtcode OPERATOR_COMPLEMENT 28*/
+.emtcode OPERATOR_NOT 29
+
+/* init declarator list */
+.emtcode DECLARATOR_NONE 0
+.emtcode DECLARATOR_NEXT 1
+
+/* variable declaration */
+.emtcode VARIABLE_NONE 0
+.emtcode VARIABLE_IDENTIFIER 1
+.emtcode VARIABLE_INITIALIZER 2
+.emtcode VARIABLE_ARRAY_EXPLICIT 3
+.emtcode VARIABLE_ARRAY_UNKNOWN 4
+
+/* type qualifier */
+.emtcode TYPE_QUALIFIER_NONE 0
+.emtcode TYPE_QUALIFIER_CONST 1
+.emtcode TYPE_QUALIFIER_ATTRIBUTE 2
+.emtcode TYPE_QUALIFIER_VARYING 3
+.emtcode TYPE_QUALIFIER_UNIFORM 4
+.emtcode TYPE_QUALIFIER_FIXEDOUTPUT 5
+.emtcode TYPE_QUALIFIER_FIXEDINPUT 6
+
+/* invariant qualifier */
+.emtcode TYPE_VARIANT 90
+.emtcode TYPE_INVARIANT 91
+
+/* centroid qualifier */
+.emtcode TYPE_CENTER 95
+.emtcode TYPE_CENTROID 96
+
+/* type specifier */
+.emtcode TYPE_SPECIFIER_VOID 0
+.emtcode TYPE_SPECIFIER_BOOL 1
+.emtcode TYPE_SPECIFIER_BVEC2 2
+.emtcode TYPE_SPECIFIER_BVEC3 3
+.emtcode TYPE_SPECIFIER_BVEC4 4
+.emtcode TYPE_SPECIFIER_INT 5
+.emtcode TYPE_SPECIFIER_IVEC2 6
+.emtcode TYPE_SPECIFIER_IVEC3 7
+.emtcode TYPE_SPECIFIER_IVEC4 8
+.emtcode TYPE_SPECIFIER_FLOAT 9
+.emtcode TYPE_SPECIFIER_VEC2 10
+.emtcode TYPE_SPECIFIER_VEC3 11
+.emtcode TYPE_SPECIFIER_VEC4 12
+.emtcode TYPE_SPECIFIER_MAT2 13
+.emtcode TYPE_SPECIFIER_MAT3 14
+.emtcode TYPE_SPECIFIER_MAT4 15
+.emtcode TYPE_SPECIFIER_SAMPLER1D 16
+.emtcode TYPE_SPECIFIER_SAMPLER2D 17
+.emtcode TYPE_SPECIFIER_SAMPLER3D 18
+.emtcode TYPE_SPECIFIER_SAMPLERCUBE 19
+.emtcode TYPE_SPECIFIER_SAMPLER1DSHADOW 20
+.emtcode TYPE_SPECIFIER_SAMPLER2DSHADOW 21
+.emtcode TYPE_SPECIFIER_SAMPLER2DRECT 22
+.emtcode TYPE_SPECIFIER_SAMPLER2DRECTSHADOW 23
+.emtcode TYPE_SPECIFIER_STRUCT 24
+.emtcode TYPE_SPECIFIER_TYPENAME 25
+
+/* OpenGL 2.1 */
+.emtcode TYPE_SPECIFIER_MAT23 26
+.emtcode TYPE_SPECIFIER_MAT32 27
+.emtcode TYPE_SPECIFIER_MAT24 28
+.emtcode TYPE_SPECIFIER_MAT42 29
+.emtcode TYPE_SPECIFIER_MAT34 30
+.emtcode TYPE_SPECIFIER_MAT43 31
+
+/* type specifier array */
+.emtcode TYPE_SPECIFIER_NONARRAY 0
+.emtcode TYPE_SPECIFIER_ARRAY 1
+
+/* structure field */
+.emtcode FIELD_NONE 0
+.emtcode FIELD_NEXT 1
+.emtcode FIELD_ARRAY 2
+
+/* operation */
+.emtcode OP_END 0
+.emtcode OP_BLOCK_BEGIN_NO_NEW_SCOPE 1
+.emtcode OP_BLOCK_BEGIN_NEW_SCOPE 2
+.emtcode OP_DECLARE 3
+.emtcode OP_ASM 4
+.emtcode OP_BREAK 5
+.emtcode OP_CONTINUE 6
+.emtcode OP_DISCARD 7
+.emtcode OP_RETURN 8
+.emtcode OP_EXPRESSION 9
+.emtcode OP_IF 10
+.emtcode OP_WHILE 11
+.emtcode OP_DO 12
+.emtcode OP_FOR 13
+.emtcode OP_PUSH_VOID 14
+.emtcode OP_PUSH_BOOL 15
+.emtcode OP_PUSH_INT 16
+.emtcode OP_PUSH_FLOAT 17
+.emtcode OP_PUSH_IDENTIFIER 18
+.emtcode OP_SEQUENCE 19
+.emtcode OP_ASSIGN 20
+.emtcode OP_ADDASSIGN 21
+.emtcode OP_SUBASSIGN 22
+.emtcode OP_MULASSIGN 23
+.emtcode OP_DIVASSIGN 24
+/*.emtcode OP_MODASSIGN 25*/
+/*.emtcode OP_LSHASSIGN 26*/
+/*.emtcode OP_RSHASSIGN 27*/
+/*.emtcode OP_ORASSIGN 28*/
+/*.emtcode OP_XORASSIGN 29*/
+/*.emtcode OP_ANDASSIGN 30*/
+.emtcode OP_SELECT 31
+.emtcode OP_LOGICALOR 32
+.emtcode OP_LOGICALXOR 33
+.emtcode OP_LOGICALAND 34
+/*.emtcode OP_BITOR 35*/
+/*.emtcode OP_BITXOR 36*/
+/*.emtcode OP_BITAND 37*/
+.emtcode OP_EQUAL 38
+.emtcode OP_NOTEQUAL 39
+.emtcode OP_LESS 40
+.emtcode OP_GREATER 41
+.emtcode OP_LESSEQUAL 42
+.emtcode OP_GREATEREQUAL 43
+/*.emtcode OP_LSHIFT 44*/
+/*.emtcode OP_RSHIFT 45*/
+.emtcode OP_ADD 46
+.emtcode OP_SUBTRACT 47
+.emtcode OP_MULTIPLY 48
+.emtcode OP_DIVIDE 49
+/*.emtcode OP_MODULUS 50*/
+.emtcode OP_PREINCREMENT 51
+.emtcode OP_PREDECREMENT 52
+.emtcode OP_PLUS 53
+.emtcode OP_MINUS 54
+/*.emtcode OP_COMPLEMENT 55*/
+.emtcode OP_NOT 56
+.emtcode OP_SUBSCRIPT 57
+.emtcode OP_CALL 58
+.emtcode OP_FIELD 59
+.emtcode OP_POSTINCREMENT 60
+.emtcode OP_POSTDECREMENT 61
+.emtcode OP_PRECISION 62
+.emtcode OP_METHOD 63
+
+/* parameter qualifier */
+.emtcode PARAM_QUALIFIER_IN 0
+.emtcode PARAM_QUALIFIER_OUT 1
+.emtcode PARAM_QUALIFIER_INOUT 2
+
+/* function parameter */
+.emtcode PARAMETER_NONE 0
+.emtcode PARAMETER_NEXT 1
+
+/* function parameter array presence */
+.emtcode PARAMETER_ARRAY_NOT_PRESENT 0
+.emtcode PARAMETER_ARRAY_PRESENT 1
+
+/* INVALID_EXTERNAL_DECLARATION seems to be reported when there's */
+/* any syntax errors... */
+.errtext INVALID_EXTERNAL_DECLARATION "2001: Syntax error."
+.errtext INVALID_OPERATOR_OVERRIDE "2002: Invalid operator override."
+.errtext LBRACE_EXPECTED "2003: '{' expected but '$err_token$' found."
+.errtext LPAREN_EXPECTED "2004: '(' expected but '$err_token$' found."
+.errtext RPAREN_EXPECTED "2005: ')' expected but '$err_token$' found."
+.errtext INVALID_PRECISION "2006: Invalid precision specifier '$err_token$'."
+.errtext INVALID_PRECISION_TYPE "2007: Invalid precision type '$err_token$'."
+
+
+/*
+ * tells whether the shader that is being parsed is a built-in shader or not
+ * 0 - normal behaviour
+ * 1 - accepts constructor and operator definitions and __asm statements
+ * the implementation will set it to 1 when compiling internal built-in shaders
+ */
+.regbyte parsing_builtin 0
+
+/*
+ * holds the type of the shader being parsed; possible values are
+ * listed below.
+ * FRAGMENT_SHADER 1
+ * VERTEX_SHADER 2
+ * shader type is set by the caller before parsing
+ */
+.regbyte shader_type 0
+
+/*
+ * <variable_identifier> ::= <identifier>
+ */
+variable_identifier
+ identifier .emit OP_PUSH_IDENTIFIER;
+
+/*
+ * <primary_expression> ::= <variable_identifier>
+ * | <intconstant>
+ * | <floatconstant>
+ * | <boolconstant>
+ * | "(" <expression> ")"
+ */
+primary_expression
+ floatconstant .or boolconstant .or intconstant .or variable_identifier .or primary_expression_1;
+primary_expression_1
+ lparen .and expression .and rparen;
+
+/*
+ * <postfix_expression> ::= <primary_expression>
+ * | <postfix_expression> "[" <integer_expression> "]"
+ * | <function_call>
+ * | <postfix_expression> "." <field_selection>
+ * | <postfix_expression> "++"
+ * | <postfix_expression> "--"
+ */
+postfix_expression
+ postfix_expression_1 .and .loop postfix_expression_2;
+postfix_expression_1
+ function_call .or primary_expression;
+postfix_expression_2
+ postfix_expression_3 .or postfix_expression_4 .or
+ plusplus .emit OP_POSTINCREMENT .or
+ minusminus .emit OP_POSTDECREMENT;
+postfix_expression_3
+ lbracket .and integer_expression .and rbracket .emit OP_SUBSCRIPT;
+postfix_expression_4
+ dot .and field_selection .emit OP_FIELD;
+
+/*
+ * <integer_expression> ::= <expression>
+ */
+integer_expression
+ expression;
+
+/*
+ * <function_call> ::= <function_call_generic>
+ */
+function_call
+ function_call_or_method;
+
+/*
+ * <function_call_or_method> ::= <regular_function_call>
+ * | <postfix_expression> "." <function_call_generic>
+ */
+function_call_or_method
+ regular_function_call .or method_call;
+
+/*
+ * <method_call> ::= <identifier> "." <function_call_generic>
+ */
+method_call
+ identifier .emit OP_METHOD .and dot .and function_call_generic .and .true .emit OP_END;
+
+/*
+ * <regular_function_call> ::= <function_call_generic>
+ */
+regular_function_call
+ function_call_generic .emit OP_CALL .and .true .emit OP_END;
+
+/*
+ * <function_call_generic> ::= <function_call_header_with_parameters> ")"
+ * | <function_call_header_no_parameters> ")"
+ */
+function_call_generic
+ function_call_generic_1 .or function_call_generic_2;
+function_call_generic_1
+ function_call_header_with_parameters .and rparen .error RPAREN_EXPECTED;
+function_call_generic_2
+ function_call_header_no_parameters .and rparen .error RPAREN_EXPECTED;
+
+/*
+ * <function_call_header_no_parameters>::= <function_call_header> "void"
+ * | <function_call_header>
+ */
+function_call_header_no_parameters
+ function_call_header .and function_call_header_no_parameters_1;
+function_call_header_no_parameters_1
+ "void" .or .true;
+
+/*
+ * <function_call_header_with_parameters> ::= <function_call_header> <assignment_expression>
+ * | <function_call_header_with_parameters> "," <assignment_expression>
+ */
+function_call_header_with_parameters
+ function_call_header .and assignment_expression .and .true .emit OP_END .and
+ .loop function_call_header_with_parameters_1;
+function_call_header_with_parameters_1
+ comma .and assignment_expression .and .true .emit OP_END;
+
+/*
+ * <function_call_header> ::= <function_identifier> "("
+ */
+function_call_header
+ function_identifier .and lparen;
+
+/*
+ * <function_identifier> ::= <constructor_identifier>
+ * | <identifier>
+ * | <type_specifier>
+ *
+ * note: <constructor_identifier> and <type_specifier> have been deleted
+ */
+function_identifier
+ identifier .and function_identifier_opt_array;
+function_identifier_opt_array
+ function_identifier_array .emit FUNCTION_CALL_ARRAY .or
+ .true .emit FUNCTION_CALL_NONARRAY;
+function_identifier_array
+ lbracket .and constant_expression .and rbracket;
+
+/*
+ * <unary_expression> ::= <postfix_expression>
+ * | "++" <unary_expression>
+ * | "--" <unary_expression>
+ * | <unary_operator> <unary_expression>
+ *
+ * <unary_operator> ::= "+"
+ * | "-"
+ * | "!"
+ * | "~" // reserved
+ */
+unary_expression
+ postfix_expression .or unary_expression_1 .or unary_expression_2 .or unary_expression_3 .or
+ unary_expression_4 .or unary_expression_5/* .or unary_expression_6*/;
+unary_expression_1
+ plusplus .and unary_expression .and .true .emit OP_PREINCREMENT;
+unary_expression_2
+ minusminus .and unary_expression .and .true .emit OP_PREDECREMENT;
+unary_expression_3
+ plus .and unary_expression .and .true .emit OP_PLUS;
+unary_expression_4
+ minus .and unary_expression .and .true .emit OP_MINUS;
+unary_expression_5
+ bang .and unary_expression .and .true .emit OP_NOT;
+/*unary_expression_6
+ tilde .and unary_expression .and .true .emit OP_COMPLEMENT;*/
+
+/*
+ * <multiplicative_expression> ::= <unary_expression>
+ * | <multiplicative_expression> "*" <unary_expression>
+ * | <multiplicative_expression> "/" <unary_expression>
+ * | <multiplicative_expression> "%" <unary_expression> // reserved
+ */
+multiplicative_expression
+ unary_expression .and .loop multiplicative_expression_1;
+multiplicative_expression_1
+ multiplicative_expression_2 .or multiplicative_expression_3/* .or multiplicative_expression_4*/;
+multiplicative_expression_2
+ star .and unary_expression .and .true .emit OP_MULTIPLY;
+multiplicative_expression_3
+ slash .and unary_expression .and .true .emit OP_DIVIDE;
+/*multiplicative_expression_4
+ percent .and unary_expression .and .true .emit OP_MODULUS;*/
+
+/*
+ * <additive_expression> ::= <multiplicative_expression>
+ * | <additive_expression> "+" <multiplicative_expression>
+ * | <additive_expression> "-" <multiplicative_expression>
+ */
+additive_expression
+ multiplicative_expression .and .loop additive_expression_1;
+additive_expression_1
+ additive_expression_2 .or additive_expression_3;
+additive_expression_2
+ plus .and multiplicative_expression .and .true .emit OP_ADD;
+additive_expression_3
+ minus .and multiplicative_expression .and .true .emit OP_SUBTRACT;
+
+/*
+ * <shift_expression> ::= <additive_expression>
+ * | <shift_expression> "<<" <additive_expression> // reserved
+ * | <shift_expression> ">>" <additive_expression> // reserved
+ */
+shift_expression
+ additive_expression/* .and .loop shift_expression_1*/;
+/*shift_expression_1
+ shift_expression_2 .or shift_expression_3;*/
+/*shift_expression_2
+ lessless .and additive_expression .and .true .emit OP_LSHIFT;*/
+/*shift_expression_3
+ greatergreater .and additive_expression .and .true .emit OP_RSHIFT;*/
+
+/*
+ * <relational_expression> ::= <shift_expression>
+ * | <relational_expression> "<" <shift_expression>
+ * | <relational_expression> ">" <shift_expression>
+ * | <relational_expression> "<=" <shift_expression>
+ * | <relational_expression> ">=" <shift_expression>
+ */
+relational_expression
+ shift_expression .and .loop relational_expression_1;
+relational_expression_1
+ relational_expression_2 .or relational_expression_3 .or relational_expression_4 .or
+ relational_expression_5;
+relational_expression_2
+ lessequals .and shift_expression .and .true .emit OP_LESSEQUAL;
+relational_expression_3
+ greaterequals .and shift_expression .and .true .emit OP_GREATEREQUAL;
+relational_expression_4
+ less .and shift_expression .and .true .emit OP_LESS;
+relational_expression_5
+ greater .and shift_expression .and .true .emit OP_GREATER;
+
+/*
+ * <equality_expression> ::= <relational_expression>
+ * | <equality_expression> "==" <relational_expression>
+ * | <equality_expression> "!=" <relational_expression>
+ */
+equality_expression
+ relational_expression .and .loop equality_expression_1;
+equality_expression_1
+ equality_expression_2 .or equality_expression_3;
+equality_expression_2
+ equalsequals .and relational_expression .and .true .emit OP_EQUAL;
+equality_expression_3
+ bangequals .and relational_expression .and .true .emit OP_NOTEQUAL;
+
+/*
+ * <and_expression> ::= <equality_expression>
+ * | <and_expression> "&" <equality_expression> // reserved
+ */
+and_expression
+ equality_expression/* .and .loop and_expression_1*/;
+/*and_expression_1
+ ampersand .and equality_expression .and .true .emit OP_BITAND;*/
+
+/*
+ * <exclusive_or_expression> ::= <and_expression>
+ * | <exclusive_or_expression> "^" <and_expression> // reserved
+ */
+exclusive_or_expression
+ and_expression/* .and .loop exclusive_or_expression_1*/;
+/*exclusive_or_expression_1
+ caret .and and_expression .and .true .emit OP_BITXOR;*/
+
+/*
+ * <inclusive_or_expression> ::= <exclusive_or_expression>
+ * | <inclusive_or_expression> "|" <exclusive_or_expression> // reserved
+ */
+inclusive_or_expression
+ exclusive_or_expression/* .and .loop inclusive_or_expression_1*/;
+/*inclusive_or_expression_1
+ bar .and exclusive_or_expression .and .true .emit OP_BITOR;*/
+
+/*
+ * <logical_and_expression> ::= <inclusive_or_expression>
+ * | <logical_and_expression> "&&" <inclusive_or_expression>
+ */
+logical_and_expression
+ inclusive_or_expression .and .loop logical_and_expression_1;
+logical_and_expression_1
+ ampersandampersand .and inclusive_or_expression .and .true .emit OP_LOGICALAND;
+
+/*
+ * <logical_xor_expression> ::= <logical_and_expression>
+ * | <logical_xor_expression> "^^" <logical_and_expression>
+ */
+logical_xor_expression
+ logical_and_expression .and .loop logical_xor_expression_1;
+logical_xor_expression_1
+ caretcaret .and logical_and_expression .and .true .emit OP_LOGICALXOR;
+
+/*
+ * <logical_or_expression> ::= <logical_xor_expression>
+ * | <logical_or_expression> "||" <logical_xor_expression>
+ */
+logical_or_expression
+ logical_xor_expression .and .loop logical_or_expression_1;
+logical_or_expression_1
+ barbar .and logical_xor_expression .and .true .emit OP_LOGICALOR;
+
+/*
+ * <conditional_expression> ::= <logical_or_expression>
+ * | <logical_or_expression> "?" <expression> ":" <conditional_expression>
+ */
+conditional_expression
+ logical_or_expression .and .loop conditional_expression_1;
+conditional_expression_1
+ question .and expression .and colon .and conditional_expression .and .true .emit OP_SELECT;
+
+/*
+ * <assignment_expression> ::= <conditional_expression>
+ * | <unary_expression> <assignment_operator> <assignment_expression>
+ *
+ * <assignment_operator> ::= "="
+ * | "*="
+ * | "/="
+ * | "+="
+ * | "-="
+ * | "%=" // reserved
+ * | "<<=" // reserved
+ * | ">>=" // reserved
+ * | "&=" // reserved
+ * | "^=" // reserved
+ * | "|=" // reserved
+ */
+assignment_expression
+ assignment_expression_1 .or assignment_expression_2 .or assignment_expression_3 .or
+ assignment_expression_4 .or assignment_expression_5/* .or assignment_expression_6 .or
+ assignment_expression_7 .or assignment_expression_8 .or assignment_expression_9 .or
+ assignment_expression_10 .or assignment_expression_11*/ .or conditional_expression;
+assignment_expression_1
+ unary_expression .and equals .and assignment_expression .and .true .emit OP_ASSIGN;
+assignment_expression_2
+ unary_expression .and starequals .and assignment_expression .and .true .emit OP_MULASSIGN;
+assignment_expression_3
+ unary_expression .and slashequals .and assignment_expression .and .true .emit OP_DIVASSIGN;
+assignment_expression_4
+ unary_expression .and plusequals .and assignment_expression .and .true .emit OP_ADDASSIGN;
+assignment_expression_5
+ unary_expression .and minusequals .and assignment_expression .and .true .emit OP_SUBASSIGN;
+/*assignment_expression_6
+ unary_expression .and percentequals .and assignment_expression .and .true .emit OP_MODASSIGN;*/
+/*assignment_expression_7
+ unary_expression .and lesslessequals .and assignment_expression .and .true .emit OP_LSHASSIGN;*/
+/*assignment_expression_8
+ unary_expression .and greatergreaterequals .and assignment_expression .and
+ .true .emit OP_RSHASSIGN;*/
+/*assignment_expression_9
+ unary_expression .and ampersandequals .and assignment_expression .and .true .emit OP_ANDASSIGN;*/
+/*assignment_expression_10
+ unary_expression .and caretequals .and assignment_expression .and .true .emit OP_XORASSIGN;*/
+/*assignment_expression_11
+ unary_expression .and barequals .and assignment_expression .and .true .emit OP_ORASSIGN;*/
+
+/*
+ * <expression> ::= <assignment_expression>
+ * | <expression> "," <assignment_expression>
+ */
+expression
+ assignment_expression .and .loop expression_1;
+expression_1
+ comma .and assignment_expression .and .true .emit OP_SEQUENCE;
+
+/*
+ * <constant_expression> ::= <conditional_expression>
+ */
+constant_expression
+ conditional_expression .and .true .emit OP_END;
+
+/*
+ * <declaration> ::= <function_prototype> ";"
+ * | <init_declarator_list> ";"
+ */
+declaration
+ declaration_1 .or declaration_2;
+declaration_1
+ function_prototype .emit DECLARATION_FUNCTION_PROTOTYPE .and semicolon;
+declaration_2
+ init_declarator_list .emit DECLARATION_INIT_DECLARATOR_LIST .and semicolon;
+
+/*
+ * <function_prototype> ::= <function_header> "void" ")"
+ * | <function_declarator> ")"
+ */
+function_prototype
+ function_prototype_1 .or function_prototype_2;
+function_prototype_1
+ function_header .and "void" .and rparen .error RPAREN_EXPECTED .emit PARAMETER_NONE;
+function_prototype_2
+ function_declarator .and rparen .error RPAREN_EXPECTED .emit PARAMETER_NONE;
+
+/*
+ * <function_declarator> ::= <function_header>
+ * | <function_header_with_parameters>
+ */
+function_declarator
+ function_header_with_parameters .or function_header;
+
+/*
+ * <function_header_with_parameters> ::= <function_header> <parameter_declaration>
+ * | <function_header_with_parameters> ","
+ * <parameter_declaration>
+ */
+function_header_with_parameters
+ function_header .and parameter_declaration .and .loop function_header_with_parameters_1;
+function_header_with_parameters_1
+ comma .and parameter_declaration;
+
+/*
+ * <function_header> ::= <fully_specified_type> <identifier> "("
+ */
+function_header
+ function_header_nospace .or function_header_space;
+function_header_space
+ fully_specified_type_space .and space .and function_decl_identifier .and lparen;
+function_header_nospace
+ fully_specified_type_nospace .and function_decl_identifier .and lparen;
+
+/*
+ * <function_decl_identifier> ::= "__constructor"
+ * | <__operator>
+ * | <identifier>
+ *
+ * note: this is an extension to the standard language specification.
+ * normally slang disallows operator and constructor prototypes and definitions
+ */
+function_decl_identifier
+ .if (parsing_builtin != 0) __operator .emit FUNCTION_OPERATOR .or
+ .if (parsing_builtin != 0) "__constructor" .emit FUNCTION_CONSTRUCTOR .or
+ identifier .emit FUNCTION_ORDINARY;
+
+/*
+ * <__operator> ::= "__operator" <overriden_op>
+ *
+ * note: this is an extension to the standard language specification.
+ * normally slang disallows operator prototypes and definitions
+ */
+__operator
+ "__operator" .and overriden_operator .error INVALID_OPERATOR_OVERRIDE;
+
+/*
+ * <overriden_op> ::= "="
+ * | "+="
+ * | "-="
+ * | "*="
+ * | "/="
+ * | "%=" // reserved
+ * | "<<=" // reserved
+ * | ">>=" // reserved
+ * | "&=" // reserved
+ * | "^=" // reserved
+ * | "|=" // reserved
+ * | "^^"
+ * | "|" // reserved
+ * | "^" // reserved
+ * | "&" // reserved
+ * | "=="
+ * | "!="
+ * | "<"
+ * | ">"
+ * | "<="
+ * | ">="
+ * | "<<" // reserved
+ * | ">>" // reserved
+ * | "*"
+ * | "/"
+ * | "%" // reserved
+ * | "++"
+ * | "--"
+ * | "+"
+ * | "-"
+ * | "~" // reserved
+ * | "!"
+ *
+ * note: this is an extension to the standard language specification.
+ * normally slang disallows operator prototypes and definitions
+ */
+overriden_operator
+ plusplus .emit OPERATOR_INCREMENT .or
+ plusequals .emit OPERATOR_ADDASSIGN .or
+ plus .emit OPERATOR_PLUS .or
+ minusminus .emit OPERATOR_DECREMENT .or
+ minusequals .emit OPERATOR_SUBASSIGN .or
+ minus .emit OPERATOR_MINUS .or
+ bang .emit OPERATOR_NOT .or
+ starequals .emit OPERATOR_MULASSIGN .or
+ star .emit OPERATOR_MULTIPLY .or
+ slashequals .emit OPERATOR_DIVASSIGN .or
+ slash .emit OPERATOR_DIVIDE .or
+ lessequals .emit OPERATOR_LESSEQUAL .or
+ /*lesslessequals .emit OPERATOR_LSHASSIGN .or*/
+ /*lessless .emit OPERATOR_LSHIFT .or*/
+ less .emit OPERATOR_LESS .or
+ greaterequals .emit OPERATOR_GREATEREQUAL .or
+ /*greatergreaterequals .emit OPERATOR_RSHASSIGN .or*/
+ /*greatergreater .emit OPERATOR_RSHIFT .or*/
+ greater .emit OPERATOR_GREATER .or
+ /*percentequals .emit OPERATOR_MODASSIGN .or*/
+ /*percent .emit OPERATOR_MODULUS .or*/
+ /*ampersandequals .emit OPERATOR_ANDASSIGN */
+ /*ampersand .emit OPERATOR_BITAND .or*/
+ /*barequals .emit OPERATOR_ORASSIGN .or*/
+ /*bar .emit OPERATOR_BITOR .or*/
+ /*tilde .emit OPERATOR_COMPLEMENT .or*/
+ /*caretequals .emit OPERATOR_XORASSIGN .or*/
+ caretcaret .emit OPERATOR_LOGICALXOR /*.or
+ caret .emit OPERATOR_BITXOR*/;
+
+/*
+ * <parameter_declarator> ::= <type_specifier> <identifier>
+ * | <type_specifier> <identifier> "[" <constant_expression> "]"
+ */
+parameter_declarator
+ parameter_declarator_nospace .or parameter_declarator_space;
+parameter_declarator_nospace
+ type_specifier_nospace .and identifier .and parameter_declarator_1;
+parameter_declarator_space
+ type_specifier_space .and space .and identifier .and parameter_declarator_1;
+parameter_declarator_1
+ parameter_declarator_2 .emit PARAMETER_ARRAY_PRESENT .or
+ .true .emit PARAMETER_ARRAY_NOT_PRESENT;
+parameter_declarator_2
+ lbracket .and constant_expression .and rbracket;
+
+/*
+ * <parameter_declaration> ::= <type_qualifier> <parameter_qualifier>
+ * <precision> <parameter_declarator>
+ * | <type_qualifier> <parameter_qualifier>
+ * <precision> <parameter_type_specifier>
+ * | <type_qualifier> <parameter_qualifier>
+ * <parameter_declarator>
+ * | <type_qualifier> <parameter_qualifier>
+ * <parameter_type_specifier>
+ * | <parameter_qualifier> <precision>
+ * <parameter_declarator>
+ * | <parameter_qualifier> <precision>
+ * <parameter_type_specifier>
+ * | <parameter_qualifier> <parameter_declarator>
+ * | <parameter_qualifier> <parameter_type_specifier>
+ */
+parameter_declaration
+ parameter_declaration_1 .emit PARAMETER_NEXT;
+parameter_declaration_1
+ parameter_declaration_2 .or parameter_declaration_3;
+parameter_declaration_2
+ type_qualifier .and space .and parameter_qualifier .and parameter_declaration_4;
+parameter_declaration_3
+ parameter_qualifier .emit TYPE_QUALIFIER_NONE .and parameter_declaration_4;
+parameter_declaration_4
+ parameter_declaration_optprec .and parameter_declaration_rest;
+parameter_declaration_optprec
+ parameter_declaration_prec .or .true .emit PRECISION_DEFAULT;
+parameter_declaration_prec
+ precision .and space;
+parameter_declaration_rest
+ parameter_declarator .or parameter_type_specifier;
+
+/*
+ * <parameter_qualifier> ::= "in"
+ * | "out"
+ * | "inout"
+ * | ""
+ */
+parameter_qualifier
+ parameter_qualifier_1 .or .true .emit PARAM_QUALIFIER_IN;
+parameter_qualifier_1
+ parameter_qualifier_2 .and space;
+parameter_qualifier_2
+ "in" .emit PARAM_QUALIFIER_IN .or
+ "out" .emit PARAM_QUALIFIER_OUT .or
+ "inout" .emit PARAM_QUALIFIER_INOUT;
+
+/*
+ * <parameter_type_specifier> ::= <type_specifier>
+ * | <type_specifier> "[" <constant_expression> "]"
+ */
+parameter_type_specifier
+ parameter_type_specifier_1 .and .true .emit '\0' .and parameter_type_specifier_2;
+parameter_type_specifier_1
+ type_specifier_nospace .or type_specifier_space;
+parameter_type_specifier_2
+ parameter_type_specifier_3 .emit PARAMETER_ARRAY_PRESENT .or
+ .true .emit PARAMETER_ARRAY_NOT_PRESENT;
+parameter_type_specifier_3
+ lbracket .and constant_expression .and rbracket;
+
+/*
+ * <init_declarator_list> ::= <single_declaration>
+ * | <init_declarator_list> "," <identifier>
+ * | <init_declarator_list> "," <identifier> "[" "]"
+ * | <init_declarator_list> "," <identifier> "[" <constant_expression> "]"
+ * | <init_declarator_list> "," <identifier> "=" <initializer>
+ */
+init_declarator_list
+ single_declaration .and .loop init_declarator_list_1 .emit DECLARATOR_NEXT .and
+ .true .emit DECLARATOR_NONE;
+init_declarator_list_1
+ comma .and identifier .emit VARIABLE_IDENTIFIER .and init_declarator_list_2;
+init_declarator_list_2
+ init_declarator_list_3 .or init_declarator_list_4 .or .true .emit VARIABLE_NONE;
+init_declarator_list_3
+ equals .and initializer .emit VARIABLE_INITIALIZER;
+init_declarator_list_4
+ lbracket .and init_declarator_list_5 .and rbracket;
+init_declarator_list_5
+ constant_expression .emit VARIABLE_ARRAY_EXPLICIT .or .true .emit VARIABLE_ARRAY_UNKNOWN;
+
+/*
+ * <single_declaration> ::= <fully_specified_type>
+ * | <fully_specified_type> <identifier>
+ * | <fully_specified_type> <identifier> "[" "]"
+ * | <fully_specified_type> <identifier> "[" <constant_expression> "]"
+ * | <fully_specified_type> <identifier> "=" <initializer>
+ */
+single_declaration
+ single_declaration_nospace .or single_declaration_space;
+single_declaration_space
+ fully_specified_type_space .and single_declaration_space_1;
+single_declaration_nospace
+ fully_specified_type_nospace .and single_declaration_nospace_1;
+single_declaration_space_1
+ single_declaration_space_2 .emit VARIABLE_IDENTIFIER .or .true .emit VARIABLE_NONE;
+single_declaration_nospace_1
+ single_declaration_nospace_2 .emit VARIABLE_IDENTIFIER .or .true .emit VARIABLE_NONE;
+single_declaration_space_2
+ space .and identifier .and single_declaration_3;
+single_declaration_nospace_2
+ identifier .and single_declaration_3;
+single_declaration_3
+ single_declaration_4 .or single_declaration_5 .or .true .emit VARIABLE_NONE;
+single_declaration_4
+ equals .and initializer .emit VARIABLE_INITIALIZER;
+single_declaration_5
+ lbracket .and single_declaration_6 .and rbracket;
+single_declaration_6
+ constant_expression .emit VARIABLE_ARRAY_EXPLICIT .or .true .emit VARIABLE_ARRAY_UNKNOWN;
+
+/*
+ * <fully_specified_type> ::= <opt_invariant> <opt_centroid> <opt_qualifer> <opt_precision> <type_specifier>
+ *
+ * Example: "invariant varying highp vec3"
+ */
+fully_specified_type_space
+ fully_specified_type_optinvariant .and fully_specified_type_optcentroid .and fully_specified_type_optqual .and fully_specified_type_optprec .and type_specifier_space;
+fully_specified_type_nospace
+ fully_specified_type_optinvariant .and fully_specified_type_optcentroid .and fully_specified_type_optqual .and fully_specified_type_optprec .and type_specifier_nospace;
+fully_specified_type_optinvariant
+ fully_specified_type_invariant .or .true .emit TYPE_VARIANT;
+fully_specified_type_invariant
+ invariant_qualifier .and space;
+fully_specified_type_optcentroid
+ fully_specified_type_centroid .or .true .emit TYPE_CENTER;
+fully_specified_type_centroid
+ centroid_qualifier .and space;
+fully_specified_type_optqual
+ fully_specified_type_qual .or .true .emit TYPE_QUALIFIER_NONE;
+fully_specified_type_qual
+ type_qualifier .and space;
+fully_specified_type_optprec
+ fully_specified_type_prec .or .true .emit PRECISION_DEFAULT;
+fully_specified_type_prec
+ precision .and space;
+
+/*
+ * <invariant_qualifier> ::= "invariant"
+ */
+invariant_qualifier
+ "invariant" .emit TYPE_INVARIANT;
+
+centroid_qualifier
+ "centroid" .emit TYPE_CENTROID;
+
+
+/*
+ * <type_qualifier> ::= "const"
+ * | "attribute" // Vertex only.
+ * | "varying"
+ * | "uniform"
+ * | "__fixed_output"
+ * | "__fixed_input"
+ *
+ * note: this is an extension to the standard language specification,
+ * normally slang disallows __fixed_output and __fixed_input type qualifiers
+ */
+type_qualifier
+ "const" .emit TYPE_QUALIFIER_CONST .or
+ .if (shader_type == 2) "attribute" .emit TYPE_QUALIFIER_ATTRIBUTE .or
+ "varying" .emit TYPE_QUALIFIER_VARYING .or
+ "uniform" .emit TYPE_QUALIFIER_UNIFORM .or
+ .if (parsing_builtin != 0) "__fixed_output" .emit TYPE_QUALIFIER_FIXEDOUTPUT .or
+ .if (parsing_builtin != 0) "__fixed_input" .emit TYPE_QUALIFIER_FIXEDINPUT;
+
+/*
+ * <type_specifier_nonarray> ::= "void"
+ * | "float"
+ * | "int"
+ * | "bool"
+ * | "vec2"
+ * | "vec3"
+ * | "vec4"
+ * | "bvec2"
+ * | "bvec3"
+ * | "bvec4"
+ * | "ivec2"
+ * | "ivec3"
+ * | "ivec4"
+ * | "mat2"
+ * | "mat3"
+ * | "mat4"
+ * | "mat2x3"
+ * | "mat3x2"
+ * | "mat2x4"
+ * | "mat4x2"
+ * | "mat3x4"
+ * | "mat4x3"
+ * | "sampler1D"
+ * | "sampler2D"
+ * | "sampler3D"
+ * | "samplerCube"
+ * | "sampler1DShadow"
+ * | "sampler2DShadow"
+ * | "sampler2DRect"
+ * | "sampler2DRectShadow"
+ * | <struct_specifier>
+ * | <type_name>
+ */
+type_specifier_nonarray_space
+ "void" .emit TYPE_SPECIFIER_VOID .or
+ "float" .emit TYPE_SPECIFIER_FLOAT .or
+ "int" .emit TYPE_SPECIFIER_INT .or
+ "bool" .emit TYPE_SPECIFIER_BOOL .or
+ "vec2" .emit TYPE_SPECIFIER_VEC2 .or
+ "vec3" .emit TYPE_SPECIFIER_VEC3 .or
+ "vec4" .emit TYPE_SPECIFIER_VEC4 .or
+ "bvec2" .emit TYPE_SPECIFIER_BVEC2 .or
+ "bvec3" .emit TYPE_SPECIFIER_BVEC3 .or
+ "bvec4" .emit TYPE_SPECIFIER_BVEC4 .or
+ "ivec2" .emit TYPE_SPECIFIER_IVEC2 .or
+ "ivec3" .emit TYPE_SPECIFIER_IVEC3 .or
+ "ivec4" .emit TYPE_SPECIFIER_IVEC4 .or
+ "mat2" .emit TYPE_SPECIFIER_MAT2 .or
+ "mat3" .emit TYPE_SPECIFIER_MAT3 .or
+ "mat4" .emit TYPE_SPECIFIER_MAT4 .or
+ "mat2x3" .emit TYPE_SPECIFIER_MAT23 .or
+ "mat3x2" .emit TYPE_SPECIFIER_MAT32 .or
+ "mat2x4" .emit TYPE_SPECIFIER_MAT24 .or
+ "mat4x2" .emit TYPE_SPECIFIER_MAT42 .or
+ "mat3x4" .emit TYPE_SPECIFIER_MAT34 .or
+ "mat4x3" .emit TYPE_SPECIFIER_MAT43 .or
+ "sampler1D" .emit TYPE_SPECIFIER_SAMPLER1D .or
+ "sampler2D" .emit TYPE_SPECIFIER_SAMPLER2D .or
+ "sampler3D" .emit TYPE_SPECIFIER_SAMPLER3D .or
+ "samplerCube" .emit TYPE_SPECIFIER_SAMPLERCUBE .or
+ "sampler1DShadow" .emit TYPE_SPECIFIER_SAMPLER1DSHADOW .or
+ "sampler2DShadow" .emit TYPE_SPECIFIER_SAMPLER2DSHADOW .or
+ "sampler2DRect" .emit TYPE_SPECIFIER_SAMPLER2DRECT .or
+ "sampler2DRectShadow" .emit TYPE_SPECIFIER_SAMPLER2DRECTSHADOW .or
+ type_name .emit TYPE_SPECIFIER_TYPENAME;
+type_specifier_nonarray_nospace
+ struct_specifier .emit TYPE_SPECIFIER_STRUCT;
+type_specifier_nonarray
+ type_specifier_nonarray_nospace .or type_specifier_nonarray_space;
+
+/*
+ * <type_specifier> ::= <type_specifier_nonarray>
+ * | <type_specifier_nonarray> "[" <constant_expression> "]"
+ */
+type_specifier_space
+ type_specifier_nonarray_space .and .true .emit TYPE_SPECIFIER_NONARRAY;
+type_specifier_nospace
+ type_specifier_nospace_array .or type_specifier_nospace_1;
+type_specifier_nospace_1
+ type_specifier_nonarray_nospace .and .true .emit TYPE_SPECIFIER_NONARRAY;
+type_specifier_nospace_array
+ type_specifier_nonarray .and lbracket .emit TYPE_SPECIFIER_ARRAY .and constant_expression .and rbracket;
+
+/*
+ * <struct_specifier> ::= "struct" <identifier> "{" <struct_declaration_list> "}"
+ * | "struct" "{" <struct_declaration_list> "}"
+ */
+struct_specifier
+ "struct" .and struct_specifier_1 .and optional_space .and lbrace .error LBRACE_EXPECTED .and
+ struct_declaration_list .and rbrace .emit FIELD_NONE;
+struct_specifier_1
+ struct_specifier_2 .or .true .emit '\0';
+struct_specifier_2
+ space .and identifier;
+
+/*
+ * <struct_declaration_list> ::= <struct_declaration>
+ * | <struct_declaration_list> <struct_declaration>
+ */
+struct_declaration_list
+ struct_declaration .and .loop struct_declaration .emit FIELD_NEXT;
+
+/*
+ * <struct_declaration> ::= <type_specifier> <struct_declarator_list> ";"
+ */
+struct_declaration
+ struct_declaration_nospace .or struct_declaration_space;
+struct_declaration_space
+ type_specifier_space .and space .and struct_declarator_list .and semicolon .emit FIELD_NONE;
+struct_declaration_nospace
+ type_specifier_nospace .and struct_declarator_list .and semicolon .emit FIELD_NONE;
+
+/*
+ * <struct_declarator_list> ::= <struct_declarator>
+ * | <struct_declarator_list> "," <struct_declarator>
+ */
+struct_declarator_list
+ struct_declarator .and .loop struct_declarator_list_1 .emit FIELD_NEXT;
+struct_declarator_list_1
+ comma .and struct_declarator;
+
+/*
+ * <struct_declarator> ::= <identifier>
+ * | <identifier> "[" <constant_expression> "]"
+ */
+struct_declarator
+ identifier .and struct_declarator_1;
+struct_declarator_1
+ struct_declarator_2 .emit FIELD_ARRAY .or .true .emit FIELD_NONE;
+struct_declarator_2
+ lbracket .and constant_expression .and rbracket;
+
+/*
+ * <initializer> ::= <assignment_expression>
+ */
+initializer
+ assignment_expression .and .true .emit OP_END;
+
+/*
+ * <declaration_statement> ::= <declaration>
+ */
+declaration_statement
+ declaration;
+
+/*
+ * <statement> ::= <compound_statement>
+ * | <simple_statement>
+ */
+statement
+ compound_statement .or simple_statement;
+statement_space
+ compound_statement .or statement_space_1;
+statement_space_1
+ space .and simple_statement;
+
+/*
+ * <simple_statement> ::= <__asm_statement>
+ * | <selection_statement>
+ * | <iteration_statement>
+ * | <jump_statement>
+ * | <expression_statement>
+ * | <declaration_statement>
+ *
+ * note: this is an extension to the standard language specification.
+ * normally slang disallows use of __asm statements
+ */
+simple_statement
+ .if (parsing_builtin != 0) __asm_statement .emit OP_ASM .or
+ selection_statement .or
+ iteration_statement .or
+ precision_stmt .emit OP_PRECISION .or
+ jump_statement .or
+ expression_statement .emit OP_EXPRESSION .or
+ declaration_statement .emit OP_DECLARE;
+
+/*
+ * <compound_statement> ::= "{" "}"
+ * | "{" <statement_list> "}"
+ */
+compound_statement
+ compound_statement_1 .emit OP_BLOCK_BEGIN_NEW_SCOPE .and .true .emit OP_END;
+compound_statement_1
+ compound_statement_2 .or compound_statement_3;
+compound_statement_2
+ lbrace .and rbrace;
+compound_statement_3
+ lbrace .and statement_list .and rbrace;
+
+/*
+ * <statement_no_new_scope> ::= <compound_statement_no_new_scope>
+ * | <simple_statement>
+ */
+statement_no_new_scope
+ compound_statement_no_new_scope .or simple_statement;
+
+/*
+ * <compound_statement_no_new_scope> ::= "{" "}"
+ * | "{" <statement_list> "}"
+ */
+compound_statement_no_new_scope
+ compound_statement_no_new_scope_1 .emit OP_BLOCK_BEGIN_NO_NEW_SCOPE .and .true .emit OP_END;
+compound_statement_no_new_scope_1
+ compound_statement_no_new_scope_2 .or compound_statement_no_new_scope_3;
+compound_statement_no_new_scope_2
+ lbrace .and rbrace;
+compound_statement_no_new_scope_3
+ lbrace .and statement_list .and rbrace;
+
+/*
+ * <statement_list> ::= <statement>
+ * | <statement_list> <statement>
+ */
+statement_list
+ statement .and .loop statement;
+
+/*
+ * <expression_statement> ::= ";"
+ * | <expression> ";"
+ */
+expression_statement
+ expression_statement_1 .or expression_statement_2;
+expression_statement_1
+ semicolon .emit OP_PUSH_VOID .emit OP_END;
+expression_statement_2
+ expression .and semicolon .emit OP_END;
+
+/*
+ * <selection_statement> ::= "if" "(" <expression> ")" <selection_rest_statement>
+ */
+selection_statement
+ "if" .emit OP_IF .and lparen .error LPAREN_EXPECTED .and expression .and
+ rparen .error RPAREN_EXPECTED .emit OP_END .and selection_rest_statement;
+
+/*
+ * <selection_rest_statement> ::= <statement> "else" <statement>
+ * | <statement>
+ */
+selection_rest_statement
+ statement .and selection_rest_statement_1;
+selection_rest_statement_1
+ selection_rest_statement_2 .or .true .emit OP_EXPRESSION .emit OP_PUSH_VOID .emit OP_END;
+selection_rest_statement_2
+ "else" .and optional_space .and statement;
+
+/*
+ * <condition> ::= <expression>
+ * | <fully_specified_type> <identifier> "=" <initializer>
+ *
+ * note: if <condition_1> is executed, the emit format must
+ * match <declaration> emit format
+ */
+condition
+ condition_1 .emit OP_DECLARE .emit DECLARATION_INIT_DECLARATOR_LIST .or
+ condition_3 .emit OP_EXPRESSION;
+condition_1
+ condition_1_nospace .or condition_1_space;
+condition_1_nospace
+ fully_specified_type_nospace .and condition_2;
+condition_1_space
+ fully_specified_type_space .and space .and condition_2;
+condition_2
+ identifier .emit VARIABLE_IDENTIFIER .and equals .emit VARIABLE_INITIALIZER .and
+ initializer .and .true .emit DECLARATOR_NONE;
+condition_3
+ expression .and .true .emit OP_END;
+
+/*
+ * <iteration_statement> ::= "while" "(" <condition> ")" <statement>
+ * | "do" <statement> "while" "(" <expression> ")" ";"
+ * | "for" "(" <for_init_statement> <for_rest_statement> ")"
+ * <statement_no_new_scope>
+ */
+iteration_statement
+ iteration_statement_1 .or iteration_statement_2 .or iteration_statement_3;
+iteration_statement_1
+ "while" .emit OP_WHILE .and lparen .error LPAREN_EXPECTED .and condition .and
+ rparen .error RPAREN_EXPECTED .and statement;
+iteration_statement_2
+ "do" .emit OP_DO .and statement_space .and "while" .and lparen .error LPAREN_EXPECTED .and
+ expression .and rparen .error RPAREN_EXPECTED .emit OP_END .and semicolon;
+iteration_statement_3
+ "for" .emit OP_FOR .and lparen .error LPAREN_EXPECTED .and for_init_statement .and
+ for_rest_statement .and rparen .error RPAREN_EXPECTED .and statement_no_new_scope;
+
+/*
+ * <for_init_statement> ::= <expression_statement>
+ * | <declaration_statement>
+ */
+for_init_statement
+ expression_statement .emit OP_EXPRESSION .or declaration_statement .emit OP_DECLARE;
+
+/*
+ * <conditionopt> ::= <condition>
+ * | ""
+ *
+ * note: <conditionopt> is used only by "for" statement.
+ * if <condition> is ommitted, parser simulates default behaviour,
+ * that is simulates "true" expression
+ */
+conditionopt
+ condition .or
+ .true .emit OP_EXPRESSION .emit OP_PUSH_BOOL .emit 2 .emit '1' .emit '\0' .emit OP_END;
+
+/*
+ * <for_rest_statement> ::= <conditionopt> ";"
+ * | <conditionopt> ";" <expression>
+ */
+for_rest_statement
+ conditionopt .and semicolon .and for_rest_statement_1;
+for_rest_statement_1
+ for_rest_statement_2 .or .true .emit OP_PUSH_VOID .emit OP_END;
+for_rest_statement_2
+ expression .and .true .emit OP_END;
+
+/*
+ * <jump_statement> ::= "continue" ";"
+ * | "break" ";"
+ * | "return" ";"
+ * | "return" <expression> ";"
+ * | "discard" ";" // Fragment shader only.
+ */
+jump_statement
+ jump_statement_1 .or jump_statement_2 .or jump_statement_3 .or jump_statement_4 .or
+ .if (shader_type == 1) jump_statement_5;
+jump_statement_1
+ "continue" .and semicolon .emit OP_CONTINUE;
+jump_statement_2
+ "break" .and semicolon .emit OP_BREAK;
+jump_statement_3
+ "return" .emit OP_RETURN .and optional_space .and expression .and semicolon .emit OP_END;
+jump_statement_4
+ "return" .emit OP_RETURN .and semicolon .emit OP_PUSH_VOID .emit OP_END;
+jump_statement_5
+ "discard" .and semicolon .emit OP_DISCARD;
+
+/*
+ * <__asm_statement> ::= "__asm" <identifier> <asm_arguments> ";"
+ *
+ * note: this is an extension to the standard language specification.
+ * normally slang disallows __asm statements
+ */
+__asm_statement
+ "__asm" .and space .and identifier .and space .and asm_arguments .and semicolon .emit OP_END;
+
+/*
+ * <asm_arguments> ::= <asm_argument>
+ * | <asm_arguments> "," <asm_argument>
+ *
+ * note: this is an extension to the standard language specification.
+ * normally slang disallows __asm statements
+ */
+asm_arguments
+ asm_argument .and .true .emit OP_END .and .loop asm_arguments_1;
+asm_arguments_1
+ comma .and asm_argument .and .true .emit OP_END;
+
+/*
+ * <asm_argument> ::= <variable_identifier>
+ * | <floatconstant>
+ *
+ * note: this is an extension to the standard language specification.
+ * normally slang disallows __asm statements
+ */
+asm_argument
+ var_with_field .or
+ variable_identifier .or
+ floatconstant;
+
+var_with_field
+ variable_identifier .and dot .and field_selection .emit OP_FIELD;
+
+
+/*
+ * <translation_unit> ::= <external_declaration>
+ * | <translation_unit> <external_declaration>
+ */
+translation_unit
+ optional_space .emit REVISION .and external_declaration .error INVALID_EXTERNAL_DECLARATION .and
+ .loop external_declaration .and optional_space .and
+ '\0' .error INVALID_EXTERNAL_DECLARATION .emit EXTERNAL_NULL;
+
+
+/*
+ * <external_declaration> ::= <function_definition>
+ * | <declaration>
+ */
+external_declaration
+ precision_stmt .emit DEFAULT_PRECISION .or
+ function_definition .emit EXTERNAL_FUNCTION_DEFINITION .or
+ invariant_stmt .emit INVARIANT_STMT .or
+ declaration .emit EXTERNAL_DECLARATION;
+
+
+/*
+ * <precision_stmt> ::= "precision" <precision> <prectype>
+ */
+precision_stmt
+ "precision" .and space .and precision .error INVALID_PRECISION .and space .and prectype .error INVALID_PRECISION_TYPE .and semicolon;
+
+/*
+ * <precision> ::= "lowp"
+ * | "mediump"
+ * | "highp"
+ */
+precision
+ "lowp" .emit PRECISION_LOW .or
+ "mediump" .emit PRECISION_MEDIUM .or
+ "highp" .emit PRECISION_HIGH;
+
+/*
+ * <prectype> ::= "int"
+ * | "float"
+ * | "a sampler type"
+ */
+prectype
+ "int" .emit TYPE_SPECIFIER_INT .or
+ "float" .emit TYPE_SPECIFIER_FLOAT .or
+ "sampler1D" .emit TYPE_SPECIFIER_SAMPLER1D .or
+ "sampler2D" .emit TYPE_SPECIFIER_SAMPLER2D .or
+ "sampler3D" .emit TYPE_SPECIFIER_SAMPLER3D .or
+ "samplerCube" .emit TYPE_SPECIFIER_SAMPLERCUBE .or
+ "sampler1DShadow" .emit TYPE_SPECIFIER_SAMPLER1DSHADOW .or
+ "sampler2DShadow" .emit TYPE_SPECIFIER_SAMPLER2DSHADOW .or
+ "sampler2DRect" .emit TYPE_SPECIFIER_SAMPLER2DRECT .or
+ "sampler2DRectShadow" .emit TYPE_SPECIFIER_SAMPLER2DRECTSHADOW;
+
+
+/*
+ * <invariant_stmt> ::= "invariant" identifier;
+ */
+invariant_stmt
+ "invariant" .and space .and identifier .and semicolon;
+
+
+/*
+ * <function_definition> :: <function_prototype> <compound_statement_no_new_scope>
+ */
+function_definition
+ function_prototype .and compound_statement_no_new_scope;
+
+
+
+/*
+ * helper rules, not part of the official language syntax
+ */
+
+digit_oct
+ '0'-'7';
+
+digit_dec
+ '0'-'9';
+
+digit_hex
+ '0'-'9' .or 'A'-'F' .or 'a'-'f';
+
+id_character_first
+ 'a'-'z' .or 'A'-'Z' .or '_';
+
+id_character_next
+ id_character_first .or digit_dec;
+
+identifier
+ id_character_first .emit * .and .loop id_character_next .emit * .and .true .emit '\0';
+
+float
+ float_1 .or float_2 .or float_3;
+float_1
+ float_fractional_constant .and float_optional_exponent_part .and optional_f_suffix;
+float_2
+ float_digit_sequence .and .true .emit '\0' .and float_exponent_part .and optional_f_suffix;
+float_3
+ float_digit_sequence .and .true .emit '\0' .and 'f' .emit '\0';
+
+float_fractional_constant
+ float_fractional_constant_1 .or float_fractional_constant_2 .or float_fractional_constant_3;
+float_fractional_constant_1
+ float_digit_sequence .and '.' .and float_digit_sequence;
+float_fractional_constant_2
+ float_digit_sequence .and '.' .and .true .emit '\0';
+float_fractional_constant_3
+ '.' .emit '\0' .and float_digit_sequence;
+
+float_optional_exponent_part
+ float_exponent_part .or .true .emit '\0';
+
+float_digit_sequence
+ digit_dec .emit * .and .loop digit_dec .emit * .and .true .emit '\0';
+
+float_exponent_part
+ float_exponent_part_1 .or float_exponent_part_2;
+float_exponent_part_1
+ 'e' .and float_optional_sign .and float_digit_sequence;
+float_exponent_part_2
+ 'E' .and float_optional_sign .and float_digit_sequence;
+
+float_optional_sign
+ float_sign .or .true;
+
+float_sign
+ '+' .or '-' .emit '-';
+
+optional_f_suffix
+ 'f' .or .true;
+
+
+integer
+ integer_hex .or integer_oct .or integer_dec;
+
+integer_hex
+ '0' .and integer_hex_1 .emit 0x10 .and digit_hex .emit * .and .loop digit_hex .emit * .and
+ .true .emit '\0';
+integer_hex_1
+ 'x' .or 'X';
+
+integer_oct
+ '0' .emit 8 .emit * .and .loop digit_oct .emit * .and .true .emit '\0';
+
+integer_dec
+ digit_dec .emit 10 .emit * .and .loop digit_dec .emit * .and .true .emit '\0';
+
+boolean
+ "true" .emit 2 .emit '1' .emit '\0' .or
+ "false" .emit 2 .emit '0' .emit '\0';
+
+type_name
+ identifier;
+
+field_selection
+ identifier;
+
+floatconstant
+ float .emit OP_PUSH_FLOAT;
+
+intconstant
+ integer .emit OP_PUSH_INT;
+
+boolconstant
+ boolean .emit OP_PUSH_BOOL;
+
+optional_space
+ .loop single_space;
+
+space
+ single_space .and .loop single_space;
+
+single_space
+ white_char .or c_style_comment_block .or cpp_style_comment_block;
+
+white_char
+ ' ' .or '\t' .or new_line .or '\v' .or '\f';
+
+new_line
+ cr_lf .or lf_cr .or '\n' .or '\r';
+
+cr_lf
+ '\r' .and '\n';
+
+lf_cr
+ '\n' .and '\r';
+
+c_style_comment_block
+ '/' .and '*' .and c_style_comment_rest;
+
+c_style_comment_rest
+ .loop c_style_comment_char_no_star .and c_style_comment_rest_1;
+c_style_comment_rest_1
+ c_style_comment_end .or c_style_comment_rest_2;
+c_style_comment_rest_2
+ '*' .and c_style_comment_rest;
+
+c_style_comment_char_no_star
+ '\x2B'-'\xFF' .or '\x01'-'\x29';
+
+c_style_comment_end
+ '*' .and '/';
+
+cpp_style_comment_block
+ '/' .and '/' .and cpp_style_comment_block_1;
+cpp_style_comment_block_1
+ cpp_style_comment_block_2 .or cpp_style_comment_block_3;
+cpp_style_comment_block_2
+ .loop cpp_style_comment_char .and new_line;
+cpp_style_comment_block_3
+ .loop cpp_style_comment_char;
+
+cpp_style_comment_char
+ '\x0E'-'\xFF' .or '\x01'-'\x09' .or '\x0B'-'\x0C';
+
+/* lexical rules */
+
+/*ampersand
+ optional_space .and '&' .and optional_space;*/
+
+ampersandampersand
+ optional_space .and '&' .and '&' .and optional_space;
+
+/*ampersandequals
+ optional_space .and '&' .and '=' .and optional_space;*/
+
+/*bar
+ optional_space .and '|' .and optional_space;*/
+
+barbar
+ optional_space .and '|' .and '|' .and optional_space;
+
+/*barequals
+ optional_space .and '|' .and '=' .and optional_space;*/
+
+bang
+ optional_space .and '!' .and optional_space;
+
+bangequals
+ optional_space .and '!' .and '=' .and optional_space;
+
+/*caret
+ optional_space .and '^' .and optional_space;*/
+
+caretcaret
+ optional_space .and '^' .and '^' .and optional_space;
+
+/*caretequals
+ optional_space .and '^' .and '=' .and optional_space;*/
+
+colon
+ optional_space .and ':' .and optional_space;
+
+comma
+ optional_space .and ',' .and optional_space;
+
+dot
+ optional_space .and '.' .and optional_space;
+
+equals
+ optional_space .and '=' .and optional_space;
+
+equalsequals
+ optional_space .and '=' .and '=' .and optional_space;
+
+greater
+ optional_space .and '>' .and optional_space;
+
+greaterequals
+ optional_space .and '>' .and '=' .and optional_space;
+
+/*greatergreater
+ optional_space .and '>' .and '>' .and optional_space;*/
+
+/*greatergreaterequals
+ optional_space .and '>' .and '>' .and '=' .and optional_space;*/
+
+lbrace
+ optional_space .and '{' .and optional_space;
+
+lbracket
+ optional_space .and '[' .and optional_space;
+
+less
+ optional_space .and '<' .and optional_space;
+
+lessequals
+ optional_space .and '<' .and '=' .and optional_space;
+
+/*lessless
+ optional_space .and '<' .and '<' .and optional_space;*/
+
+/*lesslessequals
+ optional_space .and '<' .and '<' .and '=' .and optional_space;*/
+
+lparen
+ optional_space .and '(' .and optional_space;
+
+minus
+ optional_space .and '-' .and optional_space;
+
+minusequals
+ optional_space .and '-' .and '=' .and optional_space;
+
+minusminus
+ optional_space .and '-' .and '-' .and optional_space;
+
+/*percent
+ optional_space .and '%' .and optional_space;*/
+
+/*percentequals
+ optional_space .and '%' .and '=' .and optional_space;*/
+
+plus
+ optional_space .and '+' .and optional_space;
+
+plusequals
+ optional_space .and '+' .and '=' .and optional_space;
+
+plusplus
+ optional_space .and '+' .and '+' .and optional_space;
+
+question
+ optional_space .and '?' .and optional_space;
+
+rbrace
+ optional_space .and '}' .and optional_space;
+
+rbracket
+ optional_space .and ']' .and optional_space;
+
+rparen
+ optional_space .and ')' .and optional_space;
+
+semicolon
+ optional_space .and ';' .and optional_space;
+
+slash
+ optional_space .and '/' .and optional_space;
+
+slashequals
+ optional_space .and '/' .and '=' .and optional_space;
+
+star
+ optional_space .and '*' .and optional_space;
+
+starequals
+ optional_space .and '*' .and '=' .and optional_space;
+
+/*tilde
+ optional_space .and '~' .and optional_space;*/
+
+/* string rules - these are used internally by the parser when parsing quoted strings */
+
+.string string_lexer;
+
+string_lexer
+ lex_first_identifier_character .and .loop lex_next_identifier_character;
+
+lex_first_identifier_character
+ 'a'-'z' .or 'A'-'Z' .or '_';
+
+lex_next_identifier_character
+ 'a'-'z' .or 'A'-'Z' .or '0'-'9' .or '_';
+
+/* error rules - these are used by error messages */
+
+err_token
+ '~' .or '`' .or '!' .or '@' .or '#' .or '$' .or '%' .or '^' .or '&' .or '*' .or '(' .or ')' .or
+ '-' .or '+' .or '=' .or '|' .or '\\' .or '[' .or ']' .or '{' .or '}' .or ':' .or ';' .or '"' .or
+ '\'' .or '<' .or ',' .or '>' .or '.' .or '/' .or '?' .or err_identifier;
+
+err_identifier
+ id_character_first .and .loop id_character_next;
+