5 #include "HsVersions.h"
7 module U_pbinding where
8 IMP_Ubiq() -- debugging consistency check
11 import U_constr ( U_constr ) -- interface only
14 import U_literal ( U_literal ) -- ditto
15 import U_maybe ( U_maybe ) -- ditto
18 import U_ttype ( U_ttype ) -- ditto
21 pgrhs : < ggpat : tree;
27 pnoguards : < gpnoguard : tree; >;
28 pguards : < gpguards : list; >;
30 pgdexp : < gpguard : list; /* Experimental change: guards are lists of quals */