0.7.3.10: Fix the SIGILL with ev6 and later Alphas: icache needs flushing

[sbcl.git] / src / compiler / alpha / insts.lisp

diff --git a/src/compiler/alpha/insts.lisp b/src/compiler/alpha/insts.lisp
index 05f996c..d90c721 100644 (file)
--- a/src/compiler/alpha/insts.lisp
+++ b/src/compiler/alpha/insts.lisp
@@ -442,6 +442,9 @@
 (define-instruction trapb (segment)
   (:emitter (emit-lword segment #x63ff0000)))
 
+(define-instruction imb (segment)
+  (:emitter (emit-lword segment #x00000086)))
+
 (define-instruction gentrap (segment code)
   (:printer call-pal ((palcode #xaa0000)))
   (:emitter