Skip to content
Snippets Groups Projects
Commit 4d9ef6c3 authored by wlott's avatar wlott
Browse files

Changed interrupts-enabled to interrupts-disabled-count.

parent a561ceaa
No related branches found
No related tags found
No related merge requests found
......@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/objdef.lisp,v 1.33 1993/08/27 14:29:09 wlott Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/objdef.lisp,v 1.34 1993/08/27 14:39:48 wlott Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -392,11 +392,11 @@
(thread)
;; Signal control magic.
(foreign-fn-call-active :c-type "boolean")
(interrupts_enabled :c-type "boolean")
(interrupt_pending :c-type "boolean")
(pending_signal :c-type "int")
(pending_code :c-type "int")
(pending_mask :c-type "int")
(interrupts-disabled-count :c-type "int")
(interrupt-pending :c-type "boolean")
(pending-signal :c-type "int")
(pending-code :c-type "int")
(pending-mask :c-type "int")
;; Stacks.
(control-stack-base :c-type "lispobj *")
(control-stack-pointer :c-type "lispobj *")
......
......@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/cell.lisp,v 1.75 1993/08/27 14:35:08 wlott Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/cell.lisp,v 1.76 1993/08/27 14:41:37 wlott Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -387,7 +387,7 @@
(:variant ,offset)))))))))
(define-mutator-accessors thread :des t)
(define-mutator-accessors interrupts-enabled :ub32 t)
(define-mutator-accessors interrupts-disabled-count :ub32 t)
(define-mutator-accessors interrupt-pending :ub32 t)
(define-mutator-accessors control-stack-base :sap nil)
(define-mutator-accessors control-stack-end :sap nil)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment