plabelbug.s

俄罗斯高人Mamaich的Pocket gcc编译器（运行在PocketPC上）的全部源代码。

	.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