comparison lib-src/=etags-vmslib.c @ 615:e2b34caa2da8

entered into RCS
author Jim Blandy <jimb@redhat.com>
date Sun, 19 Apr 1992 08:53:01 +0000
parents 72e5cc99eab0
children 4df2f432697b
comparison
equal deleted inserted replaced
614:0085dcbad4bd 615:e2b34caa2da8
133 short retval; 133 short retval;
134 134
135 if (pass1) 135 if (pass1)
136 { 136 {
137 pass1 = NO; 137 pass1 = NO;
138 o.dsc$a_pointer = out; 138 o.dsc$a_pointer = (char *) out;
139 o.dsc$w_length = (short)OUTSIZE; 139 o.dsc$w_length = (short)OUTSIZE;
140 i.dsc$a_pointer = in; 140 i.dsc$a_pointer = in;
141 i.dsc$w_length = (short)strlen(in); 141 i.dsc$w_length = (short)strlen(in);
142 i.dsc$b_dtype = DSC$K_DTYPE_T; 142 i.dsc$b_dtype = DSC$K_DTYPE_T;
143 i.dsc$b_class = DSC$K_CLASS_S; 143 i.dsc$b_class = DSC$K_CLASS_S;