Commit b91d4c1e authored by Frode Vatvedt Fjeld's avatar Frode Vatvedt Fjeld

Also some crude loading for non-allegro and non-asd users. Works for

me with cmucl 18e.
parent f4a2ee22
;;;;------------------------------------------------------------------
;;;;
;;;; Copyright (C) 2003-2004,
;;;; Department of Computer Science, University of Tromsoe, Norway.
;;;;
;;;; For distribution policy, see the accompanying file COPYING.
;;;;
;;;; Filename: load.lisp
;;;; Description:
;;;; Author: Frode Vatvedt Fjeld <frodef@acm.org>
;;;; Created at: Thu Jan 15 15:42:34 2004
;;;;
;;;; $Id:$
;;;;
;;;;------------------------------------------------------------------
#+allegro (progn
(load "system.lisp")
(compile-system :ia-x86)
(load-system :ia-x86)
(load-system :ia-x86-instr :interpreted t))
#-allegro (progn
(with-compilation-unit ()
(mapcar (lambda (path)
(load (compile-file path :print nil)))
'("packages"
"ia-x86"
"symtab"
"prefixes"
"registers"
"operands"
"inline-data"
"alignment"
"read"
"codec"
"proglist"
"def-instr"
"postload")))
(mapcar 'load
'("instr-mov"
"instr-add"
"instr-sub"
"instr-cmp"
"instr-push-pop"
"instr-mul-div"
"instr-branch"
"instr-and-or"
"instr-bit"
"instr-shift"
"instr-string"
"instr-misc"
"instr-fpu"
"instr-mmx"
"instr-simd")))
(ia-x86:init-instruction-tables)
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