diff options
| author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-12-10 11:07:08 +0100 |
|---|---|---|
| committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-12-10 11:07:08 +0100 |
| commit | 981f900bb0358eee7ddf5ada1d09b0c629bfdc5b (patch) | |
| tree | 4e3db4a63038d484daeaa444ab4d5020f2f63669 /src/parser.mly | |
| parent | 6e7190d226e9bf97c2ea26b1c9e6419c12273bfa (diff) | |
| download | LPC-Projet-981f900bb0358eee7ddf5ada1d09b0c629bfdc5b.tar.gz LPC-Projet-981f900bb0358eee7ddf5ada1d09b0c629bfdc5b.zip | |
Many things. Remains : inheritance.
Diffstat (limited to 'src/parser.mly')
| -rw-r--r-- | src/parser.mly | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/parser.mly b/src/parser.mly index 71c7842..0cf545d 100644 --- a/src/parser.mly +++ b/src/parser.mly @@ -17,8 +17,8 @@ (* return type, name *) let rec reverse_var bt v = match v with | VId(i) -> bt, i - | VPtr(vv) -> let ty, id = reverse_var bt vv in TPtr(ty), id - | VRef(vv) -> let ty, id = reverse_var bt vv in TRef(ty), id + | VPtr(vv) -> let ty, id = reverse_var (TPtr(bt)) vv in ty, id + | VRef(vv) -> let ty, id = reverse_var (TRef(bt)) vv in ty, id (* return type, class, name *) let rec reverse_qvar bt (v, cl) = |