changeset 17221 | 6cd180204582 |
parent 17218 | 64242b791c19 |
child 17412 | e26cb20ef0cc |
--- a/src/Pure/General/symbol.ML Thu Sep 01 16:19:02 2005 +0200 +++ b/src/Pure/General/symbol.ML Thu Sep 01 18:48:50 2005 +0200 @@ -350,7 +350,7 @@ else if is_ascii_quasi s then Quasi else if is_ascii_blank s then Blank else if is_char s then Other - else if_none (Symtab.lookup (symbol_kinds, s)) Other; + else if_none (Symtab.curried_lookup symbol_kinds s) Other; end; fun is_letter s = kind s = Letter;