mdw@git.distorted.org.uk Git - ssr/blob - StraySrc/ssr-init,feb

   1 |
   2 | ssr_init
   3 |
   4 | Initialise paths for building SSR
   5 |
   6 | © 1998 Straylight
   7 |
   8
   9 | --- Add my binaries to the run path ---
  10
  11 Set SSR$Dir <Obey$Dir>
  12 /<SSR$Dir>.bin.hour -on
  13 /<SSR$Dir>.bin.pathutil -path Run$Path -add -dir <SSR$Dir>.bin.
  14
  15 | --- Add my libraries to the path ---
  16 |
  17 | Indirect everything though `SSRLibs$Dir' to reduce the path length.
  18
  19 Set SSRLibs$Dir <SSR$Dir>.Libraries
  20 Set Alias$_adlib pathutil -path Libs$Path -add -dir %%0. -create
  21 enumerate -noFiles -dir <SSRLibs$Dir> -cmd _adlib
  22 _adlib <SSRLibs$Dir>
  23 Unset Alias$_adlib
  24
  25 Set Sapphire$Path libs:Sapphire.sh.
  26
  27 | --- Development aliases ---
  28
  29 Set Alias$basasm Set bas$Output "%%*1"|mIf "|<Prefix$Dir>" = "" Then Run %%0 Else Run |<Prefix$Dir>.%%0
  30
  31 | --- Places to put things ---
  32
  33 Set SSR$BinDir <SSR$Dir>.bin
  34 Set SSR$ModDir <SSR$Dir>.Modules
  35 Set SSR$LibDir <SSR$Dir>.Libraries
  36 Set SSR$DLLDir <SSR$Dir>.!DLLs
  37
  38 | --- Done ---
  39
  40 hour -off