use lib "$FindBin::Bin/lib";

##</code><code>##

perl -MFindBin -le 'print $FindBin::Bin'

##</code><code>##

imcc -a source.pasm

##</code><code>##

REDO: time I1
      print I1
      print "\n"
SPIN: time I1
      ne I1, I2, REDO
      branch SPIN