rubylexer 0.6.2

data/testdata/23.rb

@@ -0,0 +1,24 @@
+alias`#`,`//`
+eval;$VERBOSE=if !false^l=<<"":0 end;U=%r~\A.\Z~;F=5;
+self << '#'
+
+::Kernel.send :define_method, :method_missing do|*_|_<<self;_[0,1]=[];l,f=_.last,_.first;return _[0]if l==f;_.last.`(_.first).to_s end
+O=Object;O=O;Object=O;%%% % %%%;class O;def
+end (x=$x)($x=x).reverse end;def
+end_(x=$x)($x=x).reverse_end;end end
+alias r end;alias a r;alias e end_;public:`,:r,:require
+self.`"a \'Ruby script obfuscated\'\x23 is not readable by anyone else."
+r <<u<<"""#$x"
+u
+r[0]^=r[1]
+$=||=0;$_||=0_0
+i,v=['o',*local_variables].flatten.grep(/\A.\Z/).sort_by{|x|x[0].-(?j).abs.-@}.reverse,false
+y=methods.grep(U).sort_by{|x|x[0].-(?e).abs.-@}
+#breakpoint
+i=[i,y].join(I=Love(%q=(2.**(5).chr)=)).gsub(' '){w=$=^=1;$x[w.inspect[1][0]*F-1,1]}.gsub(/[eyd]/){(?e.+?y.-($&[0])).chr }.delete('z')
+i=i.scan(%r:#{I}|.*?(?=#{I})|.*:).inject([]){|r,p|unless(v=!v if(v=!v)...(v))..(v=!v):r<<[]end;r.last<<p;r};v^=!v
+i,@v,@u=i.reject{true if (v=!v)..v}.join.capitalize,local_variables.inject(?X){|p,v|p^v[0]}.chr,O.constants.grep(U).pop
+i=i.sub(/#@v/i, @v).sub(/#@u/i, @u).gsub!(/./, &proc {|x|$&[0].send(x=='A'? :succ : :to_i).chr}).sub!methods.grep(/^\W/).first do |x| (x[0]|F.to_s[0]).chr end
+def i.<<(*);super duper('"\x%s"' % __LINE__)end
+i<<='?'
+puts i

data/testdata/g.rb

@@ -0,0 +1,15 @@
+j=9;def i(n) [n ?"d" : "e" , n] end
+
+#breakpoint
+p(i ?")
+p(j ?"d" : "e")
+
+def g(x=nil) x end
+def gg(x=nil) g x end
+p(gg :x)
+p(g :y)
+g=9
+p(gg :z)
+# g :w #error
+
+

data/testdata/newsyntax.rb

@@ -0,0 +1,18 @@
+
+x, (*), z = [:x, :y, :z]
+p x
+p z
+
+x, (*y), z = [:x, :y, :z]
+p x
+p y
+p z
+
+p($/ = ' '; Array( "i'm in your house" ))
+
+class Foou
+ public
+ def [] x=-100,&y=nil; p x; 100 end
+end
+p Foou.new.[]?9      #value
+p Foou.new.[] ?9     #value

data/testdata/noeolatend.rb

@@ -0,0 +1 @@
+exit

data/testdata/p.rb

@@ -0,0 +1,1227 @@
+p true ?
+  1 : 2
+#breakpoint
+module M555
+ def r;4 end
+#breakpoint
+ r=r.nil?  #2nd r seems like it should be MethNameToken, but is VarNameToken (for matz too)
+#breakpoint
+end
+#breakpoint
+
+p ?e.+?y
+p ?e.+ ?y
+p ?e.-?y
+p ?e.*?y
+p ?e./?y
+p ?e.<<?y
+p ?e.%?y
+p ?e.**?y
+p ?e.&?y
+
+p %s/jim/;
+
+p "#{<<foobar0.each('|'){|s| '\nthort: '+s} }"
+jbvd|g4543ghb|!@G$dfsd|fafr|e
+|s4e5rrwware|BBBBB|*&^(*&^>"PMK:njs;d|
+
+foobar0
+
+
+p 0.9
+p 1.45000000000000000000000000000000000000001
+p 9.999999999999999999999999999999999999999999
+p 9.999999999999999999999999999999999999999999e999999999999999999999999999
+p 0b0100011001
+p 0o123456701
+p 0123456701
+
+p 0x123456789abcdefABCDEF01
+
+
+
+
+
+p % foo 
+p % foo 
+p %
+foo
+
+
+p eval "%\sfoo\s"
+
+p eval "%\tfoo\t"
+p :p
+p :p
+p eval "%\vfoo\v"
+p eval "%\rfoo\r"
+p :p
+p :p
+p eval "%\nfoo\n"
+p eval "%\0foo\0"
+
+p eval "%\r\nfoo\r\n"
+p eval "%\n\rfoo\n\r"  #ruby get this wrong
+p eval "%\n\rfoo\n"    #this shouldn't work but does
+p eval "%\r\nfoo\r"    #this does not work, 
+p eval "%\r\nfoo\n"    #this shouldn't work but does
+
+
+p "Hi, my name is #{"Slim #{(4)>2?"Whitman":"Shady"} "}."
+p "Hi, my name is #{"Slim #{(4)<2?"Whitman":"Shady"} "}."
+
+#breakpoint
+
+p(String *Class)
+class String
+class Class
+end
+end
+#def String(x) x.to_s end #it's already built-in. duh!
+def String.*(right) [self,right] end
+def String.<<(right) [self,:<<,right] end
+def String./(right) [self,:/,right] end
+def String.[](right) [self,:[],right] end
+p(String::Class)
+p(String:: Class)
+p(String ::Class)
+p(String :: Class)
+p(String<<Class)
+p(String<< Class)
+p(String <<Class) 
+sgsdfgf
+Class
+p(String << Class)
+p(String/Class)
+p(String/ Class)
+p(String /Class/) 
+p(String / Class) #borken
+p(String[Class])
+p(String[ Class])
+p(String [Class]) 
+p(String [ Class]) 
+p(String*Class)
+p(String* Class)
+p(String *Class) 
+p(String * Class)
+class <<String
+undef :*,<<,/,[]
+end
+
+
+
+p(false::to_s)
+p(false ::to_s)
+p(false:: to_s)
+p(false :: to_s)
+#breakpoint
+
+class C2
+class <<self
+  def self.p8; p 8 end
+  alias p? p
+  alias P? p
+  alias [] p
+  alias <=> p
+end
+
+q=9
+Q=99
+
+p:p8
+false ? p: p8
+p :p8
+false ? p : p8
+
+false ? q:p8
+false ? q: p8
+false ? q :p8
+false ? q : p8
+
+#false ? Q:p8  #gives ruby indigestion
+false ? Q: p8
+#false ? Q :p8  #gives ruby indigestion
+false ? Q : p8
+
+p?:p8
+false ? p?: p8
+p? :p8
+false ? p? : p8
+
+p??1
+p? ?1
+p(p?? 1 : 2)
+p(p? ? 1 : 2)
+
+P?:p8
+false ? P?: p8
+P? :p8
+false ? P? : p8
+
+P??1
+P? ?1
+p(P?? 1 : 2)
+p(P? ? 1 : 2)
+
+self.[]:p8
+false ? self.[]: p8
+self.[] :p8
+false ? self.[] : p8
+
+self.<=>:p8
+false ? self.<=>: p8
+self.<=> :p8
+false ? self.<=> : p8
+
+self <=>:p8
+#false ? self <=>: p8  #gives ruby indigestion
+self <=> :p8
+#false ? self <=> : p8  #gives ruby indigestion
+end
+#breakpoint
+
+p <<stuff+'foobar'.tr('j-l','d-f')
+"more stuff"
+12345678
+the quick brown fox jumped over the lazy dog
+stuff
+
+
+p <<p
+sdfsfdf^^^^@@@
+p
+mix=nil
+p / 5/mix
+#breakpoint
+
+module M33
+#breakpoint
+  p="var:"
+#breakpoint
+  Q="func:"
+  def Q.method_missing(name,*args)
+    self+name.to_s+(args.join' ')
+  end
+  def p.method_missing(name,*args)
+    self+name.to_s+(args.join' ')
+  end
+  def self.p(*a); super; Q end
+  @a=1
+  $a=2
+  
+  p(p~6)
+  p(p ~6)
+  p(p~ 6)
+  p(p ~ 6)
+  p(p*11)
+  p(p *11)
+  p(p* 11)
+  p(p * 11)
+  p(p&proc{})
+  p(p &proc{})
+  p(p& proc{})
+  p(p & proc{})
+  p(p !1)
+#  p(p ?1) #compile error, when p is var
+  p(p ! 1)
+  p(p ? 1 : 6)
+  p(p@a)
+  p(p @a)
+#  p(p@ a)  #wont
+#  p(p @ a) #work 
+  p(p#a
+)
+  p(p #a
+)
+  p(p# a
+)
+  p(p # a
+)
+  p(p$a)
+  p(p $a)
+#  p(p$ a)  #wont
+#  p(p $ a) #work
+  p(p%Q{:foo})
+  p(p %Q{:foo})
+  p(p% Q{:foo})
+  p(p % Q{:foo})
+  p(p^6)
+  p(p ^6)
+  p(p^ 6)
+  p(p ^ 6)
+  p(p&7)
+  p(p &proc{7})
+  p(p& 7)
+  p(p & 7)
+  p(p(2))
+  p(p (2))
+  p(p( 2))
+  p(p ( 2))
+  p(p(p))
+  p(p())
+  p(p (p))
+  p(p ())
+  p(p ( p))
+  p(p ( ))
+  p(p( p))
+  p(p( ))
+  p(p)
+  p((p))
+  p(p )
+  p((p ))
+  p((p p))
+  p((p p,p))
+  p((p p))
+  p((p p,p))
+  p(p-0)
+  p(p -0)
+  p(p- 0)
+  p(p - 0)
+  p(p+9)
+  p(p +9)
+  p(p+ 9)
+  p(p + 9)
+  p(p[1])
+  p(p [1])
+  p(p[ 1])
+  p(p [ 1])
+  p(p{1})
+  p(p {1})
+  p(p{ 1})
+  p(p { 1})
+  p(p/1)
+  p(p /22)
+  p(p/ 1)
+  p(p / 22)
+  p(p._)
+  p(p ._)
+  p(p. _)
+  p(p . _)
+  p(false ? p:f)
+  p(false ? p :f)
+  p(false ? p: f)
+  p(false ? p : f)
+  p((p;1))
+  p((p ;1))
+  p((p; 1))
+  p((p ; 1))
+  p(p<1)
+  p(p <1)
+  p(p< 1)
+  p(p < 1)
+  p(p<<1)
+  p(p <<1)
+  p(p<< 1)
+  p(p << 1)
+  p(p'j')
+  p(p 'j')
+  p(p' j')
+  p(p ' j')
+  p(p"k")
+  p(p "k")
+  p(p" k")
+  p(p " k")
+  p(p|4)
+  p(p |4)
+  p(p| 4)
+  p(p | 4)
+  p(p>2)
+  p(p >2)
+  p(p> 2)
+  p(p > 2)
+ 
+#breakpoint
+end
+
+#breakpoint
+module M34
+  p(p~6)
+  p(p ~6)
+  p(p~ 6)
+  p(p ~ 6)
+  p(p*[1])
+  p(p *[1])
+  p(p* [1])
+  p(p * [1])
+  p(p&proc{})
+  p(p &proc{})
+  p(p& proc{})
+  p(p & proc{})
+  p(p !1)
+  p(p ?1)
+  p(p ! 1)
+  p(p ? 1 : 6)
+  p(p@a)
+  p(p @a)
+#  p(p@ a)  #wont
+#  p(p @ a) #work 
+
+  p(p#a
+)
+  p(p #a
+)
+  p(p# a
+)
+  p(p # a
+)
+  p(p$a)
+  p(p $a)
+#  p(p$ a)  #wont
+#  p(p $ a) #work
+  p(p%Q{:foo})
+  p(p %Q{:foo})
+  p(p% Q{:foo})
+  p(p % Q{:foo})
+  p(p^6)
+  p(p ^6)
+  p(p^ 6)
+  p(p ^ 6)
+  p(p&7)
+  p(p &proc{7})
+  p(p& 7)
+  p(p & 7)
+  p(p(2))
+  p(p (2))
+  p(p( 2))
+  p(p ( 2))
+  p(p(p))
+  p(p())
+  p(p (p))
+  p(p ())
+  p(p ( p))
+  p(p ( ))
+  p(p( p))
+  p(p( ))
+  p(p)
+  p((p))
+  p(p )
+  p((p ))
+  p((p p))
+  p((p p,p))
+  p((p p))
+  p((p p,p))
+  p(p-0)
+  p(p -1)
+  p(p- 0)
+  p(p - 0)
+  p(p+9)
+  p(p +9)
+  p(p+ 9)
+  p(p + 9)
+  p(p[1])
+  p(p [1])
+  p(p[ 1])
+  p(p [ 1])
+  p(p{1})
+  p(p {1})
+  p(p{ 1})
+  p(p { 1})
+  p(p/1)
+  p(p /22/)
+  p(p/ 1)
+  p(p / 22)
+  p(p._)
+  p(p ._)
+  p(p. _)
+  p(p . _)
+  p(p:f)
+  p(p :f)
+  p(false ? p: f)
+  p(false ? p : f)
+  p((p;1))
+  p((p ;1))
+  p((p; 1))
+  p((p ; 1))
+  p(p<1)
+  p(p <1)
+  p(p< 1)
+  p(p < 1)
+  p(p<<1)
+  p(p <<1)
+foobar
+1
+  p(p<< 1)
+  p(p << 1)
+  p(p'j')
+  p(p 'j')
+  p(p' j')
+  p(p ' j')
+  p(p"k")
+  p(p "k")
+  p(p" k")
+  p(p " k")
+  p(p|4)
+  p(p |4)
+  p(p| 4)
+  p(p | 4)
+  p(p>2)
+  p(p >2)
+  p(p> 2)
+  p(p > 2)
+  
+end
+
+
+def bob(x) x end
+def bill(x) x end
+p(bob %(22))
+for bob in [100] do p(bob %(22)) end
+p(bob %(22))
+def %(n) to_s+"%#{n}" end
+p(bill %(22))
+begin sdjkfsjkdfsd; rescue Object => bill; p(bill %(22)) end
+p(bill %(22))
+undef %
+
+class Object
+
+public :`
+def `(s)
+  print "bq: #{s}\n"
+end
+end
+
+69.`('what a world')
+
+79::`('what a word')
+
+p :`
+
+p{}
+p {}
+a=5
+p p +5
+p a +5
+
+def nil.+(x) ~x end
+def nil.[](*x) [x] end
+p( p + 5 )
+p( p +5 )
+p( p+5 )
+p( p[] )
+p( p [] )
+p( p [ ] )
+class NilClass; undef +,[] end
+
+class Foou
+ public
+ def [] x=-100,&y; p x; 100 end
+end
+a0=8
+p Foou.new.[]!false  #value
+p Foou.new.[] !false #value
+p Foou.new.[]~9      #value
+p Foou.new.[] ~9     #value
+p Foou.new.[]-9      #op
+p Foou.new.[]+9      #op
+p Foou.new.[] -9     #value
+p Foou.new.[] +9     #value
+p Foou.new.[]<<9     #op
+p Foou.new.[] <<9    #value
+foobar
+9
+p Foou.new.[]%9      #op
+p Foou.new.[]/9      #op
+p Foou.new.[] %(9)   #value
+p Foou.new.[] /9/    #value
+p Foou.new.[]$9      #value
+p Foou.new.[]a0      #value
+p Foou.new.[] $9     #value
+p Foou.new.[] a0     #value
+p Foou.new.[]{9}     #lambda (op)
+p Foou.new.[] {9}    #lambda (op)
+
+if p then p end
+
+p({:foo=>:bar})   #why does this work? i'd think that ':foo=' would be 1 token
+p   EMPTY = 0
+p   BLACK = 1
+p   WHITE = - BLACK
+
+ a=b=c=0
+  a ? b:c
+  a ?b:c
+
+  p(a ? b:c)
+  p(a ?b:c)
+
+
+p~4
+p:f
+p(~4){}
+p(:f){}
+h={}
+h.default=:foo
+
+p def (h="foobar").default= v; p @v=v;v end
+p h
+
+p h.default=:b
+
+x, (*y) = [:x, :y, :z]
+p x
+p y
+
+x, *y = [:x, :y, :z]
+p x
+p y
+
+x, * = [:x, :y, :z]
+p x
+
+
+
+p Array("foo\nbar")
+
+
+
+p +(4)
+p -(4)
+
+p :'\\'
+
+class Foop
+  def Foop.bar a,b
+    p a,b
+  end
+end
+Foop.bar 1,2
+Foop::bar 3,4
+
+
+class Foop
+  def Foop::baz a,b
+    p :baz,a,b
+  end
+end
+Foop.baz 5,6
+Foop::baz 7,8
+
+
+
+without_creating=widgetname=nil
+      if without_creating && !widgetname #foo
+        fail ArgumentError,
+             "if set 'without_creating' to true, need to define 'widgetname'"
+      end
+
+
+
+=begin disable for now
+
+#class, module, and def should temporarily hide local variables
+def mopsdfjskdf arg; arg*2 end
+mopsdfjskdf=5
+ class C
+ p mopsdfjskdf %(3)    #calls method
+ end
+
+module M
+ p mopsdfjskdf %(4)    #calls method
+end
+
+ def d
+ p mopsdfjskdf %(5)    #calls method
+ end
+p d
+p mopsdfjskdf %(6)     #reads variable
+p proc{mopsdfjskdf %(7)}[] #reads variable
+
+#fancy symbols not supported yet
+p %s{symbol}
+=end
+
+#multiple assignment test
+proc {
+  a,b,c,d,e,f,g,h,i,j,k=1,2,3,4,5,6,7,8,9,10,11
+  p(b %(c))
+  p(a %(c))
+  p(k %(c))
+  p(p %(c))
+}.call
+
+
+=begin disable for now
+p "#{<<kekerz}#{"foob"
+zimpler
+kekerz
+}"
+
+
+aaa=<<whatnot; p "#{'uh,yeah'
+gonna take it down, to the nitty-grit
+gonna tell you mother-fuckers why you ain't shit
+cause suckers like you just make me strong
+you been pumpin' that bullshit all day long
+whatnot
+}"
+p aaa
+
+#test variable creation in string inclusion
+#currently broken because string inclusions
+#are lexed by a separate lexer!
+proc {
+  p "jentawz: #{baz=200}"
+  p( baz %(9))
+}.call
+=end
+
+=begin ought to work...ruby doesn't like
+class A
+class B
+class C
+end
+end
+end
+def A::B::C::d() :abcd end
+def A::B::d() :abd end   #this used to work as well... i think
+
+
+p :$1
+p :$98349576875974523789734582394578
+
+def nil.d=; end #this works
+def (;).d=; end
+def ().d=; end
+p def (p h="foobar";).default= v; p @v=v;v end
+p def (p h="foobar";h).default= v; p @v=v;v end
+
+p~4{}
+p:f{}
+p ~4{}
+p :f{}
+
+def g a=:g; [a] end
+g g g  #this works
+g *g   #this works
+g *g g #this doesn't
+
+[nil,p 5]
+"foo"+[1].join' '
+
+class Fook
+def foo; end
+
+file.===/#/  #syntax error
+
+file.=== /#/ #no error
+file===//    #no error
+
+#these work:
+(not true)
+p(!true) #etc
+(true if false) #etc
+(true and false) #etc
+(undef foo)
+(alias bar foo)
+(BEGIN{p :yyy})
+
+#these don't:
+p(not true)
+p(true if false) #etc
+p(true and false) #etc
+p(undef foo)
+p(alias bar foo)
+p(BEGIN{p :yyy})
+end
+
+=end
+
+proc {
+}
+
+p "#{<<foobar3}"
+bim
+baz
+bof
+foobar3
+
+def func
+  a,b,* = [1,2,3,4,5,6,7,8]
+  p a,b
+  a,b, = [1,2,3,4,5,6,7,8]
+  p a,b
+
+  a,b = [1,2,3,4,5,6,7,8]
+  p a,b
+  a,*b = [1,2,3,4,5,6,7,8]
+  p a,b
+
+  a,b,*c=[1,2,3,4,5,6,7,8]
+  a,b,* c=[1,2,3,4,5,6,7,8]
+end
+func
+
+
+p( %r{\/$})
+p( %r~<!include:([\/\w\.\-]+)>~m)
+
+p <<end
+#{compile_body}\
+#{outvar}
+end
+
+
+
+
+
+proc {
+  h={:a=>(foo=100)}
+  p( foo %(5))
+}.call
+
+
+p "#{<<foobar3}"
+bim
+baz
+bof
+foobar3
+
+p "#{<<foobar2
+bim
+baz
+bof
+foobar2
+}"
+
+
+
+p <<one ; p "#{<<two}"
+1111111111111111
+fdsgdfgdsfffff
+one
+2222222222222222
+sdfasdfasdfads
+two
+
+p "#{<<foobar1.each('|'){|s| '\nthort: '+s}
+jbvd|g4543ghb|!@G$dfsd|fafr|e
+|s4e5rrwware|BBBBB|*&^(*&^>"PMK:njs;d|
+
+foobar1
+}"
+
+
+def foo(a=<<a,b=<<b,c=<<c)
+jfksdkjf
+dkljjkf
+a
+kdljfjkdg
+dfglkdfkgjdf
+dkf
+b
+lkdffdjksadhf
+sdflkdjgsfdkjgsdg
+dsfg;lkdflisgffd
+g
+c
+
+   a+b+c
+
+end
+
+p foo
+
+
+
+
+$a=1
+@b=2
+@@c=3
+p "#$a #@b #@@c #{$a+@b+@@c}"
+p "\#$a \#@b \#@@c \#{$a+@b+@@c}"
+p '#$a #@b #@@c #{$a+@b+@@c}'
+p '\#$a \#@b \#@@c \#{$a+@b+@@c}'
+p %w"#$a #@b #@@c #{$a+@b+@@c}"
+p %w"\#$a \#@b \#@@c \#{$a+@b+@@c}"
+p %W"#$a #@b #@@c #{$a+@b+@@c}"
+p %W"\#$a \#@b \#@@c \#{$a+@b+@@c}"
+p %Q[#$a #@b #@@c #{$a+@b+@@c}]
+p %Q[\#$a \#@b \#@@c \#{$a+@b+@@c}]
+p `echo #$a #@b #@@c #{$a+@b+@@c}`
+p `echo \#$a \#@b \#@@c \#{$a+@b+@@c}`
+p(/#$a #@b #@@c #{$a+@b+@@c}/)
+#p(/\#$a \#@b \#@@c \#{$a+@b+@@c}/) #moved to w.rb
+
+
+class AA; class BB; class CC
+FFOO=1
+end end end
+
+p AA::BB::CC::FFOO
+
+compile_body=outvar='foob'
+
+if false
+ method_src = c.compile(template, (HtmlCompiler::AnyData.new)).join("\n") +
+    "\n# generated by PartsTemplate::compile_partstemplate at #{Time.new}\n"
+ rescu -1
+end
+
+  p('rb_out', 'args', <<-'EOL')
+    regsub -all {!} $args {\\!} args
+    regsub -all "{" $args "\\{" args
+    if {[set st [catch {ruby [format "TkCore.callback %%Q!%s!" $args]} ret]] != 0} {
+        return -code $st $ret
+    } {
+        return $ret
+    }
+  EOL
+
+
+def add(*args)
+   self.<<(*args)
+end
+
+
+
+val=%[13,17,22,"hike", ?\s]
+    if val.include? ?\s
+      p val.split.collect{|v| (v)}
+    end
+p "#{}"
+p "#(1)"
+class Hosts
+end
+class DNS < Hosts
+end
+def intialize(resolvers=[Hosts.new, DNS.new]) end
+def environment(env = File.basename($0, '.*')) end
+
+def ssssss &block
+end
+def params_quoted(field_name, default)
+  if block_given? then yield field_name else default end
+end
+def ==(o) 444 end
+def String.ffff4() self.to_s+"ffff" end
+
+p *[]
+for i in \
+[44,55,66,77,88] do p i**Math.sqrt(i) end
+
+
+#(
+for i in if
+false then foob12345; else [44,55,66,77,88] end do p i**Math.sqrt(i) end
+#)
+(
+for i in if false then
+foob12345; else [44,55,66,77,88] end do p i**Math.sqrt(i) end
+
+c=j=0
+until while j<10 do j+=1 end.nil? do p 'pppppppppp' end
+for i in if false then foob12345;
+else [44,55,66,77,88] end do p i**Math.sqrt(i) end
+
+for i in if false then foob12345; else
+[44,55,66,77,88] end do p i**Math.sqrt(i) end
+
+
+for i in (c;
+[44,55,66,77,88]) do p i**Math.sqrt(i) end
+)
+(
+
+for i in (begin
+[44,55,66,77,88] end) do p i**Math.sqrt(i) end
+
+for i in if false then foob12345; else
+[44,55,66,77,88] end do p i**Math.sqrt(i) end
+
+for i in (
+
+[44,55,66,77,88]) do p i**Math.sqrt(i) end
+
+for i in (
+[44,55,66,77,88]) do p i**Math.sqrt(i) end
+
+)
+
+
+
+def yy;yield end
+
+block=proc{p "blah  blah"}
+
+yy &block
+p(1.+1)
+p pppp
+
+module M66
+p(proc do
+   p=123
+end.call)
+
+p proc {
+   p=123
+}.call
+
+p def pppp
+   p=123
+end
+p module Ppp
+   p=123
+end
+p class Pppp < String
+   p=123
+end
+end
+
+    def _make_regex(str) /([#{Regexp.escape(str)}])/n end
+p _make_regex("8smdf,34rh\#@\#$%$gfm/[]dD")
+
+
+p "#$a #@b #@@c
+
+d e f
+#$a #@b #@@c
+"
+
+p "\""
+
+a=a.to_s
+class <<a
+  def foobar
+     self*101
+  end
+  alias    eql?    ==
+end
+
+p a.foobar
+
+
+p(/^\s*(([+-\/*&\|^]|<<|>>|\|\||\&\&)=|\&\&|\|\|)/)
+p(:%)
+p( { :class => class_=0})
+p cls_name = {}[:class]
+
+
+p foo
+p "#{$!.class}"
+p :p
+p(:p)
+p(:"[]")
+p :"[]"
+p("\\")
+p(/\\/)
+p(/[\\]/)
+p 0x80
+p ?p
+p 0.1
+p 0.8
+p 0.9
+p(-1)
+p %/p/
+p %Q[<LI>]
+i=99
+p %Q[<LI><A HREF="#{i[3]}.html\##{i[4]}">#{i[0]+i[1]+(i[2])}</A>\n]
+p(:side=>:top)
+p %w[a b c
+     d e f]
+p %w[a b c\n
+     d e f]
+p %w[\\]
+p %w[\]]
+p :+
+p 99 / 3
+
+a=99;b=3
+p 1+(a / b)
+p %Q[\"]
+p %Q[ some [nested] text]
+
+
+if false
+     formatter.format_element(element) do
+       amrita_expand_and_format1(element, context, formatter)
+     end
+end
+if false
+ ret = <<-END
+ @@parts_template = #{template.to_ruby}
+ def parts_template
+   @@parts_template
+ end
+
+ #{c.const_def_src.join("\n")}
+ def amrita_expand_and_format(element, context, formatter)
+   if element.tagname_symbol == :span and element.attrs.size == 0
+     amrita_expand_and_format1(element, context, formatter)
+   else
+     formatter.format_element(element) do
+       amrita_expand_and_format1(element, context, formatter)
+     end
+   end
+ end
+
+ def amrita_expand_and_format1(element, context, formatter)
+   #{method_src}
+ end
+ END
+ j=55
+end
+
+p '
+'
+p '\n'
+p "
+"
+p "\n"
+p %w/
+/
+p %w/\n/
+
+p %W/
+/
+p %W/\n/
+p(/
+/)
+p(/\n/)
+p proc {
+  p `
+  `
+  p `\n`
+}
+
+
+
+p(%r[foo]i)
+p <<stuff+'foobar'.tr('j-l','d-f')
+"more stuff"
+12345678
+the quick brown fox jumped over the lazy dog
+stuff
+
+=begin doesn't work
+p <<stuff+'foobar'.tr('j-l','d-f')\
++"more stuff"
+12345678
+the quick brown fox jumped over the lazy dog
+stuff
+=end
+
+p ENV["AmritaCacheDir"]
+p <<-BEGIN + <<-END
+          def element_downcase(attributes = {})
+        BEGIN
+          end
+        END
+
+
+
+p <<ggg; def
+kleegarts() p 'kkkkkkk' end
+dfgdgfdf
+ggg
+koomblatz!() p 'jdkfsk' end
+
+koomblatz!
+
+p f = 3.7517675036461267e+17
+p $10
+p $1001
+p( <<end )
+nine time nine men have stood untold.
+end
+
+def jd_to_wday(jd) (jd + 1) % 7 end
+p jd_to_wday(98)
+
+
+p    pre = $`
+=begin
+=end
+
+p <<"..end .."
+cbkvjb
+vb;lkxcvkbxc
+vxlc;kblxckvb
+xcvblcvb
+..end ..
+
+p $-j=55
+
+def empty() end
+
+p <<a
+dkflg
+flk
+a
+
+label='label';tab=[1,2,3]
+      p <<S
+#{label} = arr = Array.new(#{tab.size}, nil)
+str = a = i = nil
+idx = 0
+clist.each do |str|
+  str.split(',', -1).each do |i|
+    arr[idx] = i.to_i unless i.empty?
+    idx += 1
+  end
+end
+
+S
+def printem1 a,b,c
+   p(a +77)
+   p(b +77)
+   p(c +77)
+end
+
+def foobar() end
+def foobar2
+end
+
+def printem0(a)
+   p(a +77)
+end
+def printem0(a,b,c)
+   p(a +77)
+   p(b +77)
+   p(c +77)
+end
+def printem2 a,b,c; p(a +77); p(b +77); p(c +77) end
+def three() (1+2) end
+
+def d;end
+def d()end
+def d(dd)end
+
+def printem a,b,c
+   p a;p b;p c
+   p(a +77)
+   p(b %(0.123))
+end
+printem 1,2,3
+
+a=1
+p(a +77)
+
+def hhh(a=(1+2)) a end
+
+
+
+END {
+  p "bye-bye"
+}
+
+
+p <<here
+where?
+here
+p <<-what
+     ? that's
+  what
+p proc{||}
+for i in if false
+foob12345; else [44,55,66,77,88] end do p i**Math.sqrt(i) end
+p "\v"
+c=0
+      while c == /[ \t\f\r\13]/; end
+
+
+
+
+
+
+