#include "HsVersions.h"
import CoreSyn
-import CoreUtils ( mkInlineMe )
import Type ( Type )
import Var
+import Outputable
type Vect a = (a,a)
type VVar = Vect Var
vInlineMe :: VExpr -> VExpr
vInlineMe (vexpr, lexpr) = (mkInlineMe vexpr, mkInlineMe lexpr)
+mkInlineMe :: CoreExpr -> CoreExpr
+mkInlineMe = pprTrace "VectCore.mkInlineMe" (text "Roman: need to replace mkInlineMe with an InlineRule somehow")