Fix stack clean.
[haskell/symantic.git] / symantic-lib / Language / Symantic / Lib / Char.hs
index 6fbb8da856fdd5acaa651908ed0d1583a235b529..95c0c07ba453ba16e14c59f3dffa52644aadb397 100644 (file)
@@ -114,7 +114,7 @@ instance -- Gram_Term_AtomsT
  , Gram_Meta meta g
  , Inj_Token meta ts Char
  ) => Gram_Term_AtomsT meta ts (Proxy Char) g where
-       term_atomsT _t =
+       gs_term_atomsT _t =
         [ rule "term_char" $
                lexeme $ metaG $
                (\c meta -> ProTok $ inj_EToken meta $ Token_Term_Char c)