diff options
Diffstat (limited to 'lib/configuration/expression_parser.mly')
| -rw-r--r-- | lib/configuration/expression_parser.mly | 23 |
1 files changed, 1 insertions, 22 deletions
diff --git a/lib/configuration/expression_parser.mly b/lib/configuration/expression_parser.mly index 54f3bfe..18b79c8 100644 --- a/lib/configuration/expression_parser.mly +++ b/lib/configuration/expression_parser.mly @@ -22,27 +22,6 @@ %right INEQUALITY_OPERATOR EQUALITY_OPERATOR %right CONCAT_OPERATOR BINARY_OPERATOR -%{ - - let function_of_name param f = - match (String.lowercase_ascii f, param) with - | "nvl", _ -> - ImportExpression.T.Nvl param - | "join", (ImportExpression.T.Literal sep:: tl) -> - ImportExpression.T.Join (sep, tl) - | "join", (ImportExpression.T.Empty:: tl) -> - ImportExpression.T.Join ("", tl) - | "upper", _ -> - ImportExpression.T.Function' (ImportExpression.T.Upper, param) - | "trim", _ -> - ImportExpression.T.Function' (ImportExpression.T.Trim, param) - | "cmp", _ -> - ImportExpression.T.Function' (ImportExpression.T.Cmp, param) - | other, _ -> - ImportExpression.T.Function (other, param) - -%} - %% path_expr: @@ -146,7 +125,7 @@ expr_(PATH, ENDING_PHANTOM): { f } | s = IDENT args = arguments(PATH) - { function_of_name args s } + { ImportExpression.T.function_of_name args s } | s = IDENT L_PAREN |