Commit 7f35c865 authored by sof's avatar sof
Browse files

[project @ 1999-01-19 14:40:00 by sof]

foreign decls: use wlkHsSigType, not wlkHsType, since the tysig may
have implicitly quantified tyvars.
parent 2f5d63f3
......@@ -612,7 +612,7 @@ wlkBinding binding
U_fobind id ty ext_name unsafe_flag cconv imp_exp srcline ->
mkSrcLocUgn srcline $ \ src_loc ->
wlkVarId id `thenUgn` \ h_id ->
wlkHsType ty `thenUgn` \ h_ty ->
wlkHsSigType ty `thenUgn` \ h_ty ->
wlkExtName ext_name `thenUgn` \ h_ext_name ->
rdCallConv cconv `thenUgn` \ h_cconv ->
rdForKind imp_exp (cvFlag unsafe_flag) `thenUgn` \ h_imp_exp ->
......
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