invalidObject Series (while)

EP

invalidObject Series (while)

Pimmon

2000 · 15곡 · 15분

평가하기

평균 별점

– (0명)

0 / 2,000

코멘트 0

아직 코멘트가 없어요. 이 앨범에 대한 첫 코멘트를 남겨보세요.

트랙리스트

기준 릴리스: invalidObject Series (while) (2000) · Official

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