print-out of a handle

[lynch@aristotle.ils.nwu.edu]

Not that it matters a whole hell of a lot, but when a handle is printed
out, the resource ID is printed as a signed word rather than an unsigned
word:

5 > *browsing-pict*
#<A Mac Handle to resource 'PICT'(-5696) : Unlocked, Size 1491 #xDFA0>
5 > (%stack-block ((nam 256) (typ 4) (num 2))
      (#_GetResInfo *browsing-pict* num typ nam)
      (print (%get-word num)))

59840 
59840
5 > (%stack-block ((nam 256) (typ 4) (num 2))
      (#_GetResInfo *browsing-pict* num typ nam)
      (print (%get-signed-word num)))

-5696 
-5696
5 > 

[This is in 2.0 final, I believe.]
"TANSTAAFL" Rich lynch@ils.nwu.edu