Ticket #1940: segfaulty.pir

File segfaulty.pir, 118 bytes (added by rfw, 11 years ago)

Code that causes the segfault.

Line 
1.sub 'main' :main
2    $P1 = new ['BigInt']
3    $P2 = new ['Integer']
4    $P2 = 1
5    assign $P1, $P2
6    say $P1
7.end