diff options
author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-11-08 22:43:54 +0100 |
---|---|---|
committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-11-08 22:43:54 +0100 |
commit | bd04128b033c8a623cceca31de072053837ad888 (patch) | |
tree | e8bcc0c4d1057e160d097439899b7736f683beb6 /sched/netlist_parser.mly | |
parent | 7a651609a8f40e8040cffa92f9965df02b0f52cd (diff) | |
download | SystDigit-Projet-bd04128b033c8a623cceca31de072053837ad888.tar.gz SystDigit-Projet-bd04128b033c8a623cceca31de072053837ad888.zip |
More optimizations.
Diffstat (limited to 'sched/netlist_parser.mly')
-rw-r--r-- | sched/netlist_parser.mly | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/sched/netlist_parser.mly b/sched/netlist_parser.mly index 1f76528..66b4eab 100644 --- a/sched/netlist_parser.mly +++ b/sched/netlist_parser.mly @@ -6,7 +6,7 @@ for i = 0 to String.length n - 1 do if n.[i] = '1' then ret.(i) <- true done; - VBitArray(ret) + ret %} @@ -56,5 +56,5 @@ arg: var: x=NAME ty=ty_exp { (x, ty) } ty_exp: - | /*empty*/ { TBit } - | COLON n=INT { TBitArray (int_of_string n) } + | /*empty*/ { 1 } + | COLON n=INT { int_of_string n } |