Lines Matching refs:tos
286 string_type *tos; variable
322 if (tos < stack) in check_range()
324 if (tos >= stack + STACK) in check_range()
395 if (tos->write_idx) in remchar()
396 tos->write_idx--; in remchar()
403 while ((isspace ((unsigned char) at (tos, tos->write_idx - 1)) in strip_trailing_newlines()
404 || at (tos, tos->write_idx - 1) == '\n') in strip_trailing_newlines()
405 && tos->write_idx > 0) in strip_trailing_newlines()
406 tos->write_idx--; in strip_trailing_newlines()
423 tos++; in push_text()
425 init_string (tos); in push_text()
427 cattext (tos, *((char **) pc)); in push_text()
493 (long) (tos - stack)); in print_stack_level()
521 || find (tos, "PARAMS") || find (tos, "PROTO") || !find (tos, "(")) in paramstuff()
523 catstr (&out, tos); in paramstuff()
528 for (openp = 0; at (tos, openp) != '(' && at (tos, openp); openp++) in paramstuff()
534 while (fname && isspace ((unsigned char) at (tos, fname))) in paramstuff()
537 && !isspace ((unsigned char) at (tos,fname)) in paramstuff()
538 && at (tos,fname) != '*') in paramstuff()
547 if (!isspace ((unsigned char) at (tos, len - 1))) in paramstuff()
551 catchar (&out, at (tos, idx)); in paramstuff()
559 if (!isspace ((unsigned char) at (tos, len - 1))) in paramstuff()
563 catchar (&out, at (tos, idx)); in paramstuff()
567 for (idx = openp; at (tos, idx) && at (tos, idx) != ';'; idx++) in paramstuff()
568 catchar (&out, at (tos, idx)); in paramstuff()
572 overwrite_string (tos, &out); in paramstuff()
587 while (at (tos, idx)) in translatecomments()
589 if (at (tos, idx) == '{' && at (tos, idx + 1) == '*') in translatecomments()
594 else if (at (tos, idx) == '*' && at (tos, idx + 1) == '}') in translatecomments()
601 catchar (&out, at (tos, idx)); in translatecomments()
606 overwrite_string (tos, &out); in translatecomments()
619 while (at (tos, idx)) in outputdots()
622 if (at (tos, idx) == '.') in outputdots()
628 while ((c = at (tos, idx)) && c != '\n') in outputdots()
630 if (c == '{' && at (tos, idx + 1) == '*') in outputdots()
635 else if (c == '*' && at (tos, idx + 1) == '}') in outputdots()
652 idx = skip_past_newline_1 (tos, idx); in outputdots()
656 overwrite_string (tos, &out); in outputdots()
670 while (at (tos, idx)) in courierize()
672 if (at (tos, idx) == '\n' in courierize()
673 && (at (tos, idx +1 ) == '.' in courierize()
674 || at (tos, idx + 1) == '|')) in courierize()
681 while (at (tos, idx) && at (tos, idx) != '\n') in courierize()
687 if (at (tos, idx) == '{') in courierize()
689 else if (at (tos, idx) == '}') in courierize()
694 if (at (tos, idx) == '{') in courierize()
696 else if (!islower ((unsigned char) at (tos, idx))) in courierize()
699 else if (at (tos, idx) == '@' in courierize()
700 && islower ((unsigned char) at (tos, idx + 1))) in courierize()
704 else if (at (tos, idx) == '{' && at (tos, idx + 1) == '*') in courierize()
710 else if (at (tos, idx) == '*' && at (tos, idx + 1) == '}') in courierize()
716 else if (at (tos, idx) == '{' in courierize()
717 || at (tos, idx) == '}') in courierize()
722 catchar (&out, at (tos, idx)); in courierize()
727 while (at (tos, idx) == '\n' in courierize()
728 && ((at (tos, idx + 1) == '.') in courierize()
729 || (at (tos, idx + 1) == '|'))) in courierize()
735 catchar (&out, at (tos, idx)); in courierize()
740 overwrite_string (tos, &out); in courierize()
756 while (at (tos, idx)) in bulletize()
758 if (at (tos, idx) == '@' in bulletize()
759 && at (tos, idx + 1) == '*') in bulletize()
764 else if (at (tos, idx) == '\n' in bulletize()
765 && at (tos, idx + 1) == 'o' in bulletize()
766 && isspace ((unsigned char) at (tos, idx + 2))) in bulletize()
779 catchar (&out, at (tos, idx)); in bulletize()
780 if (on && at (tos, idx) == '\n' in bulletize()
781 && at (tos, idx + 1) == '\n' in bulletize()
782 && at (tos, idx + 2) != 'o') in bulletize()
796 delete_string (tos); in bulletize()
797 *tos = out; in bulletize()
809 while (at (tos, idx)) in do_fancy_stuff()
811 if (at (tos, idx) == '<' in do_fancy_stuff()
812 && at (tos, idx + 1) == '<' in do_fancy_stuff()
813 && !isspace ((unsigned char) at (tos, idx + 2))) in do_fancy_stuff()
818 while (at (tos, idx) in do_fancy_stuff()
819 && at (tos, idx) != '>' ) in do_fancy_stuff()
821 catchar (&out, at (tos, idx)); in do_fancy_stuff()
830 catchar (&out, at (tos, idx)); in do_fancy_stuff()
834 delete_string (tos); in do_fancy_stuff()
835 *tos = out; in do_fancy_stuff()
903 tos++; in icopy_past_newline()
905 init_string (tos); in icopy_past_newline()
906 idx = copy_past_newline (ptr, idx, tos); in icopy_past_newline()
925 while (at (tos, idx) == '\n') in kill_bogus_lines()
933 if (at (tos, idx) == '.') in kill_bogus_lines()
937 while (at (tos, idx)) in kill_bogus_lines()
945 while (idx && isspace ((unsigned char) at (tos, idx))) in kill_bogus_lines()
955 if (at (tos, c) == '\n' in kill_bogus_lines()
956 && at (tos, c + 1) == '\n' in kill_bogus_lines()
957 && at (tos, c + 2) == '.') in kill_bogus_lines()
962 else if (at (tos, c) == '.' && sl) in kill_bogus_lines()
967 else if (at (tos, c) == '\n' in kill_bogus_lines()
968 && at (tos, c + 1) == '\n' in kill_bogus_lines()
975 catchar (&out, at (tos, c)); in kill_bogus_lines()
976 if (at (tos, c) == '\n') in kill_bogus_lines()
995 delete_string (tos); in kill_bogus_lines()
996 *tos = out; in kill_bogus_lines()
1008 while (at (tos, idx)) in indent()
1010 switch (at (tos, idx)) in indent()
1015 if (tab && at (tos, idx)) in indent()
1037 catchar (&out, at (tos, idx)); in indent()
1046 delete_string (tos); in indent()
1047 *tos = out; in indent()
1054 tos++; in get_stuff_in_command()
1056 init_string (tos); in get_stuff_in_command()
1062 idx = copy_past_newline (ptr, idx, tos); in get_stuff_in_command()
1072 t = tos[0]; in swap()
1073 tos[0] = tos[-1]; in swap()
1074 tos[-1] = t; in swap()
1081 tos++; in other_dup()
1083 init_string (tos); in other_dup()
1084 catstr (tos, tos - 1); in other_dup()
1091 tos--; in drop()
1093 delete_string (tos + 1); in drop()
1108 tos--; in icatstr()
1110 catstr (tos, tos + 1); in icatstr()
1111 delete_string (tos + 1); in icatstr()
1136 catstr (tos - 1, tos); in maybecatstr()
1138 delete_string (tos); in maybecatstr()
1139 tos--; in maybecatstr()
1281 tos = stack; in perform()
1483 write_buffer (tos, stdout); in print()
1485 write_buffer (tos, stderr); in print()
1489 tos--; in print()
1543 tos = stack + 1;
1623 if (tos != stack)
1626 (long) (tos - stack));