From 5b7c10a8c3baa8b83bb0acc68216b0e4ff9c0dd3 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Fri, 18 May 1990 01:09:06 +0000 Subject: [PATCH] Added two-arg-gcd and two-arg-lcm to the kernel package. Added allocate-system-memory and deallocate-system-memory to the system package. --- code/exports.lisp | 56 ++++++++++++++++++++++++----------------------- 1 file changed, 29 insertions(+), 27 deletions(-) diff --git a/code/exports.lisp b/code/exports.lisp index 4da00b471..3fcff2a02 100644 --- a/code/exports.lisp +++ b/code/exports.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman (FAHLMAN@CMUC). ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.23 1990/05/16 01:08:16 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.24 1990/05/18 01:09:06 wlott Exp $ ;;; ;;; All the stuff necessary to export various symbols from various packages. ;;; @@ -299,8 +299,8 @@ structure-type-p system-area-clear system-area-copy truth type-expand type-init two-arg-* two-arg-+ two-arg-- two-arg-/ two-arg-/= two-arg-< two-arg-<= two-arg-= two-arg-> two-arg->= - two-arg-and two-arg-ior two-arg-xor type-difference - type-intersect type-intersection type-specifier + two-arg-and two-arg-gcd two-arg-ior two-arg-lcm two-arg-xor + type-difference type-intersect type-intersection type-specifier type-specifier-symbols type-union type/= type= types-intersect unboxed-array union-type union-type-p union-type-types unknown-type unknown-type-p unknown-type-specifier @@ -396,30 +396,32 @@ *xwindow-table* add-fd-handler add-port-death-handler add-port-object add-xwindow-object alien alien-access alien-address alien-assign alien-bind alien-index alien-indirect - alien-sap alien-size alien-type alien-value beep bits boolean - bytes c-procedure check<= check= compiler-version copy-alien - ct-a-val ct-a-val-alien ct-a-val-offset ct-a-val-p ct-a-val-sap - ct-a-val-size ct-a-val-type defalien default-interrupt - defenumeration define-alien-stack defoperator defrecord - deport-boolean deport-integer dispose-alien double-float-radix - enable-interrupt enumeration fd-stream fd-stream-fd fd-stream-p - fexpr find-if-in-closure gr-bind gr-call gr-call* gr-error - ignore-interrupt int-sap invalidate-descriptor long-float-radix - long-words macro make-alien make-ct-a-val make-fd-stream - make-indenting-stream make-object-set map-port map-xwindow - naturalize-boolean naturalize-integer null-terminated-string - object-set-operation output-raw-bytes parse-body perq-string - pointer port primep read-n-bytes record-size remove-fd-handler - remove-port-death-handler remove-port-object - remove-xwindow-object resolve-loaded-assembler-references sap+ - sap- sap-int sap-ref-16 sap-ref-32 sap-ref-8 sap-ref-sap - serve-all-events serve-event server server-message - short-float-radix signed-sap-ref-16 signed-sap-ref-32 - signed-sap-ref-8 single-float-radix symbol-macro-let - system-area-pointer system-area-pointer-p unproclaim unstructured - wait-until-fd-usable with-enabled-interrupts with-fd-handler - with-interrupts with-reply-port with-stack-alien without-gcing - without-hemlock without-interrupts words)) + alien-sap alien-size alien-type alien-value + allocate-system-memory beep bits boolean bytes c-procedure + check<= check= compiler-version copy-alien ct-a-val + ct-a-val-alien ct-a-val-offset ct-a-val-p ct-a-val-sap + ct-a-val-size ct-a-val-type deallocate-system-memory defalien + default-interrupt defenumeration define-alien-stack defoperator + defrecord deport-boolean deport-integer dispose-alien + double-float-radix enable-interrupt enumeration fd-stream + fd-stream-fd fd-stream-p fexpr find-if-in-closure gr-bind gr-call + gr-call* gr-error ignore-interrupt int-sap invalidate-descriptor + long-float-radix long-words macro make-alien make-ct-a-val + make-fd-stream make-indenting-stream make-object-set map-port + map-xwindow naturalize-boolean naturalize-integer + null-terminated-string object-set-operation output-raw-bytes + parse-body perq-string pointer port primep read-n-bytes + record-size remove-fd-handler remove-port-death-handler + remove-port-object remove-xwindow-object + resolve-loaded-assembler-references sap+ sap- sap-int sap-ref-16 + sap-ref-32 sap-ref-8 sap-ref-sap serve-all-events serve-event + server server-message short-float-radix signed-sap-ref-16 + signed-sap-ref-32 signed-sap-ref-8 single-float-radix + symbol-macro-let system-area-pointer system-area-pointer-p + unproclaim unstructured wait-until-fd-usable + with-enabled-interrupts with-fd-handler with-interrupts + with-reply-port with-stack-alien without-gcing without-hemlock + without-interrupts words)) (in-package "USER") -- GitLab