From: Matthijs Kooijman Date: Mon, 22 Jun 2009 11:30:50 +0000 (+0200) Subject: Fix definition of hwor builtin operator. X-Git-Url: https://git.stderr.nl/gitweb?a=commitdiff_plain;ds=sidebyside;h=10879104f70572cd8df098f28074f36f5b308f32;hp=-c;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git Fix definition of hwor builtin operator. --- 10879104f70572cd8df098f28074f36f5b308f32 diff --git a/GlobalNameTable.hs b/GlobalNameTable.hs index 756c611..6317ebc 100644 --- a/GlobalNameTable.hs +++ b/GlobalNameTable.hs @@ -21,6 +21,6 @@ globalNameTable = mkGlobalNameTable , ("head" , (1, genExprFCall headId ) ) , ("hwxor" , (2, genExprOp2 AST.Xor ) ) , ("hwand" , (2, genExprOp2 AST.And ) ) - , ("hwor" , (2, genExprOp2 AST.And ) ) + , ("hwor" , (2, genExprOp2 AST.Or ) ) , ("hwnot" , (1, genExprOp1 AST.Not ) ) ]