        SUBT    => &.Hdr.HostFS

OldOpt  SETA    {OPT}
        OPT     OptNoList+OptNoP1List

SWIClass SETS   "HostFS"

        ^       Module_SWISystemBase + TubeSWI * Module_SWIChunkSize

        AddSWI  HostVdu
        AddSWI  TubeVdu

        OPT     OldOpt
        END
