＃ｉ nc ｌｕｄ e＜std ｉ o、h〉#i ｎ c ｌ ude＝ ＇ａ'&＆cha ｒ acter 〈= 'z’） ｜| （c ｈａｒ acter 〉= ’A＇＆＆ch ａ rac ｔ er <＝ 'Z’)）ﻩre ｔｕ rn ｔ rue;ﻩel ｓ eﻩr ｅｔｕ rn fals ｅ;}／*推断ｃｈ ar ａ c ｔ er 就是否为数字*/bool di ｇ it（ｃｈ ar ch ａ r ａｃ ter）{i ｆ (ch ａ ra ｃ ter >= ＇0'&＆ch ａ r ａ c ｔ er ＜= ＇９')ｒ etu ｒ n true；elseﻩr ｅ turn ｆ alse；｝/＊回退字符*／v ｏ id r ｅｔｒ ac ｔ（cha ｒ＆ ｃ ha ｒａ cter){u ｎ get ｃ（ch ａ rac ｔｅｒ, stdin）；ﻩchara ｃ t ｅｒ = NULL;｝/*返回保留字得对应种别＊/i ｎ t r ｅ s ｅ rv ｅ（char* token）｛ﻩｉｆ （str ｃ mp（ｔｏｋ en, ＂b ｅ gin”） == 0）return 1;ﻩels ｅ if （ｓ trcmp(token， ＂ｅ n ｄ"） ＝= 0)ﻩﻩre ｔ u ｒｎ 2;ｅ l ｓ e if (ｓ t ｒ cmp（token， ＂i ｎ t ｅ ge ｒ＂) ＝＝ 0)retu ｒｎ 3；ﻩelse if (s ｔ r ｃｍ p（ｔ oken, "ｉ f＂) =＝ ０）ﻩreturn 4；ｅ lse if (strcm ｐ（toke ｎ, ＂t ｈ en”) == 0)ﻩret ｕ rn ５；else ｉｆ (strc ｍ p（token, "e ｌ se”) == 0)ﻩr ｅｔ ur ｎ ６;else if （ｓ trc ｍ p（t ｏ k ｅｎ， ＂funct ｉ on＂) == 0）ﻩﻩret ｕ rn 7；ﻩｅ lse if （ｓ t ｒ cmp(token， ＂rea ｄ”） ＝= 0）ﻩre ｔ u ｒ n 8；el ｓ e i ｆ (strcmp(token, ”wr ｉｔ e”） =＝ 0)ﻩret ｕ...
