@@ -60,6 +60,7 @@ identCharToString ':' = "$colon"
60identCharToString '\\' = "$bslash"
60identCharToString '\\' = "$bslash"
61identCharToString '?' = "$qmark"
61identCharToString '?' = "$qmark"
62identCharToString '@' = "$at"
62identCharToString '@' = "$at"
63+identCharToString '\'' = "$prime"
63identCharToString c = '$' : show (ord c)
64identCharToString c = '$' : show (ord c)