5 #include "HsVersions.h"
8 IMP_Ubiq() -- debugging consistency check
18 tbind : < gtbindc : list; /* [context entries] */
19 gtbindid : ttype; /* applied tycon */
20 gtbindl : list; /* [constr] */
21 gtbindd : maybe; /* Maybe [deriving] */
23 ntbind : < gntbindc : list; /* [context entries] */
24 gntbindid : ttype; /* applied tycon */
25 gntbindcty : list; /* [constr] (only 1 constrnew) */
26 gntbindd : maybe; /* Maybe [deriving] */
28 nbind : < gnbindid : ttype;
31 pbind : < gpbindl : list;
33 fbind : < gfbindl : list;
35 abind : < gabindfst : binding;
36 gabindsnd : binding; >;
37 ibind : < gibindc : list;
42 dbind : < gdbindts : list;
44 cbind : < gcbindc : list;
48 sbind : < gsbindids : list;
54 import : < gibindimod : stringId;
60 /* user-specified pragmas:XXXX */
62 vspec_uprag : < gvspec_id : qid;
64 gvspec_line : long; >;
66 vspec_ty_and_id : < gvspec_ty : ttype;
67 gvspec_tyid : maybe; /* nil or singleton */ >;
69 ispec_uprag : < gispec_clas : qid;
71 gispec_line : long; >;
73 inline_uprag: < ginline_id : qid;
74 ginline_line : long; >;
76 deforest_uprag: < gdeforest_id : qid;
77 gdeforest_line : long; >;
79 magicuf_uprag:< gmagicuf_id : qid;
80 gmagicuf_str : stringId;
81 gmagicuf_line : long; >;
83 dspec_uprag : < gdspec_id : qid;
85 gdspec_line : long; >;