Lines Matching refs:line_in
56 $ read/end=cver_loop_end cver line_in
57 $ line_in = f$edit(line_in, "COMPRESS,TRIM")
58 $ if line_in .eqs. "" then goto cver_loop
59 $ code = f$extract(0, 1, line_in)
61 $ directive = f$element(0, " ", line_in)
63 $ name = f$element(1, " ", line_in)
65 $ ident_string = f$element(2, " ", line_in) - "" - ""
89 $ read/end=vector_loop_end aopt line_in
90 $ line = f$edit(line_in, "UNCOMMENT,COMPRESS,TRIM")
142 $ read/end=alias_loop_end aopt line_in
143 $ line = f$edit(line_in, "UNCOMMENT,COMPRESS,TRIM")