; This .csd file requires ESUBMIT to compile and bind %0.plm.
;
; INVOCATION:
;        echo and inttask:
;             ESUBMIT gen (%0) set(rmx=2,bind) ; for iRMX II, or
;             ESUBMIT gen (%0,32) set(rmx=3,bind) ; for iRMX III
;        inittsk, term, sbx350, procio, and utils:
;             ESUBMIT gen (%0) set(rmx=2) reset(bind) ; for iRMX II, or
;             ESUBMIT gen (%0,32) set(rmx=3) reset(bind) ; for iRMX III
;
; PARAMETERS:
;             %0   =  'echo' for echo
;                     'inttask' for inttask
;                     'inittsk' for inittsk
;                     'term' for term
;                     'sbx350' for sbx350
;                     'procio' for procio
;                     'utils' for utils
;             %1   =  '' for iRMX II
;                     '32' for iRMX III
;
; ESUBMIT ENVIRONMENT VARIABLES:
;             rmx  =  '2' for iRMX II or '3' for iRMX III
;             bind =  'TRUE' if bind is to be performed or 'FALSE' otherwise
;
; NOTE:
;     %$rmx$ will be replaced by the value of the ESUBMIT environment
;     variable RMX (case insensitive).
;

; attach the correct rmx directory as :RMX: for this operating system
     attachfile :sd:rmx%$rmx$86 as :RMX:

$if not link
; Compile %0.plm using the correct version of the PL\M compiler.
$if rmx=2
     plm%$rmx$86 &
$elseif rmx=3
     run86 -fixplm :lang:plm%$rmx$86 &
$endif
          %0.plm object(%0.ob%$rmx$) print(%0.ls%$rmx$) set(rmx=%$rmx$)

$endif  ; $if not link

$if bind

; Bind %0 using the correct version of the binder and interface libraries.
$if rmx=2
     bnd%$rmx$86                    &
$elseif rmx=3
     run86 :lang:bnd%$rmx$86        &
$endif
          %0.ob%$rmx$,              &
          :rmx:lib/rmxifc%1.lib,    &
          :rmx:lib/udiifc%1.lib     &
          object(%0.%$rmx$86)       &
          print(%0%$rmx$.mp1)       &
          segsize(stack(+800))      &
$if rmx=3
          renameseg(code32 to code) &
$endif
          rc(dm(2000,20000))

$elseif link

; Bind with the noload option
$if rmx=2
     bnd%$rmx$86                    &
$elseif rmx=3
     run86 :lang:bnd%$rmx$86        &
$endif
          inittsk.ob%$rmx$,         &
          sbx350.ob%$rmx$,          &
          term.ob%$rmx$,            &
          procio.ob%$rmx$,          &
          utils.ob%$rmx$,           &
          :lang:plm%$rmx$86.lib,    &
          :rmx:lib/rmxifc%1.lib     &
          object(example.ln%$rmx$)  &
          print(example%$rmx$l.mp1)  &
$if rmx=3
          renameseg(code32 to code) &
$endif
          noload debug              &
          nopublics except (dummydatavariable, init_task)

; Create the CUSP version of example.
; Compile inittsk.plm using the correct version of the PL\M compiler.
$if rmx=2
     plm%$rmx$86 &
$elseif rmx=3
     run86 -fixplm :lang:plm%$rmx$86 &
$endif
          inittsk.plm object(inittskc.ob%$rmx$) print(inittskc.ls%$rmx$) &
          set(rmx=%$rmx$,cusp)



; Bind with the noload option
$if rmx=2
     bnd%$rmx$86                    &
$elseif rmx=3
     run86 :lang:bnd%$rmx$86        &
$endif
          inittskc.ob%$rmx$,         &
          sbx350.ob%$rmx$,          &
          term.ob%$rmx$,            &
          procio.ob%$rmx$,          &
          utils.ob%$rmx$,           &
          :lang:plm%$rmx$86.lib,    &
          :rmx:lib/rmxifc%1.lib     &
          object(example.%$rmx$86)  &
          print(examplec%$rmx$.mp1)  &
          segsize(stack(+800))      &
$if rmx=3
          renameseg(code32 to code) &
$endif
          rc(dm(2000,20000))

$endif   ; $if bind ... $elseif link ...