Lines Matching refs:tos
284 string_type *tos; variable
320 if (tos < stack) in check_range()
322 if (tos >= stack + STACK) in check_range()
393 if (tos->write_idx) in remchar()
394 tos->write_idx--; in remchar()
401 while ((isspace ((unsigned char) at (tos, tos->write_idx - 1)) in strip_trailing_newlines()
402 || at (tos, tos->write_idx - 1) == '\n') in strip_trailing_newlines()
403 && tos->write_idx > 0) in strip_trailing_newlines()
404 tos->write_idx--; in strip_trailing_newlines()
421 tos++; in push_text()
423 init_string (tos); in push_text()
425 cattext (tos, *((char **) pc)); in push_text()
491 (long) (tos - stack)); in print_stack_level()
519 || find (tos, "PARAMS") || find (tos, "PROTO") || !find (tos, "(")) in paramstuff()
521 catstr (&out, tos); in paramstuff()
526 for (openp = 0; at (tos, openp) != '(' && at (tos, openp); openp++) in paramstuff()
532 while (fname && isspace ((unsigned char) at (tos, fname))) in paramstuff()
535 && !isspace ((unsigned char) at (tos,fname)) in paramstuff()
536 && at (tos,fname) != '*') in paramstuff()
545 if (!isspace ((unsigned char) at (tos, len - 1))) in paramstuff()
549 catchar (&out, at (tos, idx)); in paramstuff()
557 if (!isspace ((unsigned char) at (tos, len - 1))) in paramstuff()
561 catchar (&out, at (tos, idx)); in paramstuff()
565 for (idx = openp; at (tos, idx) && at (tos, idx) != ';'; idx++) in paramstuff()
566 catchar (&out, at (tos, idx)); in paramstuff()
570 overwrite_string (tos, &out); in paramstuff()
585 while (at (tos, idx)) in translatecomments()
587 if (at (tos, idx) == '{' && at (tos, idx + 1) == '*') in translatecomments()
592 else if (at (tos, idx) == '*' && at (tos, idx + 1) == '}') in translatecomments()
599 catchar (&out, at (tos, idx)); in translatecomments()
604 overwrite_string (tos, &out); in translatecomments()
617 while (at (tos, idx)) in outputdots()
620 if (at (tos, idx) == '.') in outputdots()
626 while ((c = at (tos, idx)) && c != '\n') in outputdots()
628 if (c == '{' && at (tos, idx + 1) == '*') in outputdots()
633 else if (c == '*' && at (tos, idx + 1) == '}') in outputdots()
650 idx = skip_past_newline_1 (tos, idx); in outputdots()
654 overwrite_string (tos, &out); in outputdots()
668 while (at (tos, idx)) in courierize()
670 if (at (tos, idx) == '\n' in courierize()
671 && (at (tos, idx +1 ) == '.' in courierize()
672 || at (tos, idx + 1) == '|')) in courierize()
679 while (at (tos, idx) && at (tos, idx) != '\n') in courierize()
685 if (at (tos, idx) == '{') in courierize()
687 else if (at (tos, idx) == '}') in courierize()
692 if (at (tos, idx) == '{') in courierize()
694 else if (!islower ((unsigned char) at (tos, idx))) in courierize()
697 else if (at (tos, idx) == '@' in courierize()
698 && islower ((unsigned char) at (tos, idx + 1))) in courierize()
702 else if (at (tos, idx) == '{' && at (tos, idx + 1) == '*') in courierize()
708 else if (at (tos, idx) == '*' && at (tos, idx + 1) == '}') in courierize()
714 else if (at (tos, idx) == '{' in courierize()
715 || at (tos, idx) == '}') in courierize()
720 catchar (&out, at (tos, idx)); in courierize()
725 while (at (tos, idx) == '\n' in courierize()
726 && ((at (tos, idx + 1) == '.') in courierize()
727 || (at (tos, idx + 1) == '|'))) in courierize()
733 catchar (&out, at (tos, idx)); in courierize()
738 overwrite_string (tos, &out); in courierize()
754 while (at (tos, idx)) in bulletize()
756 if (at (tos, idx) == '@' in bulletize()
757 && at (tos, idx + 1) == '*') in bulletize()
762 else if (at (tos, idx) == '\n' in bulletize()
763 && at (tos, idx + 1) == 'o' in bulletize()
764 && isspace ((unsigned char) at (tos, idx + 2))) in bulletize()
777 catchar (&out, at (tos, idx)); in bulletize()
778 if (on && at (tos, idx) == '\n' in bulletize()
779 && at (tos, idx + 1) == '\n' in bulletize()
780 && at (tos, idx + 2) != 'o') in bulletize()
794 delete_string (tos); in bulletize()
795 *tos = out; in bulletize()
807 while (at (tos, idx)) in do_fancy_stuff()
809 if (at (tos, idx) == '<' in do_fancy_stuff()
810 && at (tos, idx + 1) == '<' in do_fancy_stuff()
811 && !isspace ((unsigned char) at (tos, idx + 2))) in do_fancy_stuff()
816 while (at (tos, idx) in do_fancy_stuff()
817 && at (tos, idx) != '>' ) in do_fancy_stuff()
819 catchar (&out, at (tos, idx)); in do_fancy_stuff()
828 catchar (&out, at (tos, idx)); in do_fancy_stuff()
832 delete_string (tos); in do_fancy_stuff()
833 *tos = out; in do_fancy_stuff()
901 tos++; in icopy_past_newline()
903 init_string (tos); in icopy_past_newline()
904 idx = copy_past_newline (ptr, idx, tos); in icopy_past_newline()
923 while (at (tos, idx) == '\n') in kill_bogus_lines()
931 if (at (tos, idx) == '.') in kill_bogus_lines()
935 while (at (tos, idx)) in kill_bogus_lines()
943 while (idx && isspace ((unsigned char) at (tos, idx))) in kill_bogus_lines()
953 if (at (tos, c) == '\n' in kill_bogus_lines()
954 && at (tos, c + 1) == '\n' in kill_bogus_lines()
955 && at (tos, c + 2) == '.') in kill_bogus_lines()
960 else if (at (tos, c) == '.' && sl) in kill_bogus_lines()
965 else if (at (tos, c) == '\n' in kill_bogus_lines()
966 && at (tos, c + 1) == '\n' in kill_bogus_lines()
973 catchar (&out, at (tos, c)); in kill_bogus_lines()
974 if (at (tos, c) == '\n') in kill_bogus_lines()
993 delete_string (tos); in kill_bogus_lines()
994 *tos = out; in kill_bogus_lines()
1006 while (at (tos, idx)) in indent()
1008 switch (at (tos, idx)) in indent()
1013 if (tab && at (tos, idx)) in indent()
1035 catchar (&out, at (tos, idx)); in indent()
1044 delete_string (tos); in indent()
1045 *tos = out; in indent()
1052 tos++; in get_stuff_in_command()
1054 init_string (tos); in get_stuff_in_command()
1060 idx = copy_past_newline (ptr, idx, tos); in get_stuff_in_command()
1070 t = tos[0]; in swap()
1071 tos[0] = tos[-1]; in swap()
1072 tos[-1] = t; in swap()
1079 tos++; in other_dup()
1081 init_string (tos); in other_dup()
1082 catstr (tos, tos - 1); in other_dup()
1089 tos--; in drop()
1105 tos--; in icatstr()
1107 catstr (tos, tos + 1); in icatstr()
1108 delete_string (tos + 1); in icatstr()
1133 catstr (tos - 1, tos); in maybecatstr()
1135 delete_string (tos); in maybecatstr()
1136 tos--; in maybecatstr()
1249 tos = stack; in perform()
1442 write_buffer (tos, stdout); in print()
1444 write_buffer (tos, stderr); in print()
1448 tos--; in print()
1502 tos = stack + 1;
1578 if (tos != stack)
1581 (long) (tos - stack));