diff options
| author | murphy <murphy@rubychan.de> | 2006-02-22 13:48:59 +0000 |
|---|---|---|
| committer | murphy <murphy@rubychan.de> | 2006-02-22 13:48:59 +0000 |
| commit | 3b4a0d83ddd0eec0dc424798ad8ed3a53c5ba88c (patch) | |
| tree | e764725fda5393480312babf3797da0c94d5c29f | |
| parent | 340013c50581fc2c471bee1517d001e1f74bd87a (diff) | |
| download | coderay-3b4a0d83ddd0eec0dc424798ad8ed3a53c5ba88c.tar.gz | |
New Test: test/ruby/tk-calc.in.rb.
Thanks to mawe.
| -rw-r--r-- | test/ruby/tk-calc.in.rb | 5 | ||||
| -rw-r--r-- | test/ruby/tk-calc.out.raydebug | 5 |
2 files changed, 10 insertions, 0 deletions
diff --git a/test/ruby/tk-calc.in.rb b/test/ruby/tk-calc.in.rb new file mode 100644 index 0000000..76272da --- /dev/null +++ b/test/ruby/tk-calc.in.rb @@ -0,0 +1,5 @@ +require 'tk';TkRoot.new;r,c,b=1,1,%w#7 8 9 + 4 5 6 - 1 2 3 * 0 . /#;d=TkEntry.new{
+grid("row"=>0,"column"=>1,"columnspan"=>4)};b.each_index{|i|TkButton.new{text b[i]
+command proc{d.insert("end",b[i])};grid("row"=>r,"column"=>c)};c+=1;if i&&(i+1)%##
+4==0then r+=1;c=1 end};TkButton.new{text"=";command proc{t=d.get;d.delete(0,"end")
+d.insert("end",eval(t))};grid("row"=>r,"column"=>c)};Tk.mainloop### by mawe :) ###
diff --git a/test/ruby/tk-calc.out.raydebug b/test/ruby/tk-calc.out.raydebug new file mode 100644 index 0000000..09460c9 --- /dev/null +++ b/test/ruby/tk-calc.out.raydebug @@ -0,0 +1,5 @@ +ident(require) string<delimiter(')content(tk)delimiter(')>operator(;)constant(TkRoot)operator(.)ident(new)operator(;)ident(r)operator(,)ident(c)operator(,)ident(b)operator(=)integer(1)operator(,)integer(1)operator(,)string<delimiter(%w#)content(7 8 9 + 4 5 6 - 1 2 3 * 0 . /)delimiter(#)>operator(;)ident(d)operator(=)constant(TkEntry)operator(.)ident(new)operator({)
+ident(grid)operator(()string<delimiter(")content(row)delimiter(")>operator(=)operator(>)integer(0)operator(,)string<delimiter(")content(column)delimiter(")>operator(=)operator(>)integer(1)operator(,)string<delimiter(")content(columnspan)delimiter(")>operator(=)operator(>)integer(4)operator(\))operator(})operator(;)ident(b)operator(.)ident(each_index)operator({)operator(|)ident(i)operator(|)constant(TkButton)operator(.)ident(new)operator({)ident(text) ident(b)operator([)ident(i)operator(])
+ident(command) ident(proc)operator({)ident(d)operator(.)ident(insert)operator(()string<delimiter(")content(end)delimiter(")>operator(,)ident(b)operator([)ident(i)operator(])operator(\))operator(})operator(;)ident(grid)operator(()string<delimiter(")content(row)delimiter(")>operator(=)operator(>)ident(r)operator(,)string<delimiter(")content(column)delimiter(")>operator(=)operator(>)ident(c)operator(\))operator(})operator(;)ident(c)operator(+=)integer(1)operator(;)reserved(if) ident(i)operator(&&)operator(()ident(i)integer(+1)operator(\))operator(%)comment(##)
+integer(4)operator(==)integer(0)reserved(then) ident(r)operator(+=)integer(1)operator(;)ident(c)operator(=)integer(1) reserved(end)operator(})operator(;)constant(TkButton)operator(.)ident(new)operator({)ident(text)string<delimiter(")content(=)delimiter(")>operator(;)ident(command) ident(proc)operator({)ident(t)operator(=)ident(d)operator(.)ident(get)operator(;)ident(d)operator(.)ident(delete)operator(()integer(0)operator(,)string<delimiter(")content(end)delimiter(")>operator(\))
+ident(d)operator(.)ident(insert)operator(()string<delimiter(")content(end)delimiter(")>operator(,)ident(eval)operator(()ident(t)operator(\))operator(\))operator(})operator(;)ident(grid)operator(()string<delimiter(")content(row)delimiter(")>operator(=)operator(>)ident(r)operator(,)string<delimiter(")content(column)delimiter(")>operator(=)operator(>)ident(c)operator(\))operator(})operator(;)constant(Tk)operator(.)ident(mainloop)comment(### by mawe :\) ###)
|