.IMPORT $global$,DATA .IMPORT $$dyncall,MILLICODE ; gcc_compiled.: .IMPORT abort,CODE .EXPORT f,DATA .data .align 4 f: .word P%abort .word P%abort .IMPORT __main,CODE .IMPORT printf,CODE .code .align 4 LC$0000: .STRING "frob\x0a\x00" .align 4 .EXPORT main,CODE .EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR main: .PROC .CALLINFO FRAME=128,CALLS,SAVE_RP .ENTRY stw %r2,-20(%r30) ldo 128(%r30),%r30 .CALL bl __main,%r2 nop ldil L'LC$0000,%r26 .CALL ARGW0=GR bl printf,%r2 ldo R'LC$0000(%r26),%r26 ldw -148(%r30),%r2 bv %r0(%r2) ldo -128(%r30),%r30 .EXIT .PROCEND