REM   Example of how to make a TLIB.CFG file that uses drive letters
REM   instead of UNC paths, but is nevertheless "portable" - i.e., not
REM   dependent on the particular drive letter mapping chosen.

iff (siz 'd:\libs\journal.dat') <> -1
  set tdrv=d:
else
 iff (siz 'e:\libs\journal.dat') <> -1
   set tdrv=e:
 else
  iff (siz 'f:\libs\journal.dat') <> -1
    set tdrv=f:
  else
   iff (siz 'g:\libs\journal.dat') <> -1
     set tdrv=g:
   else
    iff (siz 'h:\libs\journal.dat') <> -1
      set tdrv=h:
    else
     iff (siz 'i:\libs\journal.dat') <> -1
       set tdrv=i:
     else
      iff (siz 'j:\libs\journal.dat') <> -1
        set tdrv=j:
      else
       iff (siz 'k:\libs\journal.dat') <> -1
         set tdrv=k:
       else
        iff (siz 'l:\libs\journal.dat') <> -1
          set tdrv=l:
        else
         iff (siz 'm:\libs\journal.dat') <> -1
           set tdrv=m:
         else
          iff (siz 'n:\libs\journal.dat') <> -1
            set tdrv=n:
          else
           iff (siz 'o:\libs\journal.dat') <> -1
             set tdrv=o:
           else
            iff (siz 'p:\libs\journal.dat') <> -1
              set tdrv=p:
            else
             iff (siz 'q:\libs\journal.dat') <> -1
               set tdrv=q:
             else
              iff (siz 'r:\libs\journal.dat') <> -1
                set tdrv=r:
              else
               iff (siz 's:\libs\journal.dat') <> -1
                 set tdrv=s:
               else
                iff (siz 't:\libs\journal.dat') <> -1
                  set tdrv=t:
                else
                 iff (siz 'u:\libs\journal.dat') <> -1
                   set tdrv=u:
                 else
                  iff (siz 'v:\libs\journal.dat') <> -1
                    set tdrv=v:
                  else
                   iff (siz 'w:\libs\journal.dat') <> -1
                     set tdrv=w:
                   else
                    iff (siz 'x:\libs\journal.dat') <> -1
                      set tdrv=x:
                    else
                     iff (siz 'y:\libs\journal.dat') <> -1
                       set tdrv=y:
                     else
                      iff (siz 'z:\libs\journal.dat') <> -1
                        set tdrv=z:
                      else
                        abort "\libs\journal.dat" was not found on any drive!
                      endif
                     endif
                    endif
                   endif
                  endif
                 endif
                endif
               endif
              endif
             endif
            endif
           endif
          endif
         endif
        endif
       endif
      endif
     endif
    endif
   endif
  endif
 endif
endif
REM  say Note: (debug print) tdrv='%tdrv%'
jfile %tdrv%\libs\journal.dat
path %tdrv%\libs\*\