336
339
(return-from produce-inline-loc
337
340
`(C-INLINE ,output-rep-type ,c-expression ,coerced-arguments ,side-effects NIL)))
339
348
;; Otherwise we have to set up variables for holding the output.
340
349
(flet ((make-output-var (type)
341
350
(let ((var (make-lcl-var :rep-type type)))