|
|
1.1 ! root 1: \File{grind5a\-3.c},{16:46},{Oct 14 1989} ! 2: \L{\LB{...}} ! 3: \L{\LB{}} ! 4: \L{\LB{\Proc{while} \K{while} (fgets (buffer, \K{sizeof} buffer, stdin)) \{}} ! 5: \L{\LB{}\Tab{8}{\K{register} PE = oct2prim (buffer, strlen (buffer) + 1);}} ! 6: \L{\LB{}} ! 7: \L{\LB{}\Tab{8}{\K{if} (PDataRequest (sd, \&pe, 1, pi) == NOTOK)}} ! 8: \L{\LB{}\Tab{8}{ error (\S{}\"P\-DATA.REQUEST: \%s\"\SE{}, PErrString (pa \-\> pa\_reason));}} ! 9: \L{\LB{}} ! 10: \L{\LB{}\Tab{8}{pe\_free (pe);}} ! 11: \L{\LB{ \}}} ! 12: \L{\LB{}} ! 13: \L{\LB{\Proc{if} \K{if} (PRelRequest (sd, NULLPEP, 0, NOTOK, pr, pi) == NOTOK)}} ! 14: \L{\LB{}\Tab{8}{error (\S{}\"P\-RELEASE.REQUEST: \%s\"\SE{}, PErrString (pa \-\> pa\_reason));}} ! 15: \L{\LB{}} ! 16: \L{\LB{\Proc{if} \K{if} (!pr \-\> pr\_affirmative) \{}} ! 17: \L{\LB{}\Tab{8}{(\K{void}) PUAbortRequest (sd, NULLPEP, 0, pi);}} ! 18: \L{\LB{}\Tab{8}{error (\S{}\"release rejected by sink\"\SE{});}} ! 19: \L{\LB{ \}}} ! 20: \ProcCont{if}\L{\LB{ PRFREE (pr);}} ! 21: \L{\LB{}} ! 22: \L{\LB{ exit (0);}} ! 23: \L{\LB{\}}}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.