Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: ea3d97a8c5
Fetching contributors…

Cannot retrieve contributors at this time

20 lines (17 sloc) 0.281 kb
.sub 'main' :main
$P0 = new 'ResizablePMCArray'
$I0 = 0
l1:
push $P0, $I0
inc $I0
unless $I0 == 10000 goto l1
$P1 = iter $P0
l2:
$P2 = shift $P1
$P3 = iter $P0
l3:
$P4 = shift $P3
if $P3 goto l3
if $P1 goto l2
.return()
.end
Jump to Line
Something went wrong with that request. Please try again.