htext 10859 src/simh/scp.c UNIT *uptr, const char *htext, va_list ap) htext 10880 src/simh/scp.c astrings[asnum++] = (char *) htext; htext 10882 src/simh/scp.c for (hblock = astrings; (htext = *hblock) != NULL; hblock++) { htext 10885 src/simh/scp.c while (*htext) { htext 10889 src/simh/scp.c if (sim_isspace (*htext) || *htext == '+') {/* Topic text, indented topic text */ htext 10891 src/simh/scp.c while (*htext && *htext != '\n') htext 10892 src/simh/scp.c htext++; htext 10893 src/simh/scp.c if (*htext) htext 10894 src/simh/scp.c ++htext; htext 10899 src/simh/scp.c if (*htext == '+') { /* More for each + */ htext 10900 src/simh/scp.c while (*htext == '+') { htext 10903 src/simh/scp.c htext++; htext 10906 src/simh/scp.c while (*htext && *htext != '\n' && sim_isspace (*htext)) htext 10907 src/simh/scp.c htext++; htext 10908 src/simh/scp.c if (!*htext) /* Empty after removing leading spaces */ htext 10910 src/simh/scp.c start = htext; htext 10911 src/simh/scp.c while (*htext) { /* Process line for substitutions */ htext 10912 src/simh/scp.c if (*htext == '%') { htext 10913 src/simh/scp.c appendText (topic, start, htext - start); /* Flush up to escape */ htext 10914 src/simh/scp.c switch (*++htext) { /* Evaluate escape */ htext 10937 src/simh/scp.c if (sim_isdigit (*htext)) { htext 10939 src/simh/scp.c while (sim_isdigit (*htext)) htext 10940 src/simh/scp.c n += (n * 10) + (*htext++ - '0'); htext 10941 src/simh/scp.c if (( *htext != 'H' && *htext != 's') || htext 10944 src/simh/scp.c FAIL (SCPE_ARG, Invalid escape, htext); htext 10950 src/simh/scp.c if (*htext == 'H') { /* Append as more input */ htext 10953 src/simh/scp.c FAIL (SCPE_ARG, Too many blocks, htext); htext 10978 src/simh/scp.c FAIL (SCPE_ARG, Invalid escape, htext); htext 10981 src/simh/scp.c start = ++htext; htext 10984 src/simh/scp.c if (*htext == '\n') { /* End of line, append last segment */ htext 10985 src/simh/scp.c htext++; htext 10986 src/simh/scp.c appendText (topic, start, htext - start); htext 10989 src/simh/scp.c htext++; /* Regular character */ htext 10993 src/simh/scp.c if (sim_isdigit (*htext)) { /* Topic heading */ htext 10999 src/simh/scp.c start = htext; htext 11000 src/simh/scp.c while (sim_isdigit (*htext)) htext 11001 src/simh/scp.c n += (n * 10) + (*htext++ - '0'); htext 11002 src/simh/scp.c if ((htext == start) || !n) { htext 11004 src/simh/scp.c FAIL (SCPE_ARG, Invalid topic heading, htext); htext 11014 src/simh/scp.c FAIL (SCPE_ARG, Level not contiguous, htext); /* E.g. 1 3, not reasonable */ htext 11018 src/simh/scp.c while (*htext && (*htext != '\n') && sim_isspace (*htext)) htext 11019 src/simh/scp.c htext++; htext 11020 src/simh/scp.c if (!*htext || (*htext == '\n')) { /* Name missing */ htext 11022 src/simh/scp.c FAIL (SCPE_ARG, Missing topic name, htext); htext 11025 src/simh/scp.c start = htext; htext 11026 src/simh/scp.c while (*htext && (*htext != '\n')) htext 11027 src/simh/scp.c htext++; htext 11028 src/simh/scp.c if (start == htext) { /* Name NULL */ htext 11030 src/simh/scp.c FAIL (SCPE_ARG, Null topic name, htext); htext 11049 src/simh/scp.c if (*htext) htext 11050 src/simh/scp.c htext++; htext 11060 src/simh/scp.c size_t len = (htext > start) ? (htext - start) : 0; htext 11068 src/simh/scp.c memcpy (newt->title, start, htext - start); htext 11069 src/simh/scp.c newt->title[htext - start] = '\0'; htext 11070 src/simh/scp.c if (*htext) htext 11071 src/simh/scp.c htext++; htext 11107 src/simh/scp.c if (*htext == ';') { /* Comment */ htext 11108 src/simh/scp.c while (*htext && *htext != '\n') htext 11109 src/simh/scp.c htext++; htext 11113 src/simh/scp.c FAIL (SCPE_ARG, Unknown line type, htext); /* Unknown line */