See also CURDIR.

The following two procedures allow you to switch to a new directory and switch back to the old directory.

TO CHDIR :NAME
     MAKE "OLD.DIR CURDIR 
     SETCURDIR :NAME 
END
CHDIR defined
TO CHBACK
     SETCURDIR :OLD.DIR
END
CHBACK defined
CHDIR "data 
CHBACK 
Result: /Terrapin Logo