home *** CD-ROM | disk | FTP | other *** search
- xdef @SegmentCode
- xdef @SegmentCode_Object
- xdef @SegmentCode_ID
- xdef @SegmentCode_End
- xref _RunElf
-
- identify "text" ;Same HUNK..-> PC Relative
-
- @SegmentCode:
- ;a0=String
- @SegmentCode_Object:
- move.l #0,a1
- ;a0=String
- ;a1=ElfObject
- move.l a2,-(a7)
- lea.l .destroychecksum(pc),a2 ;destroy a possible checksum to
- addq.l #1,(a2) ;avoid a possible autoresident of the file
- move.l (a7)+,a2
- jmp _RunElf
- .destroychecksum:
- dc.l 0
- @SegmentCode_ID:
- dc.b "ELFHUNKCLUDGOMATIC",0
- cnop 0,4
- @SegmentCode_End:
-