all: added parenthesized expressions

2017-05-22 17:19:34 -04:00
parent b31965fe8a
commit a357895321
3 changed files with 14 additions and 0 deletions
--- a/src/BC/Types.hs
+++ b/src/BC/Types.hs
@@ -11,6 +11,7 @@ data Value = BNum Number
           | BDef Value [Value]
           | BFun String [String] [[Value]]
           | BCall Value [[Value]]
+           | BBraced [Value]
           | BErr String
 instance Show Value where
  show (BBool b) = if b then "true" else "false"