assignExpr :: Parser Expression
assignExpr = do
  keyWord "set"
  assign <- assignment
  return $ uncurry AssignExpr assign

-- | SetDynamicExpr ::= setdynamic Identifier = Expression during Expression
assignExpr :: Parser Expression
assignExpr = do
  keyWord "set"
  assign <- assignment
  return $ uncurry AssignExpr assign

-- | SetDynamicExpr ::= setdynamic Identifier = Expression during Expression
assignExpr = do
  keyWord "set"
  assign <- assignment
  return $ uncurry AssignExpr assign

-- | SetDynamicExpr ::= setdynamic Identifier = Expression during Expression