Ticket #993: vtable_init.pir

File vtable_init.pir, 305 bytes (added by dukeleto, 12 years ago)

example file that exhibits the bug

Line 
1.sub main
2    .include 'test_more.pir'
3    throws_like(<<'CODE','init','vtable init happens at the correct time')
4    .sub main :main
5        $P0 = newclass [ "Test" ]
6        $P1 = new [ "Test" ]
7        die '42'
8    .end
9
10.namespace [ "Test" ]
11
12.sub init :method :vtable
13    die 'init'
14.end
15CODE
16
17.end
18