;;; -*- Mode:Common-Lisp; Package:User; Base:10. -*-

(fs:set-logical-pathname-host "CYC-Lisp-Optimizations"
  :Physical-Host "X34"
  :Translations '(("CYC-Lisp-Optimizations" "CYC.Lisp-Optimizations;"))
)