Commit 8e71d508 authored by's avatar
Browse files

Add built-in PA dictionary for closures

parent f03cf1b1
......@@ -54,7 +54,8 @@ mkNDPVarFS fs = mkRdrQual nDP_BUILTIN (mkVarOccFS fs)
builtin_PAs :: [(Name, RdrName)]
builtin_PAs = [
mk intTyConName FSLIT("dPA_Int")
mk closureTyConName FSLIT("dPA_Clo")
, mk intTyConName FSLIT("dPA_Int")
++ tups
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment