Google
 

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
505	"Z.;* x. ; #p, @ZB[B < #p, @ZB < #p	(Q,[BZ`,>,>/Z.3$+=4N0,><>Z/Z/4	 PT$p.6?4?/&.,^4R042A5n,>B,>,/B,^,^	 A(PT=bT=r+2,>C,>,/B   *,>B,>,	( "/B,>,><C:?1Z+D4.1Z+Fz?,^,^,>,><>	(@(*:?1Z+Ht.1Z+Jz?,^,^=r",^,^T=b1,>	  3,>,>pZ<,>,>L <,/M,^O+:+N+O/B@+	 U;.p.p.p8,>=+0<<9,>@+>+@0	 T(
D& <Cz?=%&|?=(& <>z?=,&|?=.(QLL 9,>M+,>M+	_f.i3l-O	O	]JBa@5$n1@TE_	"bD<@CnU`YgbW
=j`MO$
3`+]?N	+]A+]ASM5x:7,m7,m7-)1`)uC!5=/5=105=9"	D"5=>5=a85=a95=e95?s255G:
`7?A	eMPv
68.Vro:-sJ_XYYriq( P 2OF
2OF02OF  !pQ A`7#p,7Ap+2cp+Qp,~,>+	D i2O=;
2OF

2OF3l-Cn$`.O.

.
0.
 -" 0"pQ`X2p 'pQ&A` ($	p 
+	@
.


.
i3l-O	bE$3bKMp!U$1(  MHMH0MH	 ,>,> p#p<`$&.p4B`=b 7!p+ p p	*D <`
$&.p4B
`=b T,^,^,~0O(BbTG(+	"i5$n1@
MH
MH`Yg	wb-wb-
$@11(  M.
M.0M.	,>,>,>#p,@ZB#p,@[`3",>,>	",>pZ<,>,> <,/,^4nB=n
M.
	
M.$1eMPv
VrosJ_riq(  j>
j>0j> -" 0"2X2p+	"iieG
j>

j>bE#tbE$3U$ DH6
DH60DH6 -"@"pQ`X2p+	D"i
DH6

DH6bE#tbE$3U$ HY\
HY\0HY\	 -" pG0"p4R 
 #p, @ZB p.Q`X2p.2`+.p D"p@  #p, @ZB+.p	i3l-O	TE_bD<@
bE#tbE$3%eHYH/	@
HY\

HY\U$Xriq( 
KNb0KNb	4-".p"pQ`X2pd##p,*@ZB[B52%`P `P+'	 E]`P++`P+	( @
+ ,>,>,>pZ<,>,>/ <,//,^ +/4D4$ 4	"A"T=d"+.p,>$++$ ,>&,>,/&  
(@*+	#O-pQ,I+l-O	O	TEbD<@
bE#Go$	@
E#tbE$3CnHYH/KOe%pCQ	KMn\
KMp!	D"KN	GKN;bKNF3
KNb
	
KNbU$.?`0)w%;'	(eMPv
VrosJ_Xriq( 0 Kj
KjKjf(O1dr"X"[|SB0Kj	 Q"E
-"+8++;0x+; p < #p, @ZB < #p	(", @ZB@`P p3H+=OaP2x+`P+-3h+*	 *" "4h @. .2T+`'3 +. 4C`*`P+`*	"U*"`P+`. 47. 2T+`'3 +$+`*+7+9+1+3+1+3	*UU(*+9+7+9+9+7+72h "+7+9+5+6+5+64b4*+4	(*35b4*3t+7+95b9+74"9+7aP@7O+7,>: ;+.p.p@+	i3l-O	O	TEbD<@Cn	D"`-s;Kj=Y*Kj=e7%n,1Kj=|5Kj=4%n/3Kj>c6Kj>f 	D"Kj?.Kj?
-Kj?s9EhEiKi) Kj
Kj
	
Kj		"
Kj	P?Y$bOT,3bW
_j

f	Vjs(O1dr	$
"X
"[|=Rw[.?r-'	
SB01`7"9:-XY^~kmXOriq( > mm\,
m\,0m\,	 ",>,>,>,>  #p, @ZB[B,>,>,/Z4h,>	"D@ ,><:1Z+4.1Z+z,^,^1T=hX,^,^ 
,^,^,~.p0<&<z=&|=bD<@	 $
riq(  ./d./d0./d -"-:,>,>,>p,>Z<,> <,/,^+ 	D"i
./d
./db3kf
cc,3$1`7"Vro:-sJ(  d d 0d  @-"-:,>,>,>pZ<,> <,/,^+	@"
d 
dicc,3$`7"e5
&
Vro:-sJ(r0y0y00y -"-:,>,>,>pZ<,>,> <,/,^+ 	Dicc,3$
0y0y(  )0)00)0	  -"-:@7Ap+!,>,>,>p,>$Z<,> <,/%,^ %p @	 @ B7Ap+%,>,>,>pZ<,> <,/(,^ %p @ B5T,>	 ,>,>pZ<,>,>$ <,/%,^+44,>,>,>p,>$Z<,>	"D" <,/%,^+,>,>,>pZ<,>,>) <,/%,^+ p Q"`d `dP+9	$  p`d `dP+
=(	D"7E	7E7F7F
)0
)0ib3kf
	@cc,3$1@`7"!e5
&
:-sJfN\
( ) ???0?	"Z."* x. pd 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".pEbD<@CnbW
_jlMelO)lOs	D"t	
t	kEG!`7+???$`7"!`79+'`)uC5^8.`9v&:-riq( 1 .0J
.0J0.0J -"-:,>,>,>p,>Z<,> <,/,^+ 	D"i
.0J

.0Jb3kf
cscs,3$1`7"Vro:-sJ(  e
e0e -"-:/".,>,>,>pZ<,> <,/,^+	@"
e

eicscs,3$`7"e5
&
Vro:-sJ_(  0yh
0yh00yh-"-:,>,>,>,>pZ<,>Z<,>f<,/,^+(	Dicscs,3$
0yh
0yh(  *
*0*	  -" 8p-:@ 7Ap+%,>,>,>p,>(Z<,> <,/(,^	  %p @ B 
/,.
7Ap+),>,>,>pZ<,> <,/+,^	  %p @ B5T,>,>,>,>pZ<,>Z<,> <,/,,^+	(D44,>,>,>p,>(Z<,> <,/(,^+,>,>,>pZ<,>	(QQ",>- <,/(,^+ p`d `dP+9
'  p`d `dP**+
=(,	D":
:::
*

*ib3kf
#	DS	cscs,3$11`7"$e5
&
Vro:-sJ_fN\
( - ?f
?f?fs0?f	"
Z.,* x. pdZ8p - #p, @ZB[BhP+.+4`P	(@ T+6O529QdX$xP/9/
5l;4L(+,/(*X<	"" #`,,>Z`<"<+>2TH+3(H+?aP+A7jH+  H	 Q2T+=j+4.2*r8,+(Y`58CY`J..	 @"../D. :H`P+h`P.H`P+D+Y`...	( */D@@+(.p 
3.8+ , .aP 9"`9	+,>7++8(,>:+	(P(;+:.`,>,>+,>,>+`P++(#3`H++ +! DY`/ "H+,	4&Bi3l-O	TE_QMbD<@	 S	CnUbW
_j})G` 7;@/@a+@e(	D"@e@e!@s 8
 8
H 8
H?9I	D ?f
?f?fs$	.?AKE`0)w825^`9v0:-XY;Wxriq6m( F "R
"R0"R(  #p,Z@,~.p	 i3l-TEbD<@$
"R

"R1riq(  N\
N\0N\	",> 	 #p,[BZ`3#p,,>
,?p,/
7#p,3$,Q,^,~.p	 i3l-TEbD<@Cn`M$
N\(  3kf
3kf03kf	"",> 
 #p,[BZ`."3#p,/",>
,?p,/
Zp,/p3$,4"	"i3l-P

3kf

3kfTEbD<@Cn`M	`7 5
&
5
&05
&",>#p,[B,>,?p,/Q,^,~.p	 i3l-TEbD<@$
&

&riq(  MPv
MPv0MPv	"(U*,>  #p. ++
++,+,,,++,,	*P+
+
,+6%pXD6%pQD[w1D~++Q"A`7#p+ $	( ,>,>,/@D+6%pXD6%pQD+@@,^,~.p P0 pd+	i3l-TE$
MQ'q
x76MPG
rIriq(  c*"
c*"cCT
cCTcY
cYkwj
kwjl:
l:0c*"	""@-:`xaX++@-:J.GXP=b+@-:	Q(E.AXP=b+O-:-:+O-:J-:+,>,>,> 7p	 @"Lp4"h  #p,Z`4b+h/AXX*v+h/GXX*v+h,^ ,^,^@@,~-:/6@J+.p	i13l-TEbD<@$


cCT
D"

cY
kwj

riq(  LCz
LCz0LCz	"
Z.#* x. p paP+ # #p, @ZBZ#
	 A
 ..,>5L/7!p+'`P+,4H .`P .N=h,^N=d	*A+" 1 #p, @ZB@
@O4h1T=h1T=h0T+	"O<h$
041rWh@.,Wh=h7 "`6 `P Mp+@+"	"D"O+ .p!,>$++$,>9 .<(%aPaP+&N+" ** ,>,>,>pZ<,>,>+ <,/+,^+.p	>d*i+3l-O	O	TE_	"bD<@CnULD)e!LD+s"LC!G"
LCz

LCzbW
=j	3$?Y9*#EE
F	@]Ok]Qs`7""17	"eMPv
/S`VroVr-VrwVSMssJ_XYl{*riqF#( 2 8RN
8RN08RN	"DZ.#* x. $ #p, @ZB $ #p, @ZB[B p p	 @(A $`P+
d&`d,``P+%+'3*+* `P+.T=d	(+@aPOZp[p@34O2tO3B.T=d/	*
5h 4H",>,>,>pZ<,>,>+ <,/,,^+"D=h +"@	(@
"+#O+.p.p 2l&`l,@+
"2l&@l,`@+
!,>) @*++ 	i3l-O	O	TE_bD<@Cn	@UbW
=j$+]?*+]A+]A(pg8R}%	D"8R}08R}e!8R~$8R
8R- 8Rs"8S
8QuG#
8RN
	
8RN.?1`7"#	eMPv
VrosJXYS%?l{*mqygriq)"g`
5j05j	"Z.$* x. $ #p, @ZB[B6Ap+,>%,>,/% 
	 

Z(N46V,>,><&:&1Z+'t.1Z+)z&,^	"D@",^=n	/S.+*<,~ + #p, @ZB ,>%,>,/%	"" 3*+,,>,><&:&1Z+-t.1Z+0z&,^,^=n	(("+@@+.p0<& <&z&=&|&(Q *=.p",>,+& <&z&=&|&= 	_f.i3l-O	O	]JBa@5$n1@TE_	@ bD<@CnbW
=j$?-+]A+]A		7:a*.JD5G
8.:-Yriq( 1 79+)uC05gDH	 ":**,>/6Zh/`x, XhZh/`x, Xh8&`".Vh4x
`h=x	,^**,~4X
,6.X+	0h	)f.3l-5$n1FCn`Yg$
)u?
)uC`9^O:-XY`=ds(  D<@0D<@H	(T*U*. ++	++,+,,,++,,+	+	,	(+  abl",~ Q A` abl",~,>Q"A`,>@"6@9\,^,^,~ Q A` ,~ Q A` ,~P(	3l-
D<@$`B.A`D"VaHPgPjVa#q	PvVa$qrI(  7"07"H @/S.*<,~@ibW
=j$(  E#GoE$30E$3H"Z.* x.+@@+D
E#Go
E$3bW
=j$1`7"(  ,30,3H"Z.* x. 0 7p p+	 i1bW
=j,3$?5^(  s,30s,3H"Z.* x. 8p 0+	 iS	bW
=js,3$E5^(  OT,30OT,3H"Z.* x. p+Di
OT,3bW
=j$?(  ,#0,#H"a~
&@,~%STRLLZ. LENGTH LESS THAN ZERO
D$E;y+]?0+]?H"a~
&X,~%STRLEM. LENGTH EXCEEDS MAXIMUM
D$E;y0)w00)wH"a~
&,~%STRNSS. NO SOURCE STRINGS (COUNT UNDER 1)
@$;y0)w-s0-sH"a~
&,~%STRCIV. CODE INVALID VALUE (NOT 0-5)
-s$ 9v09vH"a~
& . ,~%STRSPE. 2ND POSITION PAST END OF STRING
$G;y9^O09^OH"a~
&,~%STRSLI. 1ST POSITION SUCH THAT STRING LENGTH INCREASED
@$;y  70 7H"a~
&,~%STRFES. 1ST POSITION EXCEEDS SECOND
7$ =ds0=dsH	"a~
&`x@d8,~%STRUOF. UNDER OR OVERFLOW OF (UBS) LENGTH OR MAXIMUM
@$	 .O0.OH"a~
&Q`,~%STRMLI. MAXIMUM AND LENGTH INCONSISTENT
@I$;y.O7?07?H"a~
&,~%STRRPU.;REPLACEMENTUNSUCCESSFUL:@$"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
Yg0YfH	 		  D YgM`ffM`g"M`h	$
_j0=H h
W
=j$