[1234] MacRuby/branches/experimental/test_roxor.rb
Revision: 1234 http://trac.macosforge.org/projects/ruby/changeset/1234 Author: vincent.isambart@gmail.com Date: 2009-03-28 03:45:51 -0700 (Sat, 28 Mar 2009) Log Message: ----------- added multiple assignment failing tests Modified Paths: -------------- MacRuby/branches/experimental/test_roxor.rb Modified: MacRuby/branches/experimental/test_roxor.rb =================================================================== --- MacRuby/branches/experimental/test_roxor.rb 2009-03-28 03:46:56 UTC (rev 1233) +++ MacRuby/branches/experimental/test_roxor.rb 2009-03-28 10:45:51 UTC (rev 1234) @@ -316,13 +316,18 @@ assert ':ok', "a, b, c = [1, 2]; p :ok if a == 1 and b == 2 and c == nil" assert ':ok', "a, b, c = nil; p :ok if a == nil and b == nil and c == nil" + assert '[nil, [], nil]', "a, *b, c = nil; p [a, b, c]" + assert '[1, [], 2]', "a, *b, c = 1, 2; p [a, b, c]" + assert '[1, [2, 3], 4]', "a, *b, c = 1, 2, 3, 4; p [a, b, c]" + assert '[[1, 2, 3], 4]', "*a, b = 1, 2, 3, 4; p [a, b]" + assert '4', "*, a = 1, 2, 3, 4; p a" + assert '[1, [2, 3], 4]', "(a, *b), c = [1, 2, 3], 4; p [a, b, c]" + assert ':ok', '* = 1,2; p :ok' assert '[1, 2]', 'x = (* = 1,2); p x' assert '[42]', "a=[1,2,3]; b=[0,3]; a[*b]=42; p a" - # TODO add more multiple assignments test - assert '42', "a=[20]; a[0] += 22; p a[0]" assert '42', "a=[80]; a[0] -= 38; p a[0]" assert '42', "a=[84]; a[0] /= 2; p a[0]"
participants (1)
-
source_changes@macosforge.org