Trailing-Edge
-
PDP-10 Archives
-
scratch
-
10,7/unscsp/strlib/strlib.rel
There are 9 other files named strlib.rel in the archive. Click here to see a list.
5
5 0 5 " Z . ;* x . ; #p , @ ZB [B < #p , @ ZB < #p ( Q , [B Z` ,> ,> / Z . 3$ + =4N 0,> < >Z / Z /4 PT $p . 6 ?4 ?/ & . ,^ 4R 042 A5n ,> B,> , / B,^ ,^ A(P T =b T =r + 2,> C,> , / B *,> B,> , ( "/ B,> ,> < C: ?1Z + D4 . 1Z + Fz ?,^ ,^ ,> ,> < > (@( *: ?1Z + Ht . 1Z + Jz ?,^ ,^ =r ",^ ,^ T =b 1,> 3,> ,>p Z<,> ,> L <, / M,^ O + :+ N+ O/ B@ + U ;.p .p .p 8,> =+ 0 < < 9,> @+ >+ @ 0 T(
D& < Cz ?= %& | ?= (& < >z ?= ,& | ?= . (Q L L 9,> M+ ,> M+ _f. i 3l- O O ]JB a@5$n1 @TE_ " bD<@ Cn U ` Yg bW
=j ` M O $
3 ` +]? N +]A +]A SM5x : 7,m 7,m 7-) 1`)uC !5=/ 5=1 05=9 " D"5=> 5=a 85=a 95=e 95?s 255G :
` 7? A eMPv
6 8. Vro :- sJ_ X Y Y ri q ( P 2OF
2OF 0 2OF !p Q A`7#p , 7Ap + 2cp + Qp ,~ ,> + D i 2O=;
2OF
2OF 3l- Cn $ ` .O .
.
0 .
-" 0 "p Q` X2p 'p Q&A` ( $ p
+ @
.
.
i 3l- O bE$ 3 bKMp! U $1 ( MHMH 0 MH ,> ,> p #p <` $ & .p 4B ` =b 7!p + p p *D <`
$ & .p 4B
` =b T ,^ ,^ ,~ 0 O (BbT G ( + " i 5$n1 @
MH
MH ` Yg wb- wb-
$ @ 1 1 ( M.
M. 0 M. ,> ,> ,> #p , @ ZB #p , @ [` 3" ,> ,> " ,>p Z<,> ,> <, / ,^ 4n B =n
M.
M. $ 1 eMPv
Vro sJ_ ri q ( j>
j> 0 j> -" 0 "2 X2p + " i ieG
j>
j> bE#t bE$ 3 U $ DH6
DH6 0 DH6 -" @ "p Q` X2p + D" i
DH6
DH6 bE#t bE$ 3 U $ HY\
HY\ 0 HY\ -" p G0 "p 4R
#p , @ ZB p . Q` X2p .2` + .p D "p @ #p , @ ZB + .p i 3l- O TE_ bD<@
bE#t bE$ 3 %e HYH/ @
HY\
HY\ U $ X ri q (
KNb 0 KNb 4 -" .p "p Q` X2p d # #p , *@ ZB [B 52 %`P `P + ' E ] `P + +`P + ( @
+ ,> ,> ,>p Z<,> ,> / <, / /,^ + / 4D 4$ 4 "A "T =d "+ .p ,> $+ + $ ,> &,> , / &
( @ *+ # O -p Q,I + l- O O TE bD<@
bE#Go $ @
E#t bE$ 3 Cn HYH/ KOe %p CQ KMn\
KMp! D"KN G KN;b KNF3
KNb
KNb U $ .? ` 0)w %;' ( eMPv
Vro sJ_ X ri q ( 0 Kj
KjKjf(O1dr"X"[|SB 0 Kj Q"E
-" +8 + + ;0x + ; p < #p , @ ZB < #p ( " , @ ZB @ `P p 3H + =O aP 2x + `P + -3h + * * " " 4h @ . . 2T +` '3 + . 4C` *`P +` * " U* "`P +` . 4 7 . 2T +` '3 + $+` *+ 7+ 9+ 1+ 3+ 1+ 3 *UU( *+ 9+ 7+ 9+ 9+ 7+ 72h " + 7+ 9+ 5+ 6+ 5+ 64b 4* + 4 (* 35b 4* 3t + 7+ 95b 9+ 74" 9+ 7aP @ 7 O + 7,> : ;+ .p .p @ + i 3l- O O TE bD<@ Cn D"` -s ;Kj=Y *Kj=e 7%n, 1Kj=| 5Kj= 4%n/ 3Kj>c 6Kj>f D"Kj? .Kj?
-Kj?s 9 Eh Ei Ki) Kj
Kj
Kj "
Kj P? Y $bOT,3 bW
_j
f Vjs (O 1dr $
"X
"[| =Rw[ .? r- '
SB 0 1 ` 7" 9 :- X Y ^~k mXO ri q ( > mm\,
m\, 0 m\, " ,> ,> ,> ,> #p , @ ZB [B ,> ,> , / Z 4h ,> "D@ ,> < : 1Z + 4 . 1Z + z ,^ ,^ 1T =h X ,^ ,^
,^ ,^ ,~ .p 0 < & < z = & | = bD<@ $
ri q ( ./d./d 0 ./d -" -: ,> ,> ,>p ,> Z<,> <, / ,^ + D" i
./d
./d b3kf
c c,3 $ 1 ` 7" Vro :- sJ ( d d 0 d @ -" -: ,> ,> ,>p Z<,> <, / ,^ + @"
d
d i c c,3 $ ` 7" e5
&
Vro :- sJ ( r 0y0y 0 0y -" -: ,> ,> ,>p Z<,> ,> <, / ,^ + D i c c,3 $
0y 0y ( )0)0 0 )0 -" -: @ 7Ap + !,> ,> ,>p ,> $Z<,> <, / %,^ %p @ @ B 7Ap + %,> ,> ,>p Z<,> <, / (,^ %p @ B 5T ,> ,> ,>p Z<,> ,> $ <, / %,^ + 44 ,> ,> ,>p ,> $Z<,> "D " <, / %,^ + ,> ,> ,>p Z<,> ,> ) <, / %,^ + p Q "`d `d P+ 9 $ p `d `d P+
= ( D"7E 7E 7F 7F
)0
)0 i b3kf
@ c c,3 $1 @ ` 7" !e5
&
:- sJ fN\
( ) ? ? ? 0 ? " Z . "* x . p d 7p p " #p , @ ZB [B `P + $+ ) `P . `P + /
5l ,4L . bXP + 8,
+ ,> #,> , / # "@(@( / 4. ,4N /, ,> ,> < ,: -1Z + -4 . 1Z + 0z -,^ ,^ T . bXP + =n + @ @ + !. `P + h `P . / + ] A " .p E bD<@ Cn bW
_j lMe lO) lOs D" t
t kEG !` 7 + ? ? ? $ ` 7" !` 79+ '`)uC 5^ 8. ` 9v & :- ri q ( 1 .0J
.0J 0 .0J -" -: ,> ,> ,>p ,> Z<,> <, / ,^ + D" i
.0J
.0J b3kf
cs cs,3 $ 1 ` 7" Vro :- sJ ( e
e 0 e -" -: /" . ,> ,> ,>p Z<,> <, / ,^ + @"
e
e i cs cs,3 $ ` 7" e5
&
Vro :- sJ_ ( 0yh
0yh 0 0yh -" -: ,> ,> ,> ,>p Z<,> Z<,> f<, / ,^ + ( D i cs cs,3 $
0yh
0yh ( *
* 0 * -" 8p -: @ 7Ap + %,> ,> ,>p ,> (Z<,> <, / (,^ %p @ B
/, .
7Ap + ),> ,> ,>p Z<,> <, / +,^ %p @ B 5T ,> ,> ,> ,>p Z<,> Z<,> <, / ,,^ + (D 44 ,> ,> ,>p ,> (Z<,> <, / (,^ + ,> ,> ,>p Z<,> (Q Q ",> - <, / (,^ + p `d `d P+ 9
' p `d `d P * *+
= ( , D":
: : :
*
* i b3kf
# D S cs cs,3 $1 1 ` 7" $e5
&
Vro :- sJ_ fN\
( - ?f
?f?fs 0 ?f "
Z . ,* x . p d Z8p - #p , @ ZB [B hP + .+ 4`P (@ T + 6O 52 9Qd X$x P / 9 /
5l ;4L (+ , /( *X < "" #` , ,> Z` <" <+ >2TH + 3(H + ?aP + A7jH + H Q 2T + =j + 4 .2 *r 8, + (Y` 58 CY` J . . @ ". . / D. :H `P + h `P . H `P + D+ Y` . . . ( */ D@ @ + ( .p
3.8 + , . aP 9 "` 9 +,> 7+ + 8 (,> :+ (P( ;+ :.` ,> ,> + ,> ,> + `P + + (# 3`H + + + ! D Y` / "H + , 4&B i 3l- O TE_ QM bD<@ S Cn U bW
_j })G ` 7 ;@/ @a +@e ( D"@e @e !@s 8
8
H 8
H ?9I D ?f
?f ?f s $ .? AKE ` 0)w 8 25^ ` 9v 0 :- X Y ;Wx ri q 6 m ( F "R
"R 0 "R ( #p , Z @ ,~ .p i 3l- TE bD<@ $
"R
"R 1 ri q ( N\
N\ 0 N\ " ,> #p , [B Z` 3#p , ,>
,?p , /
7#p , 3$ , Q ,^ ,~ .p i 3l- TE bD<@ Cn ` M $
N\ ( 3kf
3kf 0 3kf " " ,>
#p , [B Z` ." 3#p , /" ,>
,?p , /
Zp , /p 3$ , 4" " i 3l- P
3kf
3kf TE bD<@ Cn ` M ` 7 5
&
5
& 0 5
& " ,> #p , [B ,> ,?p , / Q ,^ ,~ .p i 3l- TE bD<@ $
&
& ri q ( MPv
MPv 0 MPv "(U* ,> #p . + +
+ + , + , , , + + , , *P +
+
, + 6%p XD 6%p QD [w1D~+ + Q"A` 7#p + $ ( ,> ,> , / @ D + 6%p XD6%p QD+ @ @ ,^ ,~ .p P 0 p d + i 3l- TE $
MQ'q
x76 MP G
r I ri q ( c*"
c*"cCT
cCTcY
cYkwj
kwjl:
l: 0 c*" "" @ -: `x aX + + @ -: J . GXP =b + @ -: Q(E . AXP =b + O -: -: + O -: J -: + ,> ,> ,> 7p @" Lp 4"h #p , Z` 4b + h / AXX *v + h / GXX *v + h ,^ ,^ ,^ @ @ ,~ -: /6 @J + .p i 1 3l- TE bD<@ $
cCT
D"
cY
kwj
ri q ( LCz
LCz 0 LCz "
Z . #* x . p p aP + # #p , @ ZB Z #
A
.. ,> 5L / 7!p + '`P + ,4H . `P . N =h ,^ N =d * A + " 1 #p , @ ZB @
@ O 4h 1T =h 1T =h 0T + " O <h $
04 1rWh@ .,Wh=h 7 "` 6 `P Mp + @ + " "D "O + .p !,> $+ + $,> 9 . <( %aP aP + &N + " * * ,> ,> ,>p Z<,> ,> + <, / +,^ + .p >d* i + 3l- O O TE_ "bD<@ Cn U LD)e !LD+s "LC!G "
LCz
LCz bW
=j 3 $? Y9*# E E
F @ ] Ok ] Qs ` 7" " 17 "eMPv
/S` Vro Vr- Vr w VSMs sJ_ X Y l {* ri q F# ( 2 8RN
8RN 0 8RN " D Z . #* x . $ #p , @ ZB $ #p , @ ZB [B p p @(A $ `P +
d& `d, ``P + %+ '3* + * `P + . T =d ( + @ aP O Zp [p @ 34 O 2t O 3B . T =d / *
5h 4H ",> ,> ,>p Z<,> ,> + <, / ,,^ + "D =h + "@ ( @
"+ #O + .p .p 2 l& `l, @+
"2 l& @l, `@ +
!,> ) @ *+ + i 3l- O O TE_ bD<@ Cn @ U bW
=j $+]? * +]A +]A (pg 8R}% D"8R}0 8R}e !8R~$ 8R
8R- 8Rs "8S
8QuG #
8RN
8RN .? 1 ` 7" # eMPv
Vro sJ X Y S%? l {* mqyg ri q )"g `
5 j 0 5 j " Z . $* x . $ #p , @ ZB [B 6Ap + ,> %,> , / %
Z (N4 6 V ,> ,> < &: &1Z + 't . 1Z + )z &,^ "D@" ,^ =n / S . +*< ,~ + #p , @ ZB ,> %,> , / % "" 3* + , ,> ,> < &: &1Z + -t . 1Z + 0z &,^ ,^ =n ( ( "+ @ @ + .p 0 < & < &z &= & | & (Q *= .p ",> ,+ & < &z &= & | &= _f. i 3l- O O ]JB a@5$n1 @TE_ @ bD<@ Cn bW
=j $? - +]A +]A 7:a *.J D 5 G
8. :- Y ri q ( 1 79+ )uC 0 5 gD H " : **,> /6 Zh / `x, Xh Zh / `x, Xh 8 &` " .Vh 4x
`h =x ,^ **,~ 4X
, 6 .X + 0h )f. 3l- 5$n1 FCn ` Yg $
)u?
)uC ` 9^O :- X Y ` =ds ( D<@ 0 D<@ H (T*U* . + + + + , + , , , + + , , + + , ( + abl",~ Q A` abl",~ ,> Q"A`,> @ " 6@ 9 \ ,^ ,^ ,~ Q A` ,~ Q A` ,~ P ( 3l-
D<@ $ `B. A` D" Va H Pg Pj Va#q Pv Va$q r I ( 7" 0 7" H @ / S . *< ,~ @ i bW
=j $ ( E#GoE$ 3 0 E$ 3 H " Z . * x . + @ @ + D
E#Go
E$ 3 bW
=j $ 1 ` 7" ( ,3 0 ,3 H " Z . * x . 0 7p p + i 1 bW
=j ,3 $? 5^ ( s,3 0 s,3 H " Z . * x . 8p 0 + i S bW
=j s,3 $E 5^ ( OT,3 0 OT,3 H " Z . * x . p + D i
OT,3 bW
=j $? ( , # 0 , # H " a~
& @ ,~ %STRLLZ. LENGTH LESS THAN ZERO
D $ E ;y +]? 0 +]? H " a~
& X ,~ %STRLEM. LENGTH EXCEEDS MAXIMUM
D $ E ;y 0)w 0 0)w H " a~
& ,~ %STRNSS. NO SOURCE STRINGS (COUNT UNDER 1)
@ $ ;y 0)w -s 0 -s H " a~
& ,~ %STRCIV. CODE INVALID VALUE (NOT 0-5)
-s $ 9v 0 9v H " a~
& . ,~ %STRSPE. 2ND POSITION PAST END OF STRING
$ G ;y 9^O 0 9^O H " a~
& ,~ %STRSLI. 1ST POSITION SUCH THAT STRING LENGTH INCREASED
@ $;y 7 0 7 H " a~
& ,~ %STRFES. 1ST POSITION EXCEEDS SECOND
7 $ =ds 0 =ds H " a~
& `x @ d8,~ %STRUOF. UNDER OR OVERFLOW OF (UBS) LENGTH OR MAXIMUM
@ $ .O 0 .O H " a~
& Q` ,~ %STRMLI. MAXIMUM AND LENGTH INCONSISTENT
@I $;y .O 7? 0 7? H " a~
& ,~ %STRRPU.;REPLACEMENT UNSUCCESSFUL: @ $ " a~
& ,~ %STREPS. END OF SUBSTRING PAST END OF STRING.
M $ %j+ 0 %j+ H " a~
& @ ,~ %STRIDT. STRING ARGUMENT HAS ILLEGAL DATA TYPE - NULL STRING ASSUMED
D $.]I ;y
Yg 0 Yf H D Yg M`ff M`g" M`h $
_j 0 = H h
W
=j $