arch/.unmaintained/m68k-emul/cacheclearu.s

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 /******************************************************************************
   7
   8     NAME
   9         AROS_LH0(void, CacheClearU,
  10
  11     LOCATION
  12         struct ExecBase *, SysBase, 106, Exec)
  13
  14     FUNCTION
  15         Flushes the contents of all CPU chaches in a simple way.
  16
  17     INPUTS
  18
  19     RESULT
  20
  21     NOTES
  22
  23     EXAMPLE
  24
  25     BUGS
  26         Currently this only works on Linux/m68k.
  27
  28     SEE ALSO
  29
  30     INTERNALS
  31
  32     HISTORY
  33
  34 ******************************************************************************/
  35
  36         #include "machine.i"
  37
  38         .text
  39         .balign 16
  40         .globl  AROS_SLIB_ENTRY(CacheClearU,Exec)
  41         .type   AROS_SLIB_ENTRY(CacheClearU,Exec),@function
  42 AROS_SLIB_ENTRY(CacheClearU,Exec):
  43         movem.l %d2-%d4,-(%sp)
  44         move.l  #123,%d0
  45         clr.l   %d1
  46         moveq   #3,%d2
  47         moveq   #3,%d3
  48         clr.l   %d4
  49         trap    #0
  50         movem.l (%sp)+,%d2-%d4
  51         rts
  52