diff options
Diffstat (limited to 'dhall_parser/src')
-rw-r--r-- | dhall_parser/src/dhall.abnf | 128 | ||||
-rw-r--r-- | dhall_parser/src/dhall.pest.visibility | 72 |
2 files changed, 96 insertions, 104 deletions
diff --git a/dhall_parser/src/dhall.abnf b/dhall_parser/src/dhall.abnf index fa403ba..d27554c 100644 --- a/dhall_parser/src/dhall.abnf +++ b/dhall_parser/src/dhall.abnf @@ -172,10 +172,10 @@ quoted-label = 1*quoted-label-char ; Their list can be found in semantics.md. This is not enforced by the grammar but
; should be checked by implementations. The only place where this restriction applies
; is bound variables.
-label-raw = ("`" quoted-label "`" / simple-label)
+label = ("`" quoted-label "`" / simple-label)
; An any-label is allowed to be one of the reserved identifiers.
-any-label-raw = label-raw
+any-label = label
; Dhall's double-quoted strings are equivalent to JSON strings except with
@@ -274,31 +274,30 @@ single-quote-literal = "''" end-of-line single-quote-continue ; Interpolation
interpolation = "${" complete-expression "}"
-text-literal-raw = (double-quote-literal / single-quote-literal)
+text-literal = (double-quote-literal / single-quote-literal)
; RFC 5234 interprets string literals as case-insensitive and recommends using
; hex instead for case-sensitive strings
;
; If you don't feel like reading hex, these are all the same as the rule name,
-; except without the '-raw' ending.
+; except without the '' ending.
; Keywords that should never be parsed as identifiers
-if-raw = %x69.66
-then-raw = %x74.68.65.6e
-else-raw = %x65.6c.73.65
-let-raw = %x6c.65.74
-in-raw = %x69.6e
-as-raw = %x61.73
-using-raw = %x75.73.69.6e.67
-merge-raw = %x6d.65.72.67.65
-missing-raw = %x6d.69.73.73.69.6e.67
-Infinity-raw = %x49.6e.66.69.6e.69.74.79
+if = %x69.66
+then = %x74.68.65.6e
+else = %x65.6c.73.65
+let = %x6c.65.74
+in = %x69.6e
+as = %x61.73
+using = %x75.73.69.6e.67
+merge = %x6d.65.72.67.65
+missing = %x6d.69.73.73.69.6e.67
+Infinity = %x49.6e.66.69.6e.69.74.79
; Reserved identifiers, only needed for some special cases of parsing
Optional = %x4f.70.74.69.6f.6e.61.6c
Text = %x54.65.78.74
List = %x4c.69.73.74
-Infinity-raw = %x49.6e.66.69.6e.69.74.79
-NaN-raw = %x4e.61.4e
-Some-raw = %x53.6f.6d.65
+NaN = %x4e.61.4e
+Some = %x53.6f.6d.65
combine = %x2227 / "/\"
combine-types = %x2A53 / "//\\"
@@ -309,15 +308,15 @@ arrow = %x2192 / "->" exponent = "e" [ "+" / "-" ] 1*DIGIT
-double-literal-raw = [ "+" / "-" ] 1*DIGIT ( "." 1*DIGIT [ exponent ] / exponent)
+double-literal = [ "+" / "-" ] 1*DIGIT ( "." 1*DIGIT [ exponent ] / exponent)
-natural-literal-raw = 1*DIGIT
+natural-literal = 1*DIGIT
-integer-literal-raw = ( "+" / "-" ) natural-literal-raw
+integer-literal = ( "+" / "-" ) natural-literal
; The implementation should recognize reserved names for builtins and treat them as special
; values instead of variables.
-identifier-raw = any-label-raw [ whitespace "@" whitespace natural-literal-raw ]
+identifier = any-label [ whitespace "@" whitespace natural-literal ]
; Printable characters other than " ()[]{}<>/\,"
;
@@ -364,7 +363,7 @@ path-component = "/" ( unquoted-path-component / %x22 quoted-path-component %x22 path = 1*path-component
-local-raw =
+local =
parent-path
/ here-path
/ home-path
@@ -444,11 +443,11 @@ sub-delims = "!" / "$" / "&" / "'" / "(" / ")" / "*" / "+" / "," / ";" / "=" http =
http-raw
- [ whitespace using-raw nonempty-whitespace (import-hashed-raw / "(" whitespace import-hashed-raw whitespace ")") ]
+ [ whitespace using nonempty-whitespace (import-hashed / "(" whitespace import-hashed whitespace ")") ]
; Dhall supports unquoted environment variables that are Bash-compliant or
; quoted environment variables that are POSIX-compliant
-env-raw = "env:"
+env = "env:"
( bash-environment-variable
/ %x22 posix-environment-variable %x22
)
@@ -510,21 +509,21 @@ posix-environment-variable-character = ; %x5C = "\"
/ %x5D-7E
-import-type-raw = missing-raw / local-raw / http / env-raw
+import-type = missing / local / http / env
-hash-raw = %x73.68.61.32.35.36.3a 64HEXDIG ; "sha256:XXX...XXX"
+hash = %x73.68.61.32.35.36.3a 64HEXDIG ; "sha256:XXX...XXX"
-import-hashed-raw = import-type-raw [ whitespace hash-raw ]
+import-hashed = import-type [ whitespace hash ]
; "http://example.com"
; "./foo/bar"
; "env:FOO"
-import-raw = import-hashed-raw [ whitespace as-raw nonempty-whitespace Text ]
+import = import-hashed [ whitespace as nonempty-whitespace Text ]
; NOTE: Every rule past this point should only reference rules that end with
; whitespace. This ensures consistent handling of whitespace in the absence of
; a separate lexing step.
-; The exception is the rules ending in -raw, which should _not_ end in whitespace.
+; The exception is the rules ending in , which should _not_ end in whitespace.
; This is important to avoid the need for sequential backtracking in application-expression.
expression =
@@ -542,33 +541,33 @@ expression = / annotated-expression
; "\(x : a) -> b"
-lambda-expression = lambda whitespace "(" whitespace label-raw whitespace ":" nonempty-whitespace expression ")" whitespace arrow whitespace expression
+lambda-expression = lambda whitespace "(" whitespace label whitespace ":" nonempty-whitespace expression ")" whitespace arrow whitespace expression
; "if a then b else c"
-ifthenelse-expression = if-raw nonempty-whitespace expression then-raw nonempty-whitespace expression else-raw nonempty-whitespace expression
+ifthenelse-expression = if nonempty-whitespace expression then nonempty-whitespace expression else nonempty-whitespace expression
; "let x : t = e1 in e2"
; "let x = e1 in e2"
; "let x = e1 let y = e2 in e3"
-let-expression = 1*let-binding in-raw nonempty-whitespace expression
-let-binding = let-raw nonempty-whitespace label-raw whitespace [ ":" nonempty-whitespace expression ] "=" whitespace expression
+let-expression = 1*let-binding in nonempty-whitespace expression
+let-binding = let nonempty-whitespace label whitespace [ ":" nonempty-whitespace expression ] "=" whitespace expression
; "forall (x : a) -> b"
-forall-expression = forall whitespace "(" whitespace label-raw whitespace ":" nonempty-whitespace expression ")" whitespace arrow whitespace expression
+forall-expression = forall whitespace "(" whitespace label whitespace ":" nonempty-whitespace expression ")" whitespace arrow whitespace expression
; "a -> b"
arrow-expression = operator-expression arrow whitespace expression
; "merge e1 e2 : t"
; "merge e1 e2"
-merge-expression = merge-raw nonempty-whitespace import-expression import-expression [ ":" nonempty-whitespace application-expression ]
+merge-expression = merge nonempty-whitespace import-expression whitespace import-expression whitespace [ ":" nonempty-whitespace application-expression ]
; "[] : List t"
; "[] : Optional t"
; "[x] : Optional t"
empty-list-or-optional = "[" whitespace (empty-collection / non-empty-optional)
-empty-collection = "]" whitespace ":" nonempty-whitespace (List whitespace / Optional whitespace) import-expression
-non-empty-optional = expression "]" whitespace ":" nonempty-whitespace Optional whitespace import-expression
+empty-collection = "]" whitespace ":" nonempty-whitespace (List whitespace / Optional whitespace) import-expression whitespace
+non-empty-optional = expression "]" whitespace ":" nonempty-whitespace Optional whitespace import-expression whitespace
; "x : t"
annotated-expression = operator-expression [ ":" nonempty-whitespace expression ]
@@ -593,12 +592,11 @@ not-equal-expression = application-expression *("!=" whitespace applic ; would be ambiguity: `./ab` could be interpreted as "import the file `./ab`",
; or "apply the import `./a` to label `b`"
application-expression =
- import-expression-raw *(nonempty-whitespace import-expression-raw) whitespace
+ import-expression *(nonempty-whitespace import-expression) whitespace
-import-expression = import-expression-raw whitespace
-import-expression-raw =
- import-raw
- / selector-expression-raw
+import-expression =
+ import
+ / selector-expression
; `record.field` extracts one field of a record
; `record.{ field0, field1, field2 }` projects out several fields of a record
@@ -607,48 +605,48 @@ import-expression-raw = ; can't tell from parsing just the period whether "foo." will become "foo.bar"
; (i.e. accessing field `bar` of the record `foo`) or `foo./bar` (i.e. applying
; the function `foo` to the relative path `./bar`)
-selector-expression-raw = primitive-expression-raw *(whitespace "." whitespace selector-raw)
+selector-expression = primitive-expression *(whitespace "." whitespace selector)
-selector-raw = any-label-raw / labels-raw
+selector = any-label / labels
-labels-raw = "{" whitespace [ any-label-raw whitespace *("," whitespace any-label-raw whitespace) ] "}"
+labels = "{" whitespace [ any-label whitespace *("," whitespace any-label whitespace) ] "}"
-primitive-expression-raw =
- literal-expression-raw
+primitive-expression =
+ literal-expression
/ "{" whitespace record-type-or-literal "}"
/ "<" whitespace union-type-or-literal ">"
- / non-empty-list-literal-raw
- / parenthesized-expression-raw
+ / non-empty-list-literal
+ / parenthesized-expression
; NOTE: Backtrack when parsing the first three alternatives (i.e. the numeric
; literals). This is because they share leading characters in common
-literal-expression-raw =
+literal-expression =
; "2.0"
- double-literal-raw
+ double-literal
; "2"
- / natural-literal-raw
+ / natural-literal
; "+2"
- / integer-literal-raw
+ / integer-literal
; "-Infinity"
/ minus-infinity-literal
; "Infinity"
/ plus-infinity-literal
; "NaN"
- / NaN-raw
+ / NaN
; '"ABC"'
- / text-literal-raw
+ / text-literal
; "x"
; "x@2"
- / identifier-raw
+ / identifier
-minus-infinity-literal = "-" Infinity-raw
-plus-infinity-literal = Infinity-raw
+minus-infinity-literal = "-" Infinity
+plus-infinity-literal = Infinity
; "{ foo = 1 , bar = True }"
; "{ foo : Integer, bar : Bool }"
@@ -659,11 +657,11 @@ record-type-or-literal = empty-record-literal = "=" whitespace
empty-record-type = ""
non-empty-record-type-or-literal =
- any-label-raw whitespace (non-empty-record-literal / non-empty-record-type)
+ any-label whitespace (non-empty-record-literal / non-empty-record-type)
non-empty-record-type = ":" nonempty-whitespace expression *("," whitespace record-type-entry)
-record-type-entry = any-label-raw whitespace ":" nonempty-whitespace expression
+record-type-entry = any-label whitespace ":" nonempty-whitespace expression
non-empty-record-literal = "=" whitespace expression *("," whitespace record-literal-entry)
-record-literal-entry = any-label-raw whitespace "=" whitespace expression
+record-literal-entry = any-label whitespace "=" whitespace expression
; "< Foo : Integer | Bar : Bool >"
; "< Foo : Integer | Bar = True >"
@@ -672,19 +670,19 @@ union-type-or-literal = / empty-union-type
empty-union-type = ""
non-empty-union-type-or-literal =
- any-label-raw whitespace
+ any-label whitespace
( "=" whitespace expression union-type-entries
/ ":" nonempty-whitespace expression [ "|" whitespace non-empty-union-type-or-literal ]
)
union-type-entries = *("|" whitespace union-type-entry)
-union-type-entry = any-label-raw whitespace ":" nonempty-whitespace expression
+union-type-entry = any-label whitespace ":" nonempty-whitespace expression
; "[1, 2, 3]"
; `empty-list-or-optional` handles empty lists
-non-empty-list-literal-raw = "[" whitespace expression *("," whitespace expression) "]"
+non-empty-list-literal = "[" whitespace expression *("," whitespace expression) "]"
; "( e )"
-parenthesized-expression-raw = "(" whitespace expression ")"
+parenthesized-expression = "(" whitespace expression ")"
; All expressions end with trailing whitespace. This just adds a final
diff --git a/dhall_parser/src/dhall.pest.visibility b/dhall_parser/src/dhall.pest.visibility index ae3fa84..ee5ea2b 100644 --- a/dhall_parser/src/dhall.pest.visibility +++ b/dhall_parser/src/dhall.pest.visibility @@ -20,27 +20,23 @@ end_of_line simple_label # quoted_label_char quoted_label -label_raw -# any_label_raw +label +# any_label double_quote_chunk double_quote_escaped double_quote_literal single_quote_continue single_quote_literal -# text_literal_raw -# if_raw -# then_raw -# else_raw -# let_raw -# in_raw -# as_raw -# using_raw -# merge_raw -missing_raw -# Optional_raw -Text_raw -# List_raw -# Infinity_raw +# text_literal +# if +# then +# else +# let +# in +# as +# using +# merge +missing # if_ # then # else_ @@ -49,6 +45,7 @@ Text_raw # as_ # using # merge +# Infinity Optional Text List @@ -68,16 +65,16 @@ List # colon # import_alt # open_parens -# close_parens_raw +# close_parens # close_parens # open_brace -# close_brace_raw +# close_brace # close_brace # open_bracket -# close_bracket_raw +# close_bracket # close_bracket # open_angle -# close_angle_raw +# close_angle # close_angle # combine # combine_types @@ -86,16 +83,15 @@ List # forall # arrow # exponent -double_literal_raw -natural_literal_raw -integer_literal_raw -identifier_raw +double_literal +natural_literal +integer_literal identifier # path_character # quoted_path_character path_component path -# local_raw +# local scheme http_raw authority @@ -117,14 +113,14 @@ fragment # unreserved # sub_delims http -env_raw +env bash_environment_variable posix_environment_variable # posix_environment_variable_character -import_type_raw -hash_raw -import_hashed_raw -import_raw +import_type +hash +import_hashed +import # expression lambda_expression ifthenelse_expression @@ -151,14 +147,12 @@ equal_expression not_equal_expression application_expression # atomic_expression -# atomic_expression_raw # import_expression -# import_expression_raw -selector_expression_raw -selector_raw -labels_raw -# primitive_expression_raw -literal_expression_raw +selector_expression +selector +labels +# primitive_expression +literal_expression # record_type_or_literal empty_record_literal empty_record_type @@ -168,6 +162,6 @@ non_empty_record_literal union_type_or_literal empty_union_type non_empty_union_type_or_literal -non_empty_list_literal_raw -# parenthesized_expression_raw +non_empty_list_literal +# parenthesized_expression # complete_expression |