[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
- To: info-macl@cambridge.apple.com
- From: REM@SUWATSON.stanford.edu
- Date: Fri, 22 Feb 91 02:05:50 PST
I've had pretty good luck programming the resource manager traps
directly from MACL 1.2.2, but I'm having trouble with the file manager,
for example:
First I do this to load the traps.fasl file:
(require "traps")
Then I do this to define a function that should be similar to EJECT-DISK
except actually unmounting the disk instead of just ejecting it (and
returning the system error code as an integer):
(defun volname-unmount (volstr)
(with-pstrs ((volName volStr))
(_UnmountVol :a0 volName :d0 0 :d0)))
Then I insert diskette REM390, wait a second for the system to mount it,
and then try calling the function, which gives a system bomb (ID = 02 or
10 usually):
(volname-unmount "REM390:")
I'm probably doing something really dumb, but I can't see it. Can
somebody tell me what I'm doing wrong?