diff options
Diffstat (limited to 'projects/Stacker/lib')
| -rw-r--r-- | projects/Stacker/lib/Makefile | 16 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/.cvsignore | 4 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/Lexer.cpp.cvs | 2195 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/Lexer.l | 234 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/Lexer.l.cvs | 234 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/Makefile | 21 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/README | 20 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/StackerCompiler.cpp | 1806 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/StackerCompiler.h | 224 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/StackerParser.cpp.cvs | 1909 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/StackerParser.h.cvs | 203 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/StackerParser.y | 185 | ||||
| -rw-r--r-- | projects/Stacker/lib/compiler/StackerParser.y.cvs | 185 | ||||
| -rw-r--r-- | projects/Stacker/lib/runtime/Makefile | 14 | ||||
| -rw-r--r-- | projects/Stacker/lib/runtime/stacker_rt.c | 74 |
15 files changed, 0 insertions, 7324 deletions
diff --git a/projects/Stacker/lib/Makefile b/projects/Stacker/lib/Makefile deleted file mode 100644 index 3a9a470a10..0000000000 --- a/projects/Stacker/lib/Makefile +++ /dev/null @@ -1,16 +0,0 @@ -##===- projects/Stacker/lib/Makefile -----------------------*- Makefile -*-===## -# -# Compile Stacker libraries -# -##===----------------------------------------------------------------------===## - -LEVEL = .. -DIRS = compiler runtime - -include $(LEVEL)/Makefile.common - -# Don't generate the runtime if we don't have LLVMGCC -ifeq ($(strip $(LLVMGCC)),) - DIRS := $(filter-out runtime, $(DIRS)) -endif - diff --git a/projects/Stacker/lib/compiler/.cvsignore b/projects/Stacker/lib/compiler/.cvsignore deleted file mode 100644 index 1bee407379..0000000000 --- a/projects/Stacker/lib/compiler/.cvsignore +++ /dev/null @@ -1,4 +0,0 @@ -Lexer.cpp -StackerParser.cpp -StackerParser.h -StackerParser.output diff --git a/projects/Stacker/lib/compiler/Lexer.cpp.cvs b/projects/Stacker/lib/compiler/Lexer.cpp.cvs deleted file mode 100644 index 536b478407..0000000000 --- a/projects/Stacker/lib/compiler/Lexer.cpp.cvs +++ /dev/null @@ -1,2195 +0,0 @@ -#define yy_create_buffer Stacker_create_buffer -#define yy_delete_buffer Stacker_delete_buffer -#define yy_scan_buffer Stacker_scan_buffer -#define yy_scan_string Stacker_scan_string -#define yy_scan_bytes Stacker_scan_bytes -#define yy_flex_debug Stacker_flex_debug -#define yy_init_buffer Stacker_init_buffer -#define yy_flush_buffer Stacker_flush_buffer -#define yy_load_buffer_state Stacker_load_buffer_state -#define yy_switch_to_buffer Stacker_switch_to_buffer -#define yyin Stackerin -#define yyleng Stackerleng -#define yylex Stackerlex -#define yyout Stackerout -#define yyrestart Stackerrestart -#define yytext Stackertext -#define yylineno Stackerlineno - -#line 20 "Lexer.cpp" -/* A lexical scanner generated by flex */ - -/* Scanner skeleton version: - * $Header$ - */ - -#define FLEX_SCANNER -#define YY_FLEX_MAJOR_VERSION 2 -#define YY_FLEX_MINOR_VERSION 5 - -#include <stdio.h> -#include <unistd.h> - - -/* cfront 1.2 defines "c_plusplus" instead of "__cplusplus" */ -#ifdef c_plusplus -#ifndef __cplusplus -#define __cplusplus -#endif -#endif - - -#ifdef __cplusplus - -#include <stdlib.h> - -/* Use prototypes in function declarations. */ -#define YY_USE_PROTOS - -/* The "const" storage-class-modifier is valid. */ -#define YY_USE_CONST - -#else /* ! __cplusplus */ - -#if __STDC__ - -#define YY_USE_PROTOS -#define YY_USE_CONST - -#endif /* __STDC__ */ -#endif /* ! __cplusplus */ - -#ifdef __TURBOC__ - #pragma warn -rch - #pragma warn -use -#include <io.h> -#include <stdlib.h> -#define YY_USE_CONST -#define YY_USE_PROTOS -#endif - -#ifdef YY_USE_CONST -#define yyconst const -#else -#define yyconst -#endif - - -#ifdef YY_USE_PROTOS -#define YY_PROTO(proto) proto -#else -#define YY_PROTO(proto) () -#endif - -/* Returned upon end-of-file. */ -#define YY_NULL 0 - -/* Promotes a possibly negative, possibly signed char to an unsigned - * integer for use as an array index. If the signed char is negative, - * we want to instead treat it as an 8-bit unsigned char, hence the - * double cast. - */ -#define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c) - -/* Enter a start condition. This macro really ought to take a parameter, - * but we do it the disgusting crufty way forced on us by the ()-less - * definition of BEGIN. - */ -#define BEGIN yy_start = 1 + 2 * - -/* Translate the current start state into a value that can be later handed - * to BEGIN to return to the state. The YYSTATE alias is for lex - * compatibility. - */ -#define YY_START ((yy_start - 1) / 2) -#define YYSTATE YY_START - -/* Action number for EOF rule of a given start state. */ -#define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1) - -/* Special action meaning "start processing a new file". */ -#define YY_NEW_FILE yyrestart( yyin ) - -#define YY_END_OF_BUFFER_CHAR 0 - -/* Size of default input buffer. */ -#define YY_BUF_SIZE (16384*64) - -typedef struct yy_buffer_state *YY_BUFFER_STATE; - -extern int yyleng; -extern FILE *yyin, *yyout; - -#define EOB_ACT_CONTINUE_SCAN 0 -#define EOB_ACT_END_OF_FILE 1 -#define EOB_ACT_LAST_MATCH 2 - -/* The funky do-while in the following #define is used to turn the definition - * int a single C statement (which needs a semi-colon terminator). This - * avoids problems with code like: - * - * if ( condition_holds ) - * yyless( 5 ); - * else - * do_something_else(); - * - * Prior to using the do-while the compiler would get upset at the - * "else" because it interpreted the "if" statement as being all - * done when it reached the ';' after the yyless() call. - */ - -/* Return all but the first 'n' matched characters back to the input stream. */ - -#define yyless(n) \ - do \ - { \ - /* Undo effects of setting up yytext. */ \ - *yy_cp = yy_hold_char; \ - YY_RESTORE_YY_MORE_OFFSET \ - yy_c_buf_p = yy_cp = yy_bp + n - YY_MORE_ADJ; \ - YY_DO_BEFORE_ACTION; /* set up yytext again */ \ - } \ - while ( 0 ) - -#define unput(c) yyunput( c, yytext_ptr ) - -/* The following is because we cannot portably get our hands on size_t - * (without autoconf's help, which isn't available because we want - * flex-generated scanners to compile on their own). - */ -typedef unsigned int yy_size_t; - - -struct yy_buffer_state - { - FILE *yy_input_file; - - char *yy_ch_buf; /* input buffer */ - char *yy_buf_pos; /* current position in input buffer */ - - /* Size of input buffer in bytes, not including room for EOB - * characters. - */ - yy_size_t yy_buf_size; - - /* Number of characters read into yy_ch_buf, not including EOB - * characters. - */ - int yy_n_chars; - - /* Whether we "own" the buffer - i.e., we know we created it, - * and can realloc() it to grow it, and should free() it to - * delete it. - */ - int yy_is_our_buffer; - - /* Whether this is an "interactive" input source; if so, and - * if we're using stdio for input, then we want to use getc() - * instead of fread(), to make sure we stop fetching input after - * each newline. - */ - int yy_is_interactive; - - /* Whether we're considered to be at the beginning of a line. - * If so, '^' rules will be active on the next match, otherwise - * not. - */ - int yy_at_bol; - - /* Whether to try to fill the input buffer when we reach the - * end of it. - */ - int yy_fill_buffer; - - int yy_buffer_status; -#define YY_BUFFER_NEW 0 -#define YY_BUFFER_NORMAL 1 - /* When an EOF's been seen but there's still some text to process - * then we mark the buffer as YY_EOF_PENDING, to indicate that we - * shouldn't try reading from the input source any more. We might - * still have a bunch of tokens to match, though, because of - * possible backing-up. - * - * When we actually see the EOF, we change the status to "new" - * (via yyrestart()), so that the user can continue scanning by - * just pointing yyin at a new input file. - */ -#define YY_BUFFER_EOF_PENDING 2 - }; - -static YY_BUFFER_STATE yy_current_buffer = 0; - -/* We provide macros for accessing buffer states in case in the - * future we want to put the buffer states in a more general - * "scanner state". - */ -#define YY_CURRENT_BUFFER yy_current_buffer - - -/* yy_hold_char holds the character lost when yytext is formed. */ -static char yy_hold_char; - -static int yy_n_chars; /* number of characters read into yy_ch_buf */ - - -int yyleng; - -/* Points to current character in buffer. */ -static char *yy_c_buf_p = (char *) 0; -static int yy_init = 1; /* whether we need to initialize */ -static int yy_start = 0; /* start state number */ - -/* Flag which is used to allow yywrap()'s to do buffer switches - * instead of setting up a fresh yyin. A bit of a hack ... - */ -static int yy_did_buffer_switch_on_eof; - -void yyrestart YY_PROTO(( FILE *input_file )); - -void yy_switch_to_buffer YY_PROTO(( YY_BUFFER_STATE new_buffer )); -void yy_load_buffer_state YY_PROTO(( void )); -YY_BUFFER_STATE yy_create_buffer YY_PROTO(( FILE *file, int size )); -void yy_delete_buffer YY_PROTO(( YY_BUFFER_STATE b )); -void yy_init_buffer YY_PROTO(( YY_BUFFER_STATE b, FILE *file )); -void yy_flush_buffer YY_PROTO(( YY_BUFFER_STATE b )); -#define YY_FLUSH_BUFFER yy_flush_buffer( yy_current_buffer ) - -YY_BUFFER_STATE yy_scan_buffer YY_PROTO(( char *base, yy_size_t size )); -YY_BUFFER_STATE yy_scan_string YY_PROTO(( yyconst char *yy_str )); -YY_BUFFER_STATE yy_scan_bytes YY_PROTO(( yyconst char *bytes, int len )); - -static void *yy_flex_alloc YY_PROTO(( yy_size_t )); -static inline void *yy_flex_realloc YY_PROTO(( void *, yy_size_t )); -static void yy_flex_free YY_PROTO(( void * )); - -#define yy_new_buffer yy_create_buffer - -#define yy_set_interactive(is_interactive) \ - { \ - if ( ! yy_current_buffer ) \ - yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \ - yy_current_buffer->yy_is_interactive = is_interactive; \ - } - -#define yy_set_bol(at_bol) \ - { \ - if ( ! yy_current_buffer ) \ - yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \ - yy_current_buffer->yy_at_bol = at_bol; \ - } - -#define YY_AT_BOL() (yy_current_buffer->yy_at_bol) - - -#define YY_USES_REJECT - -#define yywrap() 1 -#define YY_SKIP_YYWRAP -typedef unsigned char YY_CHAR; -FILE *yyin = (FILE *) 0, *yyout = (FILE *) 0; -typedef int yy_state_type; -extern int yylineno; -int yylineno = 1; -extern char *yytext; -#define yytext_ptr yytext - -static yy_state_type yy_get_previous_state YY_PROTO(( void )); -static yy_state_type yy_try_NUL_trans YY_PROTO(( yy_state_type current_state )); -static int yy_get_next_buffer YY_PROTO(( void )); -static void yy_fatal_error YY_PROTO(( yyconst char msg[] )); - -/* Done after the current pattern has been matched and before the - * corresponding action - sets up yytext. - */ -#define YY_DO_BEFORE_ACTION \ - yytext_ptr = yy_bp; \ - yyleng = (int) (yy_cp - yy_bp); \ - yy_hold_char = *yy_cp; \ - *yy_cp = '\0'; \ - yy_c_buf_p = yy_cp; - -#define YY_NUM_RULES 89 -#define YY_END_OF_BUFFER 90 -static yyconst short int yy_acclist[266] = - { 0, - 90, 89, 88, 89, 89, 89, 89, 89, 25, 89, - 21, 89, 22, 89, 26, 89, 83, 89, 83, 89, - 3, 89, 4, 89, 9, 89, 19, 89, 11, 89, - 87, 89, 87, 89, 87, 89, 87, 89, 87, 89, - 87, 89, 87, 89, 87, 89, 87, 89, 87, 89, - 87, 89, 87, 89, 87, 89, 87, 89, 87, 89, - 87, 89, 87, 89, 87, 89, 81, 86, 1, 2, - 32, 23, 83, 24, 84, 36, 13, 17, 75, 74, - 73, 82, 15, 37, 78, 77, 76, 87, 87, 87, - 72, 87, 87, 87, 87, 87, 20, 87, 87, 87, - - 87, 87, 16, 87, 12, 87, 61, 87, 14, 87, - 10, 87, 87, 87, 87, 18, 87, 87, 87, 7, - 87, 34, 87, 87, 87, 87, 87, 87, 87, 87, - 87, 87, 87, 87, 87, 87, 87, 85, 29, 87, - 33, 87, 87, 87, 40, 87, 87, 65, 87, 87, - 87, 87, 87, 59, 87, 87, 87, 31, 87, 30, - 87, 27, 87, 28, 87, 39, 87, 8, 87, 87, - 87, 60, 87, 87, 87, 87, 45, 87, 87, 87, - 87, 87, 70, 87, 87, 87, 87, 35, 87, 38, - 87, 80, 87, 51, 87, 62, 87, 87, 68, 87, - - 87, 87, 58, 87, 79, 87, 87, 50, 87, 42, - 87, 43, 87, 87, 87, 47, 87, 55, 87, 46, - 87, 87, 87, 41, 87, 5, 87, 48, 87, 87, - 49, 87, 63, 87, 6, 87, 87, 87, 53, 87, - 87, 87, 56, 87, 87, 71, 87, 52, 87, 54, - 87, 64, 87, 87, 57, 87, 87, 67, 87, 44, - 87, 69, 87, 66, 87 - } ; - -static yyconst short int yy_accept[189] = - { 0, - 1, 1, 1, 2, 3, 5, 6, 7, 8, 9, - 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, - 31, 33, 35, 37, 39, 41, 43, 45, 47, 49, - 51, 53, 55, 57, 59, 61, 63, 65, 67, 68, - 68, 69, 69, 70, 70, 71, 72, 73, 74, 75, - 76, 76, 77, 78, 79, 80, 81, 82, 83, 84, - 85, 86, 87, 88, 89, 90, 91, 93, 94, 95, - 96, 97, 99, 100, 101, 102, 103, 105, 107, 109, - 111, 113, 114, 115, 116, 118, 119, 120, 122, 124, - 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, - - 135, 136, 137, 138, 139, 141, 143, 144, 145, 147, - 148, 150, 151, 152, 153, 154, 156, 157, 158, 160, - 162, 164, 166, 168, 170, 171, 172, 174, 175, 176, - 177, 179, 180, 181, 182, 183, 185, 186, 187, 188, - 190, 192, 194, 196, 198, 199, 201, 202, 203, 205, - 207, 208, 210, 212, 214, 215, 216, 218, 220, 222, - 223, 224, 226, 228, 230, 231, 233, 235, 237, 238, - 239, 241, 242, 243, 245, 246, 248, 250, 252, 254, - 255, 257, 258, 260, 262, 264, 266, 266 - } ; - -static yyconst int yy_ec[256] = - { 0, - 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, - 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 2, 4, 5, 6, 1, 1, 1, 1, 7, - 8, 9, 10, 1, 11, 1, 12, 13, 14, 15, - 14, 14, 14, 14, 14, 14, 14, 16, 17, 18, - 19, 20, 1, 1, 21, 22, 23, 24, 25, 26, - 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, - 37, 38, 39, 40, 41, 42, 43, 44, 30, 30, - 1, 1, 1, 1, 45, 1, 46, 46, 47, 48, - - 46, 46, 30, 30, 30, 30, 30, 30, 30, 30, - 30, 30, 30, 30, 49, 30, 30, 30, 30, 50, - 30, 30, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1 - } ; - -static yyconst int yy_meta[51] = - { 0, - 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, - 3, 1, 4, 4, 4, 1, 1, 1, 1, 1, - 4, 4, 4, 4, 4, 4, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 4, 4, 4, 3, 3 - } ; - -static yyconst short int yy_base[193] = - { 0, - 0, 0, 228, 229, 229, 208, 221, 222, 216, 211, - 41, 46, 229, 49, 52, 229, 229, 53, 203, 33, - 36, 0, 183, 36, 51, 54, 44, 194, 51, 58, - 61, 70, 65, 72, 73, 82, 191, 183, 229, 212, - 229, 213, 229, 207, 206, 229, 229, 100, 229, 104, - 0, 229, 229, 229, 229, 229, 229, 229, 229, 229, - 229, 229, 229, 0, 174, 188, 0, 176, 88, 171, - 185, 0, 179, 175, 168, 180, 164, 0, 0, 0, - 0, 93, 169, 178, 174, 164, 173, 0, 0, 173, - 174, 156, 88, 94, 160, 162, 172, 171, 169, 149, - - 166, 159, 149, 0, 0, 0, 150, 149, 169, 158, - 153, 141, 141, 136, 153, 0, 143, 144, 0, 0, - 0, 0, 160, 0, 136, 142, 0, 131, 130, 138, - 154, 128, 142, 143, 129, 0, 139, 132, 130, 0, - 146, 0, 0, 0, 134, 0, 134, 137, 0, 0, - 122, 0, 141, 0, 117, 116, 0, 0, 138, 129, - 122, 121, 0, 120, 108, 0, 0, 0, 94, 108, - 0, 91, 95, 0, 87, 0, 0, 0, 0, 81, - 0, 53, 0, 0, 0, 0, 229, 137, 141, 145, - 147, 64 - - } ; - -static yyconst short int yy_def[193] = - { 0, - 187, 1, 187, 187, 187, 187, 188, 189, 190, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 187, 188, - 187, 189, 187, 190, 190, 187, 187, 187, 187, 187, - 192, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - - 191, 191, 191, 192, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, - 191, 191, 191, 191, 191, 191, 0, 187, 187, 187, - 187, 187 - - } ; - -static yyconst short int yy_nxt[280] = - { 0, - 4, 5, 5, 6, 7, 8, 9, 4, 10, 11, - 12, 13, 14, 15, 15, 16, 17, 18, 19, 20, - 21, 22, 23, 24, 25, 26, 27, 22, 28, 22, - 22, 29, 30, 31, 32, 33, 22, 34, 35, 36, - 22, 22, 37, 38, 4, 22, 22, 22, 22, 22, - 47, 59, 60, 48, 48, 48, 49, 65, 50, 50, - 50, 48, 48, 48, 48, 48, 48, 104, 77, 66, - 52, 53, 54, 68, 74, 80, 69, 186, 82, 61, - 62, 63, 70, 78, 71, 85, 83, 72, 75, 86, - 81, 76, 84, 91, 73, 87, 93, 96, 51, 55, - - 56, 57, 99, 88, 185, 92, 94, 89, 97, 95, - 128, 90, 48, 48, 48, 98, 50, 50, 50, 100, - 108, 117, 101, 109, 118, 130, 184, 129, 183, 182, - 181, 180, 179, 131, 178, 177, 119, 40, 40, 40, - 40, 42, 42, 42, 42, 44, 176, 44, 44, 64, - 64, 175, 174, 173, 172, 171, 170, 169, 168, 167, - 166, 165, 164, 163, 162, 161, 160, 159, 158, 157, - 156, 155, 154, 153, 152, 151, 150, 149, 148, 147, - 146, 145, 144, 143, 142, 141, 140, 139, 138, 137, - 136, 135, 134, 133, 132, 127, 126, 125, 124, 123, - - 122, 121, 120, 116, 115, 114, 113, 112, 111, 110, - 107, 106, 105, 45, 45, 43, 41, 103, 102, 79, - 67, 58, 46, 45, 43, 41, 39, 187, 3, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187 - } ; - -static yyconst short int yy_chk[280] = - { 0, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 11, 20, 20, 11, 11, 11, 12, 21, 12, 12, - 12, 14, 14, 14, 15, 15, 15, 192, 27, 21, - 18, 18, 18, 24, 26, 29, 24, 182, 30, 20, - 20, 20, 25, 27, 25, 31, 30, 25, 26, 31, - 29, 26, 30, 33, 25, 32, 34, 35, 14, 18, - - 18, 18, 36, 32, 180, 33, 34, 32, 35, 34, - 93, 32, 48, 48, 48, 35, 50, 50, 50, 36, - 69, 82, 36, 69, 82, 94, 175, 93, 173, 172, - 170, 169, 165, 94, 164, 162, 82, 188, 188, 188, - 188, 189, 189, 189, 189, 190, 161, 190, 190, 191, - 191, 160, 159, 156, 155, 153, 151, 148, 147, 145, - 141, 139, 138, 137, 135, 134, 133, 132, 131, 130, - 129, 128, 126, 125, 123, 118, 117, 115, 114, 113, - 112, 111, 110, 109, 108, 107, 103, 102, 101, 100, - 99, 98, 97, 96, 95, 92, 91, 90, 87, 86, - - 85, 84, 83, 77, 76, 75, 74, 73, 71, 70, - 68, 66, 65, 45, 44, 42, 40, 38, 37, 28, - 23, 19, 10, 9, 8, 7, 6, 3, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187, 187, - 187, 187, 187, 187, 187, 187, 187, 187, 187 - } ; - -static yy_state_type yy_state_buf[YY_BUF_SIZE + 2], *yy_state_ptr; -static char *yy_full_match; -static int yy_lp; -#define REJECT \ -{ \ -*yy_cp = yy_hold_char; /* undo effects of setting up yytext */ \ -yy_cp = yy_full_match; /* restore poss. backed-over text */ \ -++yy_lp; \ -goto find_rule; \ -} -#define yymore() yymore_used_but_not_detected -#define YY_MORE_ADJ 0 -#define YY_RESTORE_YY_MORE_OFFSET -char *yytext; -#line 1 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -#define INITIAL 0 -/*===-- Lexer.l - Scanner for Stacker language -----------------*- C++ -*--===// -// -// The LLVM Compiler Infrastructure -// -// This file was developed by Reid Spencer and donated to the LLVM research -// group and is distributed under the University of Illinois Open Source -// License. See LICENSE.TXT for details. -// -//===----------------------------------------------------------------------===// -// -// This file implements the flex scanner for Stacker languages files. -// -//===----------------------------------------------------------------------===*/ -#define YY_NEVER_INTERACTIVE 1 -#line 29 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" - -#include "StackerCompiler.h" -#include "StackerParser.h" - -/* Conversion of text ints to binary */ -static int64_t IntToVal(const char *Buffer) { - int64_t Result = 0; - for (; *Buffer; Buffer++) { - int64_t OldRes = Result; - Result *= 10; - Result += *Buffer-'0'; - if (Result < OldRes) // Uh, oh, overflow detected!!! - StackerCompiler::ThrowException("constant bigger than 64 bits detected!"); - } - return Result; -} - -/* Conversion of text hexadecimal ints to binary */ -static int64_t HexIntToVal(const char *Buffer) { - int64_t Result = 0; - for (; *Buffer; ++Buffer) { - int64_t OldRes = Result; - Result *= 16; - char C = *Buffer; - if (C >= '0' && C <= '9') - Result += C-'0'; - else if (C >= 'A' && C <= 'F') - Result += C-'A'+10; - else if (C >= 'a' && C <= 'f') - Result += C-'a'+10; - - if (Result < OldRes) // Uh, oh, overflow detected!!! - StackerCompiler::ThrowException("constant bigger than 64 bits detected!"); - } - return Result; -} - -#define YY_NEVER_INTERACTIVE 1 -/* Comments start with a ; and go till end of line */ -/* You can also embed them in ( ... ) */ -/* We ignore white space */ -/* jdentifiers start with a % sign */ -/* Strings can contain any character except " and \ */ -/* Positive and negative integer constants*/ -/* Special Characters - name them to avoid flex confusion */ -#line 608 "Lexer.cpp" - -/* Macros after this point can all be overridden by user definitions in - * section 1. - */ - -#ifndef YY_SKIP_YYWRAP -#ifdef __cplusplus -extern "C" int yywrap YY_PROTO(( void )); -#else -extern int yywrap YY_PROTO(( void )); -#endif -#endif - -#ifndef YY_NO_UNPUT -static inline void yyunput YY_PROTO(( int c, char *buf_ptr )); -#endif - -#ifndef yytext_ptr -static void yy_flex_strncpy YY_PROTO(( char *, yyconst char *, int )); -#endif - -#ifdef YY_NEED_STRLEN -static int yy_flex_strlen YY_PROTO(( yyconst char * )); -#endif - -#ifndef YY_NO_INPUT -#ifdef __cplusplus -static int yyinput YY_PROTO(( void )); -#else -static int input YY_PROTO(( void )); -#endif -#endif - -#if YY_STACK_USED -static int yy_start_stack_ptr = 0; -static int yy_start_stack_depth = 0; -static int *yy_start_stack = 0; -#ifndef YY_NO_PUSH_STATE -static void yy_push_state YY_PROTO(( int new_state )); -#endif -#ifndef YY_NO_POP_STATE -static void yy_pop_state YY_PROTO(( void )); -#endif -#ifndef YY_NO_TOP_STATE -static int yy_top_state YY_PROTO(( void )); -#endif - -#else -#define YY_NO_PUSH_STATE 1 -#define YY_NO_POP_STATE 1 -#define YY_NO_TOP_STATE 1 -#endif - -#ifdef YY_MALLOC_DECL -YY_MALLOC_DECL -#else -#if __STDC__ -#ifndef __cplusplus -#include <stdlib.h> -#endif -#else -/* Just try to get by without declaring the routines. This will fail - * miserably on non-ANSI systems for which sizeof(size_t) != sizeof(int) - * or sizeof(void*) != sizeof(int). - */ -#endif -#endif - -/* Amount of stuff to slurp up with each read. */ -#ifndef YY_READ_BUF_SIZE -#define YY_READ_BUF_SIZE 8192 -#endif - -/* Copy whatever the last rule matched to the standard output. */ - -#ifndef ECHO -/* This used to be an fputs(), but since the string might contain NUL's, - * we now use fwrite(). - */ -#define ECHO (void) fwrite( yytext, yyleng, 1, yyout ) -#endif - -/* Gets input and stuffs it into "buf". number of characters read, or YY_NULL, - * is returned in "result". - */ -#ifndef YY_INPUT -#define YY_INPUT(buf,result,max_size) \ - if ( yy_current_buffer->yy_is_interactive ) \ - { \ - int c = '*', n; \ - for ( n = 0; n < max_size && \ - (c = getc( yyin )) != EOF && c != '\n'; ++n ) \ - buf[n] = (char) c; \ - if ( c == '\n' ) \ - buf[n++] = (char) c; \ - if ( c == EOF && ferror( yyin ) ) \ - YY_FATAL_ERROR( "input in flex scanner failed" ); \ - result = n; \ - } \ - else if ( ((result = fread( buf, 1, max_size, yyin )) == 0) \ - && ferror( yyin ) ) \ - YY_FATAL_ERROR( "input in flex scanner failed" ); -#endif - -/* No semi-colon after return; correct usage is to write "yyterminate();" - - * we don't want an extra ';' after the "return" because that will cause - * some compilers to complain about unreachable statements. - */ -#ifndef yyterminate -#define yyterminate() return YY_NULL -#endif - -/* Number of entries by which start-condition stack grows. */ -#ifndef YY_START_STACK_INCR -#define YY_START_STACK_INCR 25 -#endif - -/* Report a fatal error. */ -#ifndef YY_FATAL_ERROR -#define YY_FATAL_ERROR(msg) yy_fatal_error( msg ) -#endif - -/* Default declaration of generated scanner - a define so the user can - * easily add parameters. - */ -#ifndef YY_DECL -#define YY_DECL int yylex YY_PROTO(( void )) -#endif - -/* Code executed at the beginning of each rule, after yytext and yyleng - * have been set up. - */ -#ifndef YY_USER_ACTION -#define YY_USER_ACTION -#endif - -/* Code executed at the end of each rule. */ -#ifndef YY_BREAK -#define YY_BREAK break; -#endif - -#define YY_RULE_SETUP \ - YY_USER_ACTION - -YY_DECL - { - register yy_state_type yy_current_state; - register char *yy_cp = NULL, *yy_bp = NULL; - register int yy_act; - -#line 112 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" - - -#line 762 "Lexer.cpp" - - if ( yy_init ) - { - yy_init = 0; - -#ifdef YY_USER_INIT - YY_USER_INIT; -#endif - - if ( ! yy_start ) - yy_start = 1; /* first start state */ - - if ( ! yyin ) - yyin = stdin; - - if ( ! yyout ) - yyout = stdout; - - if ( ! yy_current_buffer ) - yy_current_buffer = - yy_create_buffer( yyin, YY_BUF_SIZE ); - - yy_load_buffer_state(); - } - - while ( 1 ) /* loops until end-of-file is reached */ - { - yy_cp = yy_c_buf_p; - - /* Support of yytext. */ - *yy_cp = yy_hold_char; - - /* yy_bp points to the position in yy_ch_buf of the start of - * the current run. - */ - yy_bp = yy_cp; - - yy_current_state = yy_start; - yy_state_ptr = yy_state_buf; - *yy_state_ptr++ = yy_current_state; -yy_match: - do - { - register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)]; - while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) - { - yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 188 ) - yy_c = yy_meta[(unsigned int) yy_c]; - } - yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - *yy_state_ptr++ = yy_current_state; - ++yy_cp; - } - while ( yy_current_state != 187 ); - -yy_find_action: - yy_current_state = *--yy_state_ptr; - yy_lp = yy_accept[yy_current_state]; -find_rule: /* we branch to this label when backing up */ - for ( ; ; ) /* until we find what rule we matched */ - { - if ( yy_lp && yy_lp < yy_accept[yy_current_state + 1] ) - { - yy_act = yy_acclist[yy_lp]; - { - yy_full_match = yy_cp; - break; - } - } - --yy_cp; - yy_current_state = *--yy_state_ptr; - yy_lp = yy_accept[yy_current_state]; - } - - YY_DO_BEFORE_ACTION; - - if ( yy_act != YY_END_OF_BUFFER ) - { - int yyl; - for ( yyl = 0; yyl < yyleng; ++yyl ) - if ( yytext[yyl] == '\n' ) - ++yylineno; - } - -do_action: /* This label is used only to access EOF actions. */ - - - switch ( yy_act ) - { /* beginning of action switch */ -case 1: -*yy_cp = yy_hold_char; /* undo effects of setting up yytext */ -yy_c_buf_p = yy_cp -= 1; -YY_DO_BEFORE_ACTION; /* set up yytext again */ -YY_RULE_SETUP -#line 114 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ /* Ignore comments */ } - YY_BREAK -case 2: -YY_RULE_SETUP -#line 115 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ /* Ignore comments */ } - YY_BREAK -case 3: -YY_RULE_SETUP -#line 117 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ return COLON; } - YY_BREAK -case 4: -YY_RULE_SETUP -#line 118 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ return SEMI; } - YY_BREAK -case 5: -YY_RULE_SETUP -#line 120 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ return TRUETOK; } - YY_BREAK -case 6: -YY_RULE_SETUP -#line 121 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ return FALSETOK; } - YY_BREAK -case 7: -YY_RULE_SETUP -#line 122 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ return TRUETOK; } - YY_BREAK -case 8: -YY_RULE_SETUP -#line 123 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ return FALSETOK; } - YY_BREAK -case 9: -YY_RULE_SETUP -#line 124 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compiler/Lexer.l" -{ return LESS; } - YY_BREAK -case 10: -YY_RULE_SETUP -#line 125 "/proj/llvm/build/projects/Stacker/../../../llvm/projects/Stacker/lib/compi |