aboutsummaryrefslogtreecommitdiff
path: root/kernel/names.ml
diff options
context:
space:
mode:
authorcoqbot-app[bot]2020-11-12 14:46:58 +0000
committerGitHub2020-11-12 14:46:58 +0000
commit6d7877829b7265d6c416c17ea3bbacf65f306609 (patch)
tree106990d1eb961d61b09f137be6759d663aa13b39 /kernel/names.ml
parent7ba09858a87a6940278c96ae328e44c142842cd9 (diff)
parentb9f4ed819b36cfa27046743035fa080035db6672 (diff)
Merge PR #13351: Fixes #13349: accept Search on subparts of an identifier, not only on subidentifiers of an identifier
Reviewed-by: Zimmi48
Diffstat (limited to 'kernel/names.ml')
-rw-r--r--kernel/names.ml4
1 files changed, 4 insertions, 0 deletions
diff --git a/kernel/names.ml b/kernel/names.ml
index 5b6064fa9f..13761ca245 100644
--- a/kernel/names.ml
+++ b/kernel/names.ml
@@ -44,6 +44,10 @@ struct
| None -> true
| Some _ -> false
+ let is_valid_ident_part s = match Unicode.ident_refutation ("x"^s) with
+ | None -> true
+ | Some _ -> false
+
let of_bytes s =
let s = Bytes.to_string s in
check_valid s;