File: cache-alpha.c

package info (click to toggle)
clisp 1%3A2.33.2-10
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 36,532 kB
  • ctags: 13,235
  • sloc: lisp: 65,550; ansic: 35,636; asm: 23,001; sh: 14,153; xml: 13,470; fortran: 6,490; objc: 2,481; makefile: 2,069; perl: 164; sed: 55
file content (16 lines) | stat: -rw-r--r-- 495 bytes parent folder | download | duplicates (16) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
/* Instruction cache flushing for alpha */

/*
 * Copyright 1997 Bruno Haible, <bruno@clisp.org>
 *
 * This is free software distributed under the GNU General Public Licence
 * described in the file COPYING. Contact the author if you don't have this
 * or can't live with it. There is ABSOLUTELY NO WARRANTY, explicit or implied,
 * on this software.
 */

void __TR_clear_cache (void)
{
  /* Taken from gforth-0.3.0. */
  asm volatile ("call_pal 0x86"); /* imb (instruction-memory barrier) */
}