;;; -*- Mode: LISP; Package: FILE-SYSTEM; Base: 10; Syntax: Zetalisp -*-

(fs:set-logical-pathname-host
  "Penman"
  :physical-host "x34"
  :translations '(("penman-distribution" "penman;")
		  ("penman-distribution;patch" "penman.patch;")
		  ("Penman-Loom" "penman.penman.loom;")
		  ("SPL" "penman.penman.spl;")
		  ("CLisp" "penman.clisp;")
		  ("Nigel-Grammar" "penman.nigel.grammar;")
		  ("Nigel-Examples" "penman.nigel.Exercise-set;")
		  ("Nigel-Lexicons" "penman.nigel.lexicons;")
		  ("Nigel" "penman.nigel.source;")
		  ("ISI-Grapher"   "penman.isi-grapher;")
		  ))