.namespace [ 'Lua' ]
.HLL 'Lua', 'lua_group'

.sub '__start' :main
  load_bytecode 'thread.pir'
  _main()
.end
.sub '_main'
    .const .Sub F1 = "f1"
    find_type $I0, "thread"
    $P1 = new $I0, F1 
    $P2 = new $I0, F1 
    $P0 = add $P1, $P2
    end
.end
.sub 'f1'
    print "f1()\n"
    end
.end