ghc/compiler/yaccParser/tree-DPH.ugn

   1 %{
   2 #include "hspincl.h"
   3 %}
   4 %{{
   5 module U_tree where
   6 import UgenUtil
   7 import Util
   8 %}}
   9 type tree;
  10         hmodule : < ghname      : id;
  11                     ghimplist   : list;
  12                     ghexplist   : list;
  13                     ghmodlist   : binding;
  14                     ghmodline   : unsigned; >;
  15         ident   : < gident      : id;   >;
  16         integer : < ginteger    : id;   >;
  17         intprim : < gintprim    : id;   >;
  18         floatr  : < gfloatr     : id;   >;
  19         doubleprim : < gdoubleprim : id;        >;
  20         floatprim : < gfloatprim : id;  >;
  21         charr   : < gchar       : id;   >;
  22         charprim : < gcharprim : id;    >;
  23         clitlit : < gclitlit : id;      >;
  24         voidprim : < >;
  25         string  : < gstring     : id;   >;
  26         tuple   : < gtuplelist  : list; >;
  27         ap      : < gfun        : tree;
  28                     garg        : tree; >;
  29         lambda  : < glampats    : list;
  30                     glamexpr    : tree;
  31                     glamline    : unsigned; >;
  32         let     : < gletvdeflist        : binding;
  33                     gletvexpr   : tree; >;
  34         casee   : < gcaseexpr   : tree;
  35                     gcasebody   : list; >;
  36         ife     : < gifpred     : tree;
  37                     gifthen     : tree;
  38                     gifelse     : tree; >;
  39         par     : < gpare       : tree; >;
  40         as      : < gasid       : id;
  41                     gase        : tree; >;
  42         lazyp   : < glazyp      : tree; >;
  43         plusp   : < gplusp      : tree;
  44                     gplusi      : tree; >;
  45         wildp   : < >;
  46         restr   : < grestre     : tree;
  47                     grestrt     : ttype; >;
  48         comprh  : < gcexp       : tree;
  49                     gcquals     : list; >;
  50         qual    : < gqpat       : tree;
  51                     gqexp       : tree; >;
  52         guard   : < ggexp       : tree; >;
  53         def     : < ggdef       : binding; >;
  54         tinfixop: < gdummy      : tree; >;
  55         lsection: < glsexp      : tree;
  56                     glsop       : id;   >;
  57         rsection: < grsop       : id;
  58                     grsexp      : tree; >;
  59         eenum   : < gefrom      : tree;
  60                     gestep      : list;
  61                     geto        : list; >;
  62         llist   : < gllist      : list; >;
  63         ccall   : < gccid       : id;
  64                     gccinfo     : id;
  65                     gccargs     : list; >;
  66         scc     : < gsccid      : id;
  67                     gsccexp     : tree; >;
  68         negate  : < gnexp       : tree; >;
  69         parzf   : < gpzfexp     : tree;
  70                     gpzfqual    : list; >;
  71         pardgen : < gdproc      : tree;
  72                     gdexp       : tree; >;
  73         parigen : < giproc      : tree;
  74                     giexp       : tree; >;
  75         parfilt : < gpfilt      : tree; >;
  76         pod     : < gpod        : list; >;
  77         proc    : < gprocid     : list;
  78                     gprocdata   : tree; >;
  79
  80 end;