aboutsummaryrefslogtreecommitdiffstats
path: root/test/ruby/test_whileuntil.rb
blob: 5e8ce4b2110ce5f87393fe3a62e12c1b0d4d8e6f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
require 'test/unit'
require 'tmpdir'

class TestWhileuntil < Test::Unit::TestCase
  def test_while
    tmpfilename = "#{Dir.tmpdir}/ruby_while_tmp.#{$$}"

    tmp = open(tmpfilename, "w")
    tmp.print "tvi925\n";
    tmp.print "tvi920\n";
    tmp.print "vt100\n";
    tmp.print "Amiga\n";
    tmp.print "paper\n";
    tmp.close

    tmp = open(tmpfilename, "r")
    assert_instance_of(File, tmp)
    
    while line = tmp.gets()
      break if /vt100/ =~ line
    end

    assert(!tmp.eof?)
    assert_match(/vt100/, line)
    tmp.close

    tmp = open(tmpfilename, "r")
    while line = tmp.gets()
      next if /vt100/ =~ line
      assert_no_match(/vt100/, line)
    end
    assert(tmp.eof?)
    assert_no_match(/vt100/, line)
    tmp.close

    tmp = open(tmpfilename, "r")
    while line = tmp.gets()
      lastline = line
      line = line.gsub(/vt100/, 'VT100')
      if lastline != line
        line.gsub!('VT100', 'Vt100')
        redo
      end
      assert_no_match(/vt100/, line)
      assert_no_match(/VT100/, line)
    end
    assert(tmp.eof?)
    tmp.close

    sum=0
    for i in 1..10
      sum += i
      i -= 1
      if i > 0
        redo
      end
    end
    assert_equal(220, sum)

    tmp = open(tmpfilename, "r")
    while line = tmp.gets()
      break if 3
      assert_no_match(/vt100/, line)
      assert_no_match(/Amiga/, line)
      assert_no_match(/paper/, line)
    end
    tmp.close

    File.unlink tmpfilename or `/bin/rm -f "#{tmpfilename}"`
    assert(!File.exist?(tmpfilename))
  end

  def test_until
    i = 0
    until i>4
      i+=1
    end
    assert(i>4)
  end
end