@@ -195,14 +195,6 @@ moduleToCpp (Module _ coms mn _ imps _ foreigns decls) _ =
195195 var :: Ident -> AST
196196 var = AST.Var Nothing . identToCpp
197197
198− -- | Generate code in the simplified intermediate representation for an accessor based on
199− -- a PureScript identifier. If the name is not valid in C++ (symbol based, reserved name) an
200− -- indexer is returned.
201− accessor :: Ident -> AST -> AST
202− accessor (Ident prop) = accessorString $ mkString prop
203− accessor (GenIdent _ _) = internalError "GenIdent in accessor"
204− accessor UnusedIdent = internalError "UnusedIdent in accessor"
205−
206198 accessorString :: PSString -> AST -> AST
207199 accessorString prop = AST.Indexer Nothing (AST.StringLiteral Nothing prop)
208200