mega-merge of pruned test code

1 files changed, 124 insertions, 0 deletions

diff --git a/test/cases/rlhc.d/case/rangei_ruby.rb-R-F1--var-backend.in b/test/cases/rlhc.d/case/rangei_ruby.rb-R-F1--var-backend.in
new file mode 100644
index 00000000..5ed9fa5b
--- /dev/null
+++ b/test/cases/rlhc.d/case/rangei_ruby.rb-R-F1--var-backend.in
@@ -0,0 +1,124 @@
+host( "working/rangei_ruby.rl", 1 ) @{#
+	# @@LANG: ruby
+	# @@GENERATED: true
+	#
+	
+	
+	
+	
+	
+	
+	
+}@
+array char _rangei_trans_keys( 0, 5 ) = { 1, 0, 1, 2, 1, 2, 0, 3, 1, 5, 1, 4, 0, 5, 1, 0, 0 };
+
+array s8 _rangei_char_class( 0, 5 ) = { 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 3, 3, 3, 4, 4, 4, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 5, 5, 5, 0 };
+
+array s8 _rangei_index_offsets( 0, 23 ) = { 0, 0, 2, 4, 8, 13, 17, 23, 0 };
+
+array s8 _rangei_indicies( 0, 6 ) = { 0, 0, 2, 2, 3, 3, 3, 3, 4, 4, 1, 4, 4, 5, 1, 5, 5, 6, 6, 6, 6, 6, 6, 0 };
+
+array s8 _rangei_index_defaults( 0, 1 ) = { 0, 1, 1, 1, 1, 1, 1, 1, 0 };
+
+array s8 _rangei_trans_cond_spaces( -1, 0 ) = { -1, -1, -1, -1, -1, -1, -1, 0 };
+
+array s8 _rangei_cond_targs( 0, 7 ) = { 2, 0, 3, 4, 5, 6, 7, 0 };
+
+array s8 _rangei_cond_actions( 0, 0 ) = { 0, 0, 0, 0, 0, 0, 0, 0 };
+
+array s8 _rangei_nfa_targs( 0, 0 ) = { 0, 0 };
+
+array s8 _rangei_nfa_offsets( 0, 0 ) = { 0, 0, 0, 0, 0, 0, 0, 0, 0 };
+
+array s8 _rangei_nfa_push_actions( 0, 0 ) = { 0, 0 };
+
+array s8 _rangei_nfa_pop_trans( 0, 0 ) = { 0, 0 };
+
+value int rangei_start = 1;
+value int rangei_first_final = 7;
+value int rangei_error = 0;
+
+value int rangei_en_main = 1;
+
+host( "working/rangei_ruby.rl", 24 ) @{
+	
+	def run_machine( data )
+	p = 0
+	pe = data.length
+	eof = data.length
+	cs = 0;
+	_m = 
+	_a = 
+	buffer = Array.new
+	blen = 0
+}@
+{
+	cs = cast(int)rangei_start;
+}
+host( "working/rangei_ruby.rl", 35 ) @{
+}@
+{
+	uint _trans = 0;
+	uint _have = 0;
+	uint _cont = 1;
+	index char _keys;
+	index s8 _inds;
+	while ( _cont == 1 ) {
+		
+		if ( cs == 0 )
+		_cont = 0;
+		_have = 0;
+		if ( p == pe ) {
+			if ( _have == 0 )
+			_cont = 0;
+		}
+		if ( _cont == 1 ) {
+			if ( _have == 0 ) {
+				_keys = offset( _rangei_trans_keys, (cs<<1) );
+				_inds = offset( _rangei_indicies, _rangei_index_offsets[cs] );
+				
+				if ( ( deref( data, p )) <= 125 && ( deref( data, p )) >= 60 )
+				{
+					int _ic = cast(int)_rangei_char_class[cast(int)( deref( data, p )) - 60];
+					if ( _ic <= cast(int)deref( _rangei_trans_keys, _keys+1 ) && _ic >= cast(int)deref( _rangei_trans_keys, _keys ) )
+					_trans = cast(uint)deref( _rangei_indicies, _inds + cast(int)( _ic - cast(int)deref( _rangei_trans_keys, _keys ) )  ); 
+					else
+					_trans = cast(uint)_rangei_index_defaults[cs];
+				}
+				else {
+					_trans = cast(uint)_rangei_index_defaults[cs];
+				}
+				
+			}
+			if ( _cont == 1 ) {
+				cs = cast(int)_rangei_cond_targs[_trans];
+				
+				if ( cs == 0 )
+				_cont = 0;
+				if ( _cont == 1 )
+				p += 1;
+				
+			}}
+	}
+}
+host( "working/rangei_ruby.rl", 36 ) @{
+	if cs >= rangei_first_final
+	puts "ACCEPT"
+	else
+	puts "FAIL"
+	end
+	end
+	
+	inp = [
+	"AaBbAa",
+	"Aa`bAa",
+	"AaB@@Aa",
+	"AaBbMa",
+	"AaBbma",
+	]
+	
+	inplen = 5
+	
+	inp.each { |str| run_machine(str) }
+	
+}@
\ No newline at end of file