diff options
Diffstat (limited to 'test/rlhc.d/case/erract4.m-C-F0--goto-backend.in')
| -rw-r--r-- | test/rlhc.d/case/erract4.m-C-F0--goto-backend.in | 230 |
1 files changed, 230 insertions, 0 deletions
diff --git a/test/rlhc.d/case/erract4.m-C-F0--goto-backend.in b/test/rlhc.d/case/erract4.m-C-F0--goto-backend.in new file mode 100644 index 00000000..939aa5ff --- /dev/null +++ b/test/rlhc.d/case/erract4.m-C-F0--goto-backend.in @@ -0,0 +1,230 @@ +host( "working/erract4.rl", 1 ) @{/* + * @@LANG: obj-c + */ + + #include <stdio.h> + #include <Foundation/Foundation.h> + + #define IDENT_BUFLEN 256 + + @@interface ErrAct : NSObject + { + @@public + int cs; + }; + + // Initialize the machine. Invokes any init statement blocks. Returns 0 + // if the machine begins in a non-accepting state and 1 if the machine + // begins in an accepting state. + - (int) initFsm; + + // Execute the machine on a block of data. Returns -1 if after processing + // the data, the machine is in the error state and can never accept, 0 if + // the machine is in a non-accepting state and 1 if the machine is in an + // accepting state. + - (void) executeWithData:(const char *)data len:(int)len; + + // Indicate that there is no more data. Returns -1 if the machine finishes + // in the error state and does not accept, 0 if the machine finishes + // in any other non-accepting state and 1 if the machine finishes in an + // accepting state. + - (int) finish; + + @@end + + @@implementation ErrAct + + + +}@ +array s8 _ErrAct_actions( 0, 2 ) = { 0, 1, 0, 1, 1, 2, 1, 0, 0 }; + +array char _ErrAct_trans_keys( 0, 5 ) = { 0, 3, 0, 0, 0, 2, 0, 4, 0, 4, 0, 5, 0, 0, 0 }; + +array s8 _ErrAct_char_class( 0, 5 ) = { 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, 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, 2, 1, 1, 3, 1, 1, 1, 4, 1, 1, 5, 0 }; + +array s8 _ErrAct_index_offsets( 0, 24 ) = { 0, 4, 5, 8, 13, 18, 24, 0 }; + +array s8 _ErrAct_indicies( 0, 9 ) = { 1, 0, 0, 2, 4, 1, 0, 5, 1, 0, 0, 0, 6, 1, 0, 0, 0, 7, 1, 0, 0, 0, 0, 8, 9, 0 }; + +array s8 _ErrAct_index_defaults( 0, 3 ) = { 0, 3, 0, 0, 0, 0, 0, 0 }; + +array s8 _ErrAct_trans_cond_spaces( -1, 0 ) = { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0 }; + +array s8 _ErrAct_cond_targs( 0, 6 ) = { 1, 1, 2, 1, 1, 3, 4, 5, 6, 0, 0 }; + +array s8 _ErrAct_cond_actions( 0, 5 ) = { 1, 5, 0, 0, 3, 0, 0, 0, 0, 3, 0 }; + +array s8 _ErrAct_eof_actions( 0, 1 ) = { 0, 0, 1, 1, 1, 1, 1, 0 }; + +array s8 _ErrAct_nfa_targs( 0, 0 ) = { 0, 0 }; + +array s8 _ErrAct_nfa_offsets( 0, 0 ) = { 0, 0, 0, 0, 0, 0, 0, 0 }; + +array s8 _ErrAct_nfa_push_actions( 0, 0 ) = { 0, 0 }; + +array s8 _ErrAct_nfa_pop_trans( 0, 0 ) = { 0, 0 }; + +value int ErrAct_start = 0; +value int ErrAct_first_final = 0; +value int ErrAct_error = -1; + +value int ErrAct_en_main = 0; + +host( "working/erract4.rl", 49 ) @{ + + - (int) initFsm; + { + }@ + { + cs = cast(int)ErrAct_start; + } + host( "working/erract4.rl", 53 ) @{ + return 1; + } + + - (void) executeWithData:(const char *)_data len:(int)_len; + { + const char *p = _data; + const char *pe = _data + _len; + const char *eof = pe; + }@ + { + int _trans = 0; + index s8 _acts; + uint _nacts; + index char _keys; + index s8 _inds; + entry { + + if ( p == pe ) + goto _test_eof; + label _resume { + _keys = offset( _ErrAct_trans_keys, (cs<<1) ); + _inds = offset( _ErrAct_indicies, _ErrAct_index_offsets[cs] ); + + if ( ( deref( data, p )) <= 111 && ( deref( data, p )) >= 10 ) + { + int _ic = cast(int)_ErrAct_char_class[cast(int)( deref( data, p )) - 10]; + if ( _ic <= cast(int)deref( _ErrAct_trans_keys, _keys+1 ) && _ic >= cast(int)deref( _ErrAct_trans_keys, _keys ) ) + _trans = cast(int)deref( _ErrAct_indicies, _inds + cast(int)( _ic - cast(int)deref( _ErrAct_trans_keys, _keys ) ) ); + else + _trans = cast(int)_ErrAct_index_defaults[cs]; + } + else { + _trans = cast(int)_ErrAct_index_defaults[cs]; + } + + goto _match_cond; + } + label _match_cond { + cs = cast(int)_ErrAct_cond_targs[_trans]; + + if ( _ErrAct_cond_actions[_trans] == 0 ) + goto _again; + + _acts = offset( _ErrAct_actions, _ErrAct_cond_actions[_trans] ); + _nacts = cast(uint)deref( _ErrAct_actions, _acts ); + _acts += 1; + while ( _nacts > 0 ) { + switch ( deref( _ErrAct_actions, _acts ) ) + { + case 0 { + host( "working/erract4.rl", 41 ) ${ printf("hello fails\n");}$ + } + case 1 { + host( "working/erract4.rl", 43 ) ${printf("newline\n");}$ + } + } + _nacts -= 1; + _acts += 1; + } + + + } + label _again { + p += 1; + if ( p != pe ) + goto _resume; + } + label _test_eof { {} + if ( p == eof ) + { + index s8 __acts; + uint __nacts; + __acts = offset( _ErrAct_actions, _ErrAct_eof_actions[cs] ); + __nacts = cast(uint)deref( _ErrAct_actions, __acts ); __acts += 1; + while ( __nacts > 0 ) { + switch ( deref( _ErrAct_actions, __acts ) ) { + case 0 { + host( "working/erract4.rl", 41 ) ${ printf("hello fails\n");}$ + } + } + __nacts -= 1; + __acts += 1; + } + } + + } + } + } + host( "working/erract4.rl", 62 ) @{ + } + + - (int) finish; + { + if ( cs == ErrAct_error ) + return -1; + else if ( cs >= ErrAct_first_final ) + return 1; + return 0; + } + + @@end + + #include <stdio.h> + #include <string.h> + #define BUFSIZE 2048 + + ErrAct *fsm; + char buf[BUFSIZE]; + + void test( char *buf ) + { + int len = strlen(buf); + fsm = [[ErrAct alloc] init]; + + [fsm initFsm]; + [fsm executeWithData:buf len:len]; + if ( [fsm finish] > 0 ) + printf("ACCEPT\n"); + else + printf("FAIL\n"); + } + + + int main() + { + test( + "hello\n" + "hello\n" + "hello\n" + ); + + test( + "hello\n" + "hello\n" + "hello there\n" + ); + + test( + "hello\n" + "hello\n" + "he" ); + + test( "" ); + + return 0; + } + +}@
\ No newline at end of file |