Question

在 3.2 节中我们实现了函数 scan() ，从主程序获取一行输入并在每次调用返回一个输入符号。如果我们想引进关键字，命名常量等等，我们需要扩展 scan() 。像浮点数一样，我们提取字符数字串以供深入分析：

  #define ALNUM  "ABCDEFGHIJKLMNOPQRSTUVWXYZ" \
          "abcdefghijklmnopqrstuvwxyz" \
          "_" "0123456789"

  static enum tokens scan (const char * buf) {
    static const char * bp;
    …
    if (isdigit(* bp) || * bp == '.')
      …
    else if (isalpha( *bp) || *bp == '_') {
      char buf[BUFSIZ];
      int len = strspn(bp, ALNUM);

      if (len >= BUFSIZ)
        error("name too long: %-.10s…", bp);

      strncpy(buf, bp, len), buf[len] = '\0', bp += len;
      token = screen(buf);
    }
    ...

一旦我们有了一个标识符，我们让新函数 screen() 来决定它的 token 值应当是什么。如果有必要， screen() 将会存放一个解析器可以识别的符号描述到全局变量 symbol 中。