;;; -*- Mode:Lisp; Syntax:common-lisp; Package:FILE-SYSTEM; Base:10 -*-

(add-logical-pathname-host
  "ZHELIOS"
  "x26"
  #+Symbolics
  '(("Helios;" "Helios;"))
  #+TI
  '(("Helios" "Helios;"))
  )