common lisp 的函数 GET-MACRO-CHARACTER

get-macro-character.txt

语法
  get-macro-character char &optional readtable => function, non-terminating-p

参数和值
  char --- 一个字符
  non-terminating-p --- 一个 generalized boolean, 默认为 false
  readtable --- 一个 readtable 指示符, 默认为当前 readtable
  function --- nil或者一个有两个参数的函数
  new-function --- 一个 函数指示符

描述
  get-macro-character 返回 char 的宏读取函数, non-terminating-p 指示这个字符是否为非结尾字符, 如果是, 则返回 true
  否则返回 false

代码
  *  (get-macro-character #\')
  #<FUNCTION SB-IMPL::READ-QUOTE>
  NIL

  *  (get-macro-character #\a)
  NIL
  NIL