Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[enhance] bsljsparse: read normalize flag in new syntax.

  • Loading branch information...
commit 71f2cc8239395d4a801188bb0799bd2a1083c7ae 1 parent 614aaa0
@arthuraa arthuraa authored
Showing with 1 addition and 0 deletions.
  1. +1 −0  compiler/libbsl/bslJsParse.ml
View
1  compiler/libbsl/bslJsParse.ml
@@ -120,6 +120,7 @@ let collect_bsl_tags tags =
{t with BslTags.restricted = Some tags}
);
bool "opaName" (fun t v -> {t with BslTags.opaname = v});
+ bool "normalize" (fun t v -> {t with BslTags.opaname = not v});
bool "raise" (fun t v -> {t with BslTags.raise_ = v});
bool "cpsBypass" (fun t v -> {t with BslTags.cps_bypass = v});
bool "pure" (fun t v -> {t with BslTags.pure = v});
Please sign in to comment.
Something went wrong with that request. Please try again.