;;; -*- Mode:Common-Lisp; Package:USER; Base:10 -*-


(fs:set-logical-pathname-host "GENERA-TO-EXPLORER"
  :physical-host "TOOLS"
  :translations '(("GENERA-TO-EXPLORER"
		   "TOOLS.GENERA-TO-EXPLORER;"
		  )
		 )
)