Skip to content
GitLab
Explore
Sign in
Register
Primary navigation
Search or go to…
Project
cmucl
Manage
Activity
Members
Labels
Plan
Issues
Issue boards
Milestones
Wiki
Code
Merge requests
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Snippets
Build
Pipelines
Jobs
Pipeline schedules
Artifacts
Deploy
Releases
Package registry
Model registry
Operate
Environments
Terraform modules
Monitor
Incidents
Service Desk
Analyze
Value stream analytics
Contributor analytics
CI/CD analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
Community forum
Contribute to GitLab
Provide feedback
Terms and privacy
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
Carl Shapiro
cmucl
Commits
2781841a
Commit
2781841a
authored
35 years ago
by
wlott
Browse files
Options
Downloads
Patches
Plain Diff
Added sap+ to system exports.
parent
b1960358
No related branches found
No related tags found
No related merge requests found
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
code/exports.lisp
+37
-37
37 additions, 37 deletions
code/exports.lisp
with
37 additions
and
37 deletions
code/exports.lisp
+
37
−
37
View file @
2781841a
...
@@ -7,7 +7,7 @@
...
@@ -7,7 +7,7 @@
;;; Scott Fahlman (FAHLMAN@CMUC).
;;; Scott Fahlman (FAHLMAN@CMUC).
;;; **********************************************************************
;;; **********************************************************************
;;;
;;;
;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.1
1
1990/04/2
4 18:49:41
wlott Exp $
;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.1
2
1990/04/2
5 23:53:02
wlott Exp $
;;;
;;;
;;; All the stuff necessary to export various symbols from various packages.
;;; All the stuff necessary to export various symbols from various packages.
;;;
;;;
...
@@ -54,7 +54,8 @@
...
@@ -54,7 +54,8 @@
(
lisp->system
"MAKE-CT-A-VAL"
)
(
lisp->system
"MAKE-CT-A-VAL"
)
(
lisp->system
"NATURALIZE-BOOLEAN"
)
(
lisp->system
"NATURALIZE-BOOLEAN"
)
(
lisp->system
"NATURALIZE-INTEGER"
)
(
lisp->system
"NATURALIZE-INTEGER"
)
(
lisp->system
"SAP-REF-SAP"
))
(
lisp->system
"SAP-REF-SAP"
)
(
lisp->system
"SAP+"
))
(
let
((
symbol
(
find-symbol
"CHECK="
(
find-package
"COMPILER"
))))
(
let
((
symbol
(
find-symbol
"CHECK="
(
find-package
"COMPILER"
))))
(
when
symbol
(
import
symbol
(
find-package
"SYSTEM"
))))
(
when
symbol
(
import
symbol
(
find-package
"SYSTEM"
))))
...
@@ -374,41 +375,40 @@
...
@@ -374,41 +375,40 @@
(
in-package
"SYSTEM"
)
(
in-package
"SYSTEM"
)
(
export
'
(
%alien-indirect
%assembler-code-type
%bind-aligned-sap
(
export
'
(
%alien-indirect
%assembler-code-type
%bind-aligned-sap
%set-alien-access
%set-sap-ref-16
%set-sap-ref-32
%set-sap-ref-8
%set-alien-access
%standard-char-p
%static-alien-area
%standard-char-p
%static-alien-area
%string-char-p
%string-char-p
*alien-eval-when*
*beep-function*
*gr-messages*
*alien-eval-when*
*beep-function*
*gr-messages*
*in-the-compiler*
*in-the-compiler*
*maximum-interpreter-error-checking*
*maximum-interpreter-error-checking*
*nameserverport*
*nameserverport*
*pornography-of-death*
*pornography-of-death*
*port-ownership-rights-handlers*
*port-ownership-rights-handlers*
*port-receive-rights-handlers*
*port-receive-rights-handlers*
*stderr*
*stdin*
*stdout*
*stderr*
*stdin*
*stdout*
*task-data*
*task-notify*
*task-self*
*task-data*
*task-notify*
*task-self*
*tty*
*typescriptport*
*tty*
*typescriptport*
*usertypescript*
*userwindow*
*usertypescript*
*userwindow*
*xwindow-table*
add-fd-handler
*xwindow-table*
add-fd-handler
add-port-death-handler
add-port-death-handler
add-port-object
add-xwindow-object
alien
add-port-object
add-xwindow-object
alien
alien-access
alien-access
alien-address
alien-assign
alien-bind
alien-index
alien-address
alien-assign
alien-bind
alien-index
alien-indirect
alien-indirect
alien-sap
alien-size
alien-type
alien-value
beep
alien-sap
alien-size
alien-type
alien-value
beep
bits
boolean
bits
boolean
bytes
c-procedure
check<=
check=
compiler-version
bytes
c-procedure
check<=
check=
compiler-version
copy-alien
copy-alien
ct-a-val
ct-a-val-alien
ct-a-val-offset
ct-a-val-p
ct-a-val
ct-a-val-alien
ct-a-val-offset
ct-a-val-p
ct-a-val-sap
ct-a-val-sap
ct-a-val-size
ct-a-val-type
defalien
ct-a-val-size
ct-a-val-type
defalien
default-interrupt
default-interrupt
defenumeration
define-alien-stack
defoperator
defenumeration
define-alien-stack
defoperator
defrecord
defrecord
deport-boolean
deport-integer
dispose-alien
deport-boolean
deport-integer
dispose-alien
double-float-radix
double-float-radix
enable-interrupt
enumeration
fd-stream
enable-interrupt
enumeration
fd-stream
fd-stream-fd
fd-stream-p
fd-stream-fd
fd-stream-p
fexpr
find-if-in-closure
gr-bind
gr-call
fexpr
find-if-in-closure
gr-bind
gr-call
gr-call*
gr-error
gr-call*
gr-error
ignore-interrupt
int-sap
invalidate-descriptor
ignore-interrupt
int-sap
invalidate-descriptor
long-float-radix
long-float-radix
long-words
macro
make-alien
make-ct-a-val
long-words
macro
make-alien
make-ct-a-val
make-fd-stream
make-fd-stream
make-indenting-stream
make-object-set
map-port
make-indenting-stream
make-object-set
map-port
map-xwindow
map-xwindow
naturalize-boolean
naturalize-integer
naturalize-boolean
naturalize-integer
null-terminated-string
null-terminated-string
object-set-operation
output-raw-bytes
object-set-operation
output-raw-bytes
parse-body
perq-string
parse-body
perq-string
pointer
port
primep
read-n-bytes
pointer
port
primep
read-n-bytes
record-size
remove-fd-handler
record-size
remove-fd-handler
remove-port-death-handler
remove-port-death-handler
remove-port-object
remove-port-object
remove-xwindow-object
remove-xwindow-object
resolve-loaded-assembler-references
sap+
resolve-loaded-assembler-references
sap-int
sap-ref-16
sap-ref-32
sap-int
sap-ref-16
sap-ref-32
sap-ref-8
sap-ref-sap
sap-ref-8
sap-ref-sap
serve-all-events
serve-event
server
serve-all-events
serve-event
server
server-message
server-message
short-float-radix
signed-sap-ref-16
short-float-radix
signed-sap-ref-16
signed-sap-ref-32
signed-sap-ref-32
signed-sap-ref-8
single-float-radix
signed-sap-ref-8
single-float-radix
symbol-macro-let
symbol-macro-let
system-area-pointer
system-area-pointer-p
system-area-pointer
system-area-pointer-p
unproclaim
unstructured
unproclaim
unstructured
wait-until-fd-usable
wait-until-fd-usable
with-enabled-interrupts
with-fd-handler
with-enabled-interrupts
with-fd-handler
with-interrupts
with-interrupts
with-reply-port
with-stack-alien
without-gcing
with-reply-port
with-stack-alien
without-gcing
without-hemlock
without-hemlock
without-interrupts
words
))
without-interrupts
words
))
(
in-package
"USER"
)
(
in-package
"USER"
)
...
...
This diff is collapsed.
Click to expand it.
Preview
0%
Loading
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Save comment
Cancel
Please
register
or
sign in
to comment