From 8d6c690cf6a2e8554604448ff9fab58560dbac5e Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Thu, 14 Mar 1991 21:45:43 +0000 Subject: [PATCH] Added export of the ...-flag and ...-trap constants. --- compiler/mips/parms.lisp | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/compiler/mips/parms.lisp b/compiler/mips/parms.lisp index 8d17fa729..88ab527f4 100644 --- a/compiler/mips/parms.lisp +++ b/compiler/mips/parms.lisp @@ -7,11 +7,11 @@ ;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.92 1991/03/14 21:43:35 wlott Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.93 1991/03/14 21:45:43 wlott Exp $") ;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.92 1991/03/14 21:43:35 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.93 1991/03/14 21:45:43 wlott Exp $ ;;; ;;; This file contains some parameterizations of various VM ;;; attributes for the MIPS. This file is separate from other stuff so @@ -125,6 +125,9 @@ ;;;; Other non-type constants. +(export '(atomic-flag interrupted-flag halt-trap pending-interrupt-trap + error-trap cerror-trap breakpoint-trap)) + (defenum (:suffix -flag) atomic interrupted) -- GitLab