Skip to content
Snippets Groups Projects
Commit 2ca47382 authored by Simon Marlow's avatar Simon Marlow
Browse files

[project @ 1997-10-07 14:51:49 by simonm] 

add missing IFaceFlavour field.
parent 3d259023
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
ghc/compiler/reader/ReadPrefix.lhs
+ 1
− 1
View file @ 2ca47382
......@@ -90,7 +90,7 @@ wlkQid mk_occ_name (U_noqual name)
wlkQid mk_occ_name (U_aqual mod name)
= returnUgn (Qual mod (mk_occ_name name) HiFile)
wlkQid mk_occ_name (U_gid n name)
= returnUgn (Qual pRELUDE (mk_occ_name name))
= returnUgn (Qual pRELUDE (mk_occ_name name) HiFile)
rdTCId pt = rdU_qid pt `thenUgn` \ qid -> wlkTCId qid
rdVarId pt = rdU_qid pt `thenUgn` \ qid -> wlkVarId qid
......
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