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
1 changed file:
Changes:
| ... | ... | @@ -49,6 +49,8 @@ |
| 49 | 49 | ;;; No problems.
|
| 50 | 50 | ;#+nil
|
| 51 | 51 | (def-vm-support-routine make-return-pc-passing-location (standard)
|
| 52 | + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler
|
|
| 53 | + ;; note.
|
|
| 52 | 54 | (declare (ignorable standard))
|
| 53 | 55 | (make-wired-tn (primitive-type-or-lose 'system-area-pointer *backend*)
|
| 54 | 56 | sap-stack-sc-number return-pc-save-offset))
|
| ... | ... | @@ -77,6 +79,8 @@ |
| 77 | 79 | ;;; No problems
|
| 78 | 80 | ;#+nil
|
| 79 | 81 | (def-vm-support-routine make-old-fp-passing-location (standard)
|
| 82 | + ;; Should be IGNORE, not IGNORABLE; We're just silencing a compiler
|
|
| 83 | + ;; note.
|
|
| 80 | 84 | (declare (ignorable standard))
|
| 81 | 85 | (make-wired-tn *fixnum-primitive-type* control-stack-sc-number
|
| 82 | 86 | ocfp-save-offset))
|