summaryrefslogtreecommitdiffstats
path: root/bytecomp/lambda.mli
diff options
context:
space:
mode:
authorLuc Maranget <luc.maranget@inria.fr>2014-03-21 17:02:44 +0000
committerLuc Maranget <luc.maranget@inria.fr>2014-03-21 17:02:44 +0000
commitc2a88c27fd3867e022c8ae4363bb24bca864619b (patch)
treeecf353c6af43216c7277824f9d8d8eb70a983015 /bytecomp/lambda.mli
parent3d1c1adaf392f1c740c8c2015b9d1032ef3226c5 (diff)
#PR6269 Optimized string matching
Noticed that I had to bootstrap to test on ARM, so I commit a new bootstrap compiler. git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@14479 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'bytecomp/lambda.mli')
-rw-r--r--bytecomp/lambda.mli3
1 files changed, 3 insertions, 0 deletions
diff --git a/bytecomp/lambda.mli b/bytecomp/lambda.mli
index 904ea6fd7..6748fefe1 100644
--- a/bytecomp/lambda.mli
+++ b/bytecomp/lambda.mli
@@ -175,6 +175,9 @@ type lambda =
| Lletrec of (Ident.t * lambda) list * lambda
| Lprim of primitive * lambda list
| Lswitch of lambda * lambda_switch
+(* switch on strings, clauses are sorted by string order,
+ strings are pairwise distinct *)
+ | Lstringswitch of lambda * (string * lambda) list * lambda
| Lstaticraise of int * lambda list
| Lstaticcatch of lambda * (int * Ident.t list) * lambda
| Ltrywith of lambda * Ident.t * lambda