Pimmon
invalidObject Series (while)
2000

CD 1
#    Title    Time    Info  
1 #!/usr/bin/perl 1:02
2 $power = 8; 1:02
3 sub fission { 1:02
4 fork 1:02
5 or $child = 1; 1:02
6 $power-- if $child; 1:02
7 if ($child) {exit unless --$power} 1:02
8 return $child; } 1:02
9 while (not &fission) { 1:02
10 print 0; 1:02
11 bomb: 1:02
12 while (&fission) 1:02
13 { print 1 } 1:02
14 } 1:02
15 goto 'bomb'; 1:00
Total time 15:28



More releases

Fällt
2000, Ireland, English, CD

FreeDB records

1

Links

discogs       http://www.discogs.com/release/182547
download for free       http://www.fallt.com/invalidobject/while