From 9ab11c5106f7f90fbd25e05f1333ed462ae7fcb7 Mon Sep 17 00:00:00 2001 From: Roman Leshchinskiy Date: Fri, 11 May 2007 01:39:32 +0000 Subject: [PATCH] OccNames for closure conversion isomorphisms --- compiler/basicTypes/OccName.lhs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/compiler/basicTypes/OccName.lhs b/compiler/basicTypes/OccName.lhs index d3047a9..8de65b8 100644 --- a/compiler/basicTypes/OccName.lhs +++ b/compiler/basicTypes/OccName.lhs @@ -32,7 +32,7 @@ module OccName ( mkDataTOcc, mkDataCOcc, mkDataConWorkerOcc, mkSuperDictSelOcc, mkLocalOcc, mkMethodOcc, mkInstTyTcOcc, mkInstTyCoOcc, mkEqPredCoOcc, - mkCloOcc, mkCloTyConOcc, mkCloDataConOcc, + mkCloOcc, mkCloTyConOcc, mkCloDataConOcc, mkCloIsoOcc, -- ** Deconstruction occNameFS, occNameString, occNameSpace, @@ -462,6 +462,7 @@ mkDataCOcc = mk_simple_deriv varName "$c" mkCloOcc = mk_simple_deriv varName "$CC_" mkCloTyConOcc = mk_simple_deriv tcName ":CC_" mkCloDataConOcc = mk_simple_deriv dataName ":CD_" +mkCloIsoOcc = mk_simple_deriv varName "$CCiso_" mk_simple_deriv sp px occ = mk_deriv sp px (occNameString occ) -- 1.7.10.4