Lines Matching refs:data

48 writeline(Text *data)
50 word n = data->w - data->s;
51 if(sfwrite(sfstdout, data->s, n) != n)
60 sel1(word addr, Text *data)
63 return reexec(readdr(addr), (char*)data->s, data->w - data->s, 0, 0, 0) == 0;
79 selected(unsigned char *pc, Text *data)
89 return neg ^ (sel1(ipc[0], data)==1);
96 switch(sel1(ipc[active], data)) {
141 vv(Text *script, unsigned char *pc, Text *data)
145 data = data;
151 be(Text *script, unsigned char *pc, Text *data)
154 data = data;
159 de(Text *script, unsigned char *pc, Text *data)
163 vacate(data);
168 De(Text *script, unsigned char *pc, Text *data)
171 unsigned char *end = (unsigned char*)ustrchr(data->s, '\n');
173 return de(script, pc, data);
175 n = data->w - end;
176 memmove(data->s, end, n+1);
177 data->w = data->s + n;
182 Ee(Text *script, unsigned char *pc, Text *data)
185 data = data;
192 Ge(Text *script, unsigned char *pc, Text *data)
197 *data->w++ = '\n';
198 tcopy(&hold, data);
203 ge(Text *script, unsigned char *pc, Text *data)
205 vacate(data);
209 if(data->w > data->s)
210 *data->w++ = '\n';
211 tcopy(&hold, data);
216 He(Text *script, unsigned char *pc, Text *data)
221 tcopy(data, &hold);
226 he(Text *script, unsigned char *pc, Text *data)
230 tcopy(data, &hold);
235 Ie(Text *script, unsigned char *pc, Text *data)
238 data = data;
243 ie(Text *script, unsigned char *pc, Text *data)
246 data = data;
253 Le(Text *script, unsigned char *pc, Text *data)
256 data = data;
261 Ne(Text *script, unsigned char *pc, Text *data)
263 assure(data, 1);
264 *data->w++ = '\n';
265 if(readline(data))
267 *--data->w = 0;
268 return de(script, pc, data);
272 ne(Text *script, unsigned char *pc, Text *data)
276 writeline(data);
277 vacate(data);
278 if(readline(data))
284 Pe(Text *script, unsigned char *pc, Text *data)
287 unsigned char *end = ustrchr(data->s, '\n');
289 n = data->w - data->s;
291 n = end - data->s;
292 if(sfwrite(sfstdout, data->s, n) != n)
300 pe(Text *script, unsigned char *pc, Text *data)
302 writeline(data);
308 qe(Text *script, unsigned char *pc, Text *data)
311 data = data;
317 te(Text *script, unsigned char *pc, Text *data)
322 return be(script, pc, data);
328 ww(Text *script, unsigned char *pc, Text *data, word offset)
332 word n = data->w - data->s;
333 assure(data, 1);
334 *data->w = '\n';
335 if(sfwrite(f, data->s, n+1) != n+1 ||
338 *data->w = 0;
344 we(Text *script, unsigned char *pc, Text *data)
346 return ww(script, pc, data, instr(pc)[1]);
350 xe(Text *script, unsigned char *pc, Text *data)
356 exch(data->s, hold.s, t);
357 exch(data->e, hold.e, t);
358 exch(data->w, hold.w, t);
363 ye(Text *script, unsigned char *pc, Text *data)
365 unsigned char *s = (unsigned char*)data->s;
366 unsigned char *w = (unsigned char*)data->w;
389 assure(data, x);
390 memcpy(data->s, sfstrbase(f), x);
391 data->w = data->s + x;
403 se(Text *script, unsigned char *pc, Text *data)
408 sflag = substitute(readdr(q[1]), data);
412 pe(script, pc, data);
414 return ww(script, pc, data, ((word*)nexti(pc))[-1]);
433 le(Text *script, unsigned char *pc, Text *data)
444 for(s=data->s; s<data->w; s++) {
482 ae(Text *script, unsigned char *pc, Text *data)
485 data = data;
493 ce(Text *script, unsigned char *pc, Text *data)
497 return de(script, pc, data);
546 execute(Text *script, Text *data)
551 sel = selected(pc, data);
556 pc = (*excom[ccmapchr(map,cmd)])(script, pc, data);
563 writeline(data);