Raymond Toy pushed to branch issue-336-3-standard-ignorable at cmucl / cmucl
Commits: 8e121dc5 by Raymond Toy at 2024-07-25T06:19:42-07:00 Add comment that IGNORABLE should be IGNORE
- - - - -
1 changed file:
- src/compiler/x86/call.lisp
Changes:
===================================== src/compiler/x86/call.lisp ===================================== @@ -49,6 +49,8 @@ ;;; No problems. ;#+nil (def-vm-support-routine make-return-pc-passing-location (standard) + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler + ;; note. (declare (ignorable standard)) (make-wired-tn (primitive-type-or-lose 'system-area-pointer *backend*) sap-stack-sc-number return-pc-save-offset)) @@ -77,6 +79,8 @@ ;;; No problems ;#+nil (def-vm-support-routine make-old-fp-passing-location (standard) + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler + ;; note. (declare (ignorable standard)) (make-wired-tn *fixnum-primitive-type* control-stack-sc-number ocfp-save-offset))
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/8e121dc54040d14dae5c6635...