git @ Cat's Eye Technologies SixtyPical / goto-at-end-of-block eg / rudiments / vector-main.60p
goto-at-end-of-block

Tree @goto-at-end-of-block (Download .tar.gz)

vector-main.60p @goto-at-end-of-blockraw · history · blame

// This will not compile on its own, because `printa` and `printb` are not defined.
// But `vector-inc.60p` and this together will compile.

vector routine
  trashes a, z, n
    print

// routine printb
//   trashes a, z, n
// {
//     ld a, 66
//     call chrout
// }

define main routine
  trashes print, a, z, n
{
    copy printa, print
    call print
    copy printb, print
    call print
}