! STRNG.COM - Build the TSTRNG program
!
r libr
obj:strng1=obj:tstlib/e
TstConcat

obj:strng2=obj:tstlib/e
TstIndex

obj:strng3=obj:tstlib/e
TstInsert

obj:strng4=obj:tstlib/e
TstLen

obj:strng5=obj:tstlib/e
TstRepeat

obj:strng6=obj:tstlib/e
TstScomp

obj:strng7=obj:tstlib/e
TstCopy

obj:strng8=obj:tstlib/e
TstStrpad

obj:strng9=obj:tstlib/e
TstSubstr

obj:strn10=obj:tstlib/e
TstTransl

obj:strn11=obj:tstlib/e
TstTrim

obj:strn12=obj:tstlib/e
TstVerify

obj:strn13=obj:tstlib/e
TGetstr

obj:strn14=obj:tstlib/e
TstPutstr

^C
R LINK
BIN:TSTRNG,MAP:TSTRNG=OBJ:TSTRNG//
OBJ:TSTLIB
SY:F77OTS
OBJ:STRNG1/O:1
OBJ:STRNG2/O:1
OBJ:STRNG3/O:1
OBJ:STRNG4/O:1
OBJ:STRNG5/O:1
OBJ:STRNG6/O:1
OBJ:STRNG7/O:1
OBJ:STRNG8/O:1
OBJ:STRNG9/O:1
OBJ:STRN10/O:1
OBJ:STRN11/O:1
OBJ:STRN12/O:1
OBJ:STRN13/O:1
OBJ:STRN14/O:1
//
^C
DEL OBJ:STRNG1.OBJ
DEL OBJ:STRNG2.OBJ
DEL OBJ:STRNG3.OBJ
DEL OBJ:STRNG4.OBJ
DEL OBJ:STRNG5.OBJ
DEL OBJ:STRNG6.OBJ
DEL OBJ:STRNG7.OBJ
DEL OBJ:STRNG8.OBJ
DEL OBJ:STRNG9.OBJ
DEL OBJ:STRN10.OBJ
DEL OBJ:STRN11.OBJ
DEL OBJ:STRN12.OBJ
DEL OBJ:STRN13.OBJ
DEL OBJ:STRN14.OBJ