projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Fix (compile '(setf function)).
[sbcl.git]
/
src
/
compiler
/
hppa
/
c-call.lisp
diff --git
a/src/compiler/hppa/c-call.lisp
b/src/compiler/hppa/c-call.lisp
index
21aabde
..
1029ee9
100644
(file)
--- a/
src/compiler/hppa/c-call.lisp
+++ b/
src/compiler/hppa/c-call.lisp
@@
-141,7
+141,7
@@
(invoke-alien-type-method :result-tn type state))
values)))
-(!def-vm-support-routine make-call-out-tns (type)
+(defun make-call-out-tns (type)
(let ((arg-state (make-arg-state))
(nargs 0))
(dolist (arg-type (alien-fun-type-arg-types type))