home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / CLISP-2.LHA / CLISP960530-ki.lha / ffcall / trampoline / cache-hppa.s < prev    next >
Encoding:
Text File  |  1996-04-15  |  614 b   |  23 lines

  1.     .SPACE $PRIVATE$
  2.     .SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
  3.     .SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
  4.     .SPACE $TEXT$
  5.     .SUBSPA $LIT$,QUAD=0,ALIGN=8,ACCESS=44
  6.     .SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
  7.     .IMPORT $global$,DATA
  8.     .IMPORT $$dyncall,MILLICODE
  9. ; gcc_compiled.:
  10.     .SPACE $TEXT$
  11.     .SUBSPA $CODE$
  12.  
  13.     .align 4
  14.     .EXPORT __TR_clear_cache,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR
  15. __TR_clear_cache
  16.     .PROC
  17.     .CALLINFO FRAME=0,NO_CALLS
  18.     .ENTRY
  19.     mfsp %sr0,%r19;ldsid (0,%r26),%r20;mtsp %r20,%sr0;fic 0(%sr0,%r26);fic 0(%sr0,%r25);sync;mtsp %r19,%sr0;nop; nop; nop; nop; nop; nop
  20.     bv,n 0(%r2)
  21.     .EXIT
  22.     .PROCEND
  23.