- (inst or result alloc-tn other-pointer-lowtag)
- (inst add alloc-tn boxed)
- (inst add alloc-tn unboxed)
+ ;;
+ ;; Not any more, or not in that sense at least, because the
+ ;; "p/a bit is also the highest lowtag bit" assumption is now hidden
+ ;; in the allocation macro. DFL - 2012-10-01
+ ;;
+ ;; Figure out how much space we really need and allocate it.
+ (inst add size boxed unboxed)
+ (allocation result size other-pointer-lowtag :temp-tn ndescr)