Commit 85df7154 authored by Janis Dzerins's avatar Janis Dzerins

Call INIT-INSTRUCTION-TABLES after loading instructions.

parent 726862de
......@@ -7,7 +7,7 @@
;; Author: Nikodemus Siivola
;; Created at: Wed Oct 20 23:13:46 1999
;;
;; $Id: ia-x86.asd,v 1.1.1.1 2004/01/12 14:19:00 ffjeld Exp $
;; $Id: ia-x86.asd,v 1.2 2004/01/12 19:41:49 ffjeld Exp $
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
......@@ -38,7 +38,8 @@
(defmethod perform :after ((o load-op) (c (eql (find-system :ia-x86))))
(when (y-or-n-p "Initialize instruction tables? It may take a while, ~
espcially on memory starved boxes.")
(operate 'load-op :ia-x86-instr)))
(operate 'load-op :ia-x86-instr)
(funcall (intern "INIT-INSTRUCTION-TABLES" :ia-x86))))
(defclass conf-file (cl-source-file) ())
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment