Re: 4GB volume again

[slh@digitool.com (Steve Hain)]

At 12:03 PM 4/7/95, Paulus Chu wrote:
>? (#_getvcbqhdr)
>#<A Mac Non-zone Pointer #x3>

Ugh. The trap definiton for GetVCBQHdr in Files.lisp is wrong; it
should be:

(deftrap _getvcbqhdr nil
   (:no-trap (:pointer :qhdr))
   (:no-trap (%int-to-ptr #x0356)))

since the queue header itself is at 0x356, not a pointer to it.
With this change, you should get something like the following:

>? (pref (#_getvcbqhdr) :QHdr.qFlags)
>0

>? (pref (#_getvcbqhdr) :QHdr.qHead)
#<A Mac Zone Pointer Size 178 #xDF50>

>? (pref (#_getvcbqhdr) :QHdr.qTail)
#<A Mac Zone Pointer Size 178 #x1BD10>

We will update our interface files with the change; thanks for the report.

- Steve Hain

Digitool, Inc.
______________________________________________________________________________
                       One Main Street   7th Floor   Cambridge, MA 02142   USA
                              Internet: slh@digitool.com   AppleLink: digitool
                                      World Wide Web: http://www.digitool.com/
                                         Tel: 617 441-5000   Fax: 617 576-7680