diff options
| author | Nicolas Pouillard <np@nicolaspouillard.fr> | 2008-09-19 12:50:41 +0000 |
|---|---|---|
| committer | Nicolas Pouillard <np@nicolaspouillard.fr> | 2008-09-19 12:50:41 +0000 |
| commit | d385cf85912bfd6dc148557e846f4defdf4c5552 (patch) | |
| tree | a586797404b4d4fbe2341e5e91278c9d40db0543 /camlp4/examples/lambda_quot_expr.ml | |
| parent | 7d912ae76a00ad7bbfa2ed1bda0dc9e93d754ce2 (diff) | |
camlp4: more examples and tests
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@9032 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'camlp4/examples/lambda_quot_expr.ml')
| -rw-r--r-- | camlp4/examples/lambda_quot_expr.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/camlp4/examples/lambda_quot_expr.ml b/camlp4/examples/lambda_quot_expr.ml index 3b51f47f5..98922123a 100644 --- a/camlp4/examples/lambda_quot_expr.ml +++ b/camlp4/examples/lambda_quot_expr.ml @@ -35,6 +35,7 @@ END;; let expand_lambda_quot_expr loc _loc_name_opt quotation_contents = LambdaGram.parse_string term_eoi loc quotation_contents;; +(* to have this syntax <:lam< fun k -> k >> *) Syntax.Quotation.add "lam" Syntax.Quotation.DynAst.expr_tag expand_lambda_quot_expr;; Syntax.Quotation.default := "lam";; |