str                69 include/cerr.h void setcerr(int num, const char *str);
str                34 include/cmem.h long str2l_range(const char *str, long min, long max, const char *name);
str                24 include/exec.h CLOCK clock_str2clock(const char *str);
str                75 include/monitor.h MONARGS *monargstok(const char *str);
str               178 include/struct.h WORD memsize_str2word(const char *str);
str                24 include/word.h WORD nh2word(const char *str);
str                30 src/assemble.c WORD getadr(const char *prog, const char *str, PASS pass);
str                44 src/assemble.c WORD grword(const char *str, bool is_x);
str                54 src/assemble.c WORD getliteral(const char *str, PASS pass);
str                72 src/assemble.c void writestr(const char *str, bool literal, PASS pass);
str                80 src/assemble.c void writedc(const char *str, PASS pass);
str               301 src/assemble.c WORD getadr(const char *prog, const char *str, PASS pass)
str               305 src/assemble.c     if(str[0] == '=') {
str               306 src/assemble.c         adr = getliteral(str, pass);
str               307 src/assemble.c     } else if(isdigit(str[0]) || str[0] == '-' || str[0] == '#') {
str               308 src/assemble.c         adr = nh2word(str);
str               311 src/assemble.c             if((adr = getlabel(prog, str)) == 0xFFFF) {
str               312 src/assemble.c                 adr = getlabel("", str);
str               315 src/assemble.c                 setcerr(103, str);    /* label not found */                setcerr(103, str);    /* label not found */
str               322 src/assemble.c WORD grword(const char *str, bool is_x)
str               327 src/assemble.c     if(strlen(str) != 3 ||
str               328 src/assemble.c        strncmp(str, "GR", 2) != 0 ||
str               329 src/assemble.c        str[2] < '0' || str[2] > '0' + (GRSIZE - 1))
str               333 src/assemble.c     r = (WORD)(str[2] - '0');
str               342 src/assemble.c WORD getliteral(const char *str, PASS pass)
str               344 src/assemble.c     assert(str[0] == '=');
str               347 src/assemble.c     str++;
str               348 src/assemble.c     if(str[0] == '\'') {    /* 文字定数 */
str               349 src/assemble.c         writestr(str, true, pass);
str               351 src/assemble.c         writememory(nh2word(str), (asptr->lptr)++, pass);
str               372 src/assemble.c void writestr(const char *str, bool literal, PASS pass)
str               374 src/assemble.c     assert(str[0] == '\'');
str               378 src/assemble.c     for(int i = 1; str[i] != '\'' || str[++i] == '\''; i++) {
str               380 src/assemble.c         if(!str[i]) {
str               381 src/assemble.c             setcerr(123, str);    /* unclosed quote */
str               385 src/assemble.c             setcerr(124, str);    /* more than one character in literal */
str               390 src/assemble.c             writememory(str[i], (asptr->lptr)++, pass);
str               393 src/assemble.c             writememory(str[i], (asptr->ptr)++, pass);
str               398 src/assemble.c void writedc(const char *str, PASS pass)
str               402 src/assemble.c     if(*str == '\'') {
str               403 src/assemble.c         writestr(str, false, pass);
str               405 src/assemble.c         if(str[0] == '#' || isdigit(str[0]) || str[0] == '-') {
str               406 src/assemble.c             adr = nh2word(str);
str               408 src/assemble.c             if(pass == SECOND && (adr = getlabel(asptr->prog, str)) == 0xFFFF) {
str               409 src/assemble.c                 adr = getlabel("", str);
str               412 src/assemble.c                 setcerr(103, str);    /* label not found */
str                46 src/cerr.c     void setcerr(int num, const char *str)
str                55 src/cerr.c         if(0 < strlen(str) && strlen(str) <= CERRSTRSIZE) {
str                56 src/cerr.c             sprintf(cerr->msg, "%s: %s", str, getcerrmsg(cerr->num));
str                 3 src/cmem.c     long str2l_range(const char *str, long min, long max, const char *name) {
str                 5 src/cmem.c         long val = strtol(str, &endptr, 10);
str                 6 src/cmem.c         if(endptr == str) {
str                10 src/cmem.c             fprintf(stderr, "%s: `%s' is not integer.\n", name, str);
str                14 src/cmem.c                 fprintf(stderr, "%s: %s out of range: %ld -\n", str, name, min);
str                16 src/cmem.c                 fprintf(stderr, "%s: %s out of range: %ld - %ld\n", str, name, min, max);
str                92 src/exec.c     CLOCK clock_str2clock(const char *str) {
str                93 src/exec.c         long val = str2l_range(str, 1, LONG_MAX, "Clock");
str                96 src/exec.c             fprintf(stderr, "Info - %s: Clock frequency exceeds maximum. Set to %ld\n", str, val);
str               103 src/exec.c         char *str = malloc_chk(CERRSTRSIZE + 1, "pr2str.pr");
str               105 src/exec.c         sprintf(str, "PR:#%04X", pr);
str               106 src/exec.c         return str;
str               128 src/monitor.c  MONARGS *monargstok(const char *str)
str               136 src/monitor.c      if(!str || !str[0]) {
str               139 src/monitor.c      tok = p = strdup_chk(str, "argstok.p");
str               315 src/struct.c       char *str = NULL;
str               317 src/struct.c       str = malloc_chk(3 + 1, "grstr.str");
str               318 src/struct.c       sprintf(str, "GR%d", word);
str               319 src/struct.c       return str;
str               322 src/struct.c   WORD memsize_str2word(const char *str) {
str               323 src/struct.c       return (WORD)str2l_range(str, 1, MAX_MEMSIZE, "Memory Size");
str                10 src/token.c    OPD *opdtok(const char *str);
str                30 src/token.c    OPD *opdtok(const char *str)
str                38 src/token.c        if(!str || !str[0]) {
str                41 src/token.c        tok = p = strdup_chk(str, "opdtok.p");
str                66 src/token.c                    setcerr(123, str);    /* unclosed quote */
str                17 src/word.c     WORD n2word(const char *str);
str                26 src/word.c     WORD h2word(const char *str);
str                28 src/word.c     WORD n2word(const char *str)
str                30 src/word.c         assert(isdigit(str[0]) || str[0] == '-');
str                35 src/word.c         n = strtol(str, &check, 10);
str                37 src/word.c             setcerr(114, str);    /* not integer */
str                47 src/word.c     WORD h2word(const char *str)
str                49 src/word.c         assert(str[0] == '#');
str                53 src/word.c         str++;
str                54 src/word.c         if(*str == '-' || strlen(str) > 4) {
str                55 src/word.c             setcerr(116, str-1);    /* out of hex range */
str                59 src/word.c         w = (WORD)strtol(str, &check, 16);
str                61 src/word.c             setcerr(115, str-1);    /* not hex */
str                82 src/word.c     WORD nh2word(const char *str)
str                87 src/word.c         if(str == NULL) {
str                90 src/word.c         if(!isdigit(*str) && *str != '-' && *str != '#') {
str                91 src/word.c             setcerr(114, str);    /* not integer */
str                94 src/word.c         if(*str == '#') {
str                95 src/word.c             w = h2word(str);
str                97 src/word.c             w = n2word(str);