1#![allow(clippy::redundant_closure_call, clippy::derive_partial_eq_without_eq)]23use std::rc::Rc;45use peg::parser;6mod expr;7pub use expr::*;8pub use jrsonnet_interner::IStr;9pub use peg;10mod location;11mod source;12mod unescape;13pub use location::CodeLocation;14pub use source::{15 Source, SourceDefaultIgnoreJpath, SourceDirectory, SourceFifo, SourceFile, SourcePath,16 SourcePathT, SourceVirtual,17};1819pub struct ParserSettings {20 pub source: Source,21}2223macro_rules! expr_bin {24 ($a:ident $op:ident $b:ident) => {25 Expr::BinaryOp($a, $op, $b)26 };27}28macro_rules! expr_un {29 ($op:ident $a:ident) => {30 Expr::UnaryOp($op, $a)31 };32}3334parser! {35 grammar jsonnet_parser() for str {36 use peg::ParseLiteral;3738 rule eof() = quiet!{![_]} / expected!("<eof>")39 rule eol() = "\n" / eof()4041 42 rule comment()43 = "//" (!eol()[_])* eol()44 / "/*" (!("*/")[_])* "*/"45 / "#" (!eol()[_])* eol()4647 rule single_whitespace() = quiet!{([' ' | '\r' | '\n' | '\t'] / comment())} / expected!("<whitespace>")48 rule _() = quiet!{([' ' | '\r' | '\n' | '\t']+) / comment()}* / expected!("<whitespace>")4950 51 rule comma() = quiet!{_ "," _} / expected!("<comma>")52 rule alpha() -> char = c:$(['_' | 'a'..='z' | 'A'..='Z']) {c.chars().next().unwrap()}53 rule digit() -> char = d:$(['0'..='9']) {d.chars().next().unwrap()}54 rule end_of_ident() = !['0'..='9' | '_' | 'a'..='z' | 'A'..='Z']55 56 rule uint_str() -> &'input str = a:$(digit()+ ("_" digit()+)*) { a }57 58 rule number() -> f64 = quiet!{a:$(uint_str() ("." uint_str())? (['e'|'E'] (s:['+'|'-'])? uint_str())?) {? a.replace("_","").parse().map_err(|_| "<number>") }} / expected!("<number>")5960 61 rule reserved() = ("assert" / "else" / "error" / "false" / "for" / "function" / "if" / "import" / "importstr" / "importbin" / "in" / "local" / "null" / "tailstrict" / "then" / "self" / "super" / "true") end_of_ident()62 rule id() -> IStr = v:$(quiet!{ !reserved() alpha() (alpha() / digit())*} / expected!("<identifier>")) { v.into() }6364 rule keyword(id: &'static str) -> ()65 = ##parse_string_literal(id) end_of_ident()6667 pub rule param(s: &ParserSettings) -> expr::Param = name:destruct(s) expr:(_ "=" _ expr:expr(s){expr})? { expr::Param(name, expr) }68 pub rule params(s: &ParserSettings) -> expr::ParamsDesc69 = params:param(s) ** comma() comma()? { expr::ParamsDesc(Rc::new(params)) }70 / { expr::ParamsDesc(Rc::new(Vec::new())) }7172 pub rule arg(s: &ParserSettings) -> (Option<IStr>, LocExpr)73 = name:(quiet! { (s:id() _ "=" !['='] _ {s})? } / expected!("<argument name>")) expr:expr(s) {(name, expr)}7475 pub rule args(s: &ParserSettings) -> expr::ArgsDesc76 = args:arg(s)**comma() comma()? {?77 let unnamed_count = args.iter().take_while(|(n, _)| n.is_none()).count();78 let mut unnamed = Vec::with_capacity(unnamed_count);79 let mut named = Vec::with_capacity(args.len() - unnamed_count);80 let mut named_started = false;81 for (name, value) in args {82 if let Some(name) = name {83 named_started = true;84 named.push((name, value));85 } else {86 if named_started {87 return Err("<named argument>")88 }89 unnamed.push(value);90 }91 }92 Ok(expr::ArgsDesc::new(unnamed, named))93 }9495 pub rule destruct_rest() -> expr::DestructRest96 = "..." into:(_ into:id() {into})? {if let Some(into) = into {97 expr::DestructRest::Keep(into)98 } else {expr::DestructRest::Drop}}99 pub rule destruct_array(s: &ParserSettings) -> expr::Destruct100 = "[" _ start:destruct(s)**comma() rest:(101 comma() _ rest:destruct_rest()? end:(102 comma() end:destruct(s)**comma() (_ comma())? {end}103 / comma()? {Vec::new()}104 ) {(rest, end)}105 / comma()? {(None, Vec::new())}106 ) _ "]" {?107 #[cfg(feature = "exp-destruct")] return Ok(expr::Destruct::Array {108 start,109 rest: rest.0,110 end: rest.1,111 });112 #[cfg(not(feature = "exp-destruct"))] Err("!!!experimental destructuring was not enabled")113 }114 pub rule destruct_object(s: &ParserSettings) -> expr::Destruct115 = "{" _116 fields:(name:id() into:(_ ":" _ into:destruct(s) {into})? default:(_ "=" _ v:expr(s) {v})? {(name, into, default)})**comma()117 rest:(118 comma() rest:destruct_rest()? {rest}119 / comma()? {None}120 )121 _ "}" {?122 #[cfg(feature = "exp-destruct")] return Ok(expr::Destruct::Object {123 fields,124 rest,125 });126 #[cfg(not(feature = "exp-destruct"))] Err("!!!experimental destructuring was not enabled")127 }128 pub rule destruct(s: &ParserSettings) -> expr::Destruct129 = v:id() {expr::Destruct::Full(v)}130 / "?" {?131 #[cfg(feature = "exp-destruct")] return Ok(expr::Destruct::Skip);132 #[cfg(not(feature = "exp-destruct"))] Err("!!!experimental destructuring was not enabled")133 }134 / arr:destruct_array(s) {arr}135 / obj:destruct_object(s) {obj}136137 pub rule bind(s: &ParserSettings) -> expr::BindSpec138 = into:destruct(s) _ "=" _ expr:expr(s) {expr::BindSpec::Field{into, value: expr}}139 / name:id() _ "(" _ params:params(s) _ ")" _ "=" _ expr:expr(s) {expr::BindSpec::Function{name, params, value: expr}}140141 pub rule assertion(s: &ParserSettings) -> expr::AssertStmt142 = keyword("assert") _ cond:expr(s) msg:(_ ":" _ e:expr(s) {e})? { expr::AssertStmt(cond, msg) }143144 pub rule whole_line() -> &'input str145 = str:$((!['\n'][_])* "\n") {str}146 pub rule string_block() -> String147 = "|||" chomped:"-"? (!['\n']single_whitespace())* "\n"148 empty_lines:$(['\n']*)149 prefix:[' ' | '\t']+ first_line:whole_line()150 lines:("\n" {"\n"} / [' ' | '\t']*<{prefix.len()}> s:whole_line() {s})*151 [' ' | '\t']*<, {prefix.len() - 1}> "|||"152 {153 let mut l = empty_lines.to_owned();154 l.push_str(first_line);155 l.extend(lines);156 if chomped.is_some() {157 debug_assert!(l.ends_with('\n'));158 l.truncate(l.len() - 1);159 }160 l161 }162163 rule hex_char()164 = quiet! { ['0'..='9' | 'a'..='f' | 'A'..='F'] } / expected!("<hex char>")165166 rule string_char(c: rule<()>)167 = (!['\\']!c()[_])+168 / "\\\\"169 / "\\u" hex_char() hex_char() hex_char() hex_char()170 / "\\x" hex_char() hex_char()171 / ['\\'] (quiet! { ['b' | 'f' | 'n' | 'r' | 't' | '"' | '\''] } / expected!("<escape character>"))172 pub rule string() -> String173 = ['"'] str:$(string_char(<"\"">)*) ['"'] {? unescape::unescape(str).ok_or("<escaped string>")}174 / ['\''] str:$(string_char(<"\'">)*) ['\''] {? unescape::unescape(str).ok_or("<escaped string>")}175 / quiet!{ "@'" str:$(("''" / (!['\''][_]))*) "'" {str.replace("''", "'")}176 / "@\"" str:$(("\"\"" / (!['"'][_]))*) "\"" {str.replace("\"\"", "\"")}177 / string_block() } / expected!("<string>")178179 pub rule field_name(s: &ParserSettings) -> expr::FieldName180 = name:id() {expr::FieldName::Fixed(name)}181 / name:string() {expr::FieldName::Fixed(name.into())}182 / "[" _ expr:expr(s) _ "]" {expr::FieldName::Dyn(expr)}183 pub rule visibility() -> expr::Visibility184 = ":::" {expr::Visibility::Unhide}185 / "::" {expr::Visibility::Hidden}186 / ":" {expr::Visibility::Normal}187 pub rule field(s: &ParserSettings) -> expr::FieldMember188 = name:field_name(s) _ plus:"+"? _ visibility:visibility() _ value:expr(s) {expr::FieldMember{189 name,190 plus: plus.is_some(),191 params: None,192 visibility,193 value,194 }}195 / name:field_name(s) _ "(" _ params:params(s) _ ")" _ visibility:visibility() _ value:expr(s) {expr::FieldMember{196 name,197 plus: false,198 params: Some(params),199 visibility,200 value,201 }}202 pub rule obj_local(s: &ParserSettings) -> BindSpec203 = keyword("local") _ bind:bind(s) {bind}204 pub rule member(s: &ParserSettings) -> expr::Member205 = bind:obj_local(s) {expr::Member::BindStmt(bind)}206 / assertion:assertion(s) {expr::Member::AssertStmt(assertion)}207 / field:field(s) {expr::Member::Field(field)}208 pub rule objinside(s: &ParserSettings) -> expr::ObjBody209 = pre_locals:(b: obj_local(s) comma() {b})* &"[" field:field(s) post_locals:(comma() b:obj_local(s) {b})* _ ("," _)? forspec:forspec(s) others:(_ rest:compspec(s) {rest})? {210 let mut compspecs = vec![CompSpec::ForSpec(forspec)];211 compspecs.extend(others.unwrap_or_default());212 expr::ObjBody::ObjComp(expr::ObjComp{213 pre_locals,214 field,215 post_locals,216 compspecs,217 })218 }219 / members:(member(s) ** comma()) comma()? {expr::ObjBody::MemberList(members)}220 pub rule ifspec(s: &ParserSettings) -> IfSpecData221 = keyword("if") _ expr:expr(s) {IfSpecData(expr)}222 pub rule forspec(s: &ParserSettings) -> ForSpecData223 = keyword("for") _ id:destruct(s) _ keyword("in") _ cond:expr(s) {ForSpecData(id, cond)}224 pub rule compspec(s: &ParserSettings) -> Vec<expr::CompSpec>225 = s:(i:ifspec(s) { expr::CompSpec::IfSpec(i) } / f:forspec(s) {expr::CompSpec::ForSpec(f)} ) ** _ {s}226 pub rule local_expr(s: &ParserSettings) -> Expr227 = keyword("local") _ binds:bind(s) ** comma() (_ ",")? _ ";" _ expr:expr(s) { Expr::LocalExpr(binds, expr) }228 pub rule string_expr(s: &ParserSettings) -> Expr229 = s:string() {Expr::Str(s.into())}230 pub rule obj_expr(s: &ParserSettings) -> Expr231 = "{" _ body:objinside(s) _ "}" {Expr::Obj(body)}232 pub rule array_expr(s: &ParserSettings) -> Expr233 = "[" _ elems:(expr(s) ** comma()) _ comma()? "]" {Expr::Arr(elems)}234 pub rule array_comp_expr(s: &ParserSettings) -> Expr235 = "[" _ expr:expr(s) _ comma()? _ forspec:forspec(s) _ others:(others: compspec(s) _ {others})? "]" {236 let mut specs = vec![CompSpec::ForSpec(forspec)];237 specs.extend(others.unwrap_or_default());238 Expr::ArrComp(expr, specs)239 }240 pub rule number_expr(s: &ParserSettings) -> Expr241 = n:number() {? if n.is_finite() {242 Ok(expr::Expr::Num(n))243 } else {244 Err("!!!numbers are finite")245 }}246 pub rule var_expr(s: &ParserSettings) -> Expr247 = n:id() { expr::Expr::Var(n) }248 pub rule id_loc(s: &ParserSettings) -> LocExpr249 = a:position!() n:id() b:position!() { LocExpr::new(expr::Expr::Str(n), Span(s.source.clone(), a as u32,b as u32)) }250 pub rule if_then_else_expr(s: &ParserSettings) -> Expr251 = cond:ifspec(s) _ keyword("then") _ cond_then:expr(s) cond_else:(_ keyword("else") _ e:expr(s) {e})? {Expr::IfElse{252 cond,253 cond_then,254 cond_else,255 }}256257 pub rule literal(s: &ParserSettings) -> Expr258 = v:(259 keyword("null") {LiteralType::Null}260 / keyword("true") {LiteralType::True}261 / keyword("false") {LiteralType::False}262 / keyword("self") {LiteralType::This}263 / keyword("$") {LiteralType::Dollar}264 / keyword("super") {LiteralType::Super}265 ) {Expr::Literal(v)}266267 pub rule expr_basic(s: &ParserSettings) -> Expr268 = literal(s)269270 / string_expr(s) / number_expr(s)271 / array_expr(s)272 / obj_expr(s)273 / array_expr(s)274 / array_comp_expr(s)275276 / keyword("importstr") _ path:expr(s) {Expr::ImportStr(path)}277 / keyword("importbin") _ path:expr(s) {Expr::ImportBin(path)}278 / keyword("import") _ path:expr(s) {Expr::Import(path)}279280 / var_expr(s)281 / local_expr(s)282 / if_then_else_expr(s)283284 / keyword("function") _ "(" _ params:params(s) _ ")" _ expr:expr(s) {Expr::Function(params, expr)}285 / assertion:assertion(s) _ ";" _ expr:expr(s) { Expr::AssertExpr(assertion, expr) }286287 / keyword("error") _ expr:expr(s) { Expr::ErrorStmt(expr) }288289 rule slice_part(s: &ParserSettings) -> Option<LocExpr>290 = _ e:(e:expr(s) _{e})? {e}291 pub rule slice_desc(s: &ParserSettings) -> SliceDesc292 = start:slice_part(s) ":" pair:(end:slice_part(s) step:(":" e:slice_part(s){e})? {(end, step.flatten())})? {293 let (end, step) = if let Some((end, step)) = pair {294 (end, step)295 }else{296 (None, None)297 };298299 SliceDesc { start, end, step }300 }301302 rule binop(x: rule<()>) -> ()303 = quiet!{ x() } / expected!("<binary op>")304 rule unaryop(x: rule<()>) -> ()305 = quiet!{ x() } / expected!("<unary op>")306307 rule ensure_null_coaelse()308 = "" {?309 #[cfg(not(feature = "exp-null-coaelse"))] return Err("!!!experimental null coaelscing was not enabled");310 #[cfg(feature = "exp-null-coaelse")] Ok(())311 }312 use BinaryOpType::*;313 use UnaryOpType::*;314 rule expr(s: &ParserSettings) -> LocExpr315 = precedence! {316 "(" _ e:expr(s) _ ")" {e}317 start:position!() v:@ end:position!() { LocExpr::new(v, Span(s.source.clone(), start as u32, end as u32)) }318 --319 a:(@) _ binop(<"||">) _ b:@ {expr_bin!(a Or b)}320 a:(@) _ binop(<"??">) _ ensure_null_coaelse() b:@ {321 #[cfg(feature = "exp-null-coaelse")] return expr_bin!(a NullCoaelse b);322 unreachable!("ensure_null_coaelse will fail if feature is not enabled")323 }324 --325 a:(@) _ binop(<"&&">) _ b:@ {expr_bin!(a And b)}326 --327 a:(@) _ binop(<"|">) _ b:@ {expr_bin!(a BitOr b)}328 --329 a:@ _ binop(<"^">) _ b:(@) {expr_bin!(a BitXor b)}330 --331 a:(@) _ binop(<"&">) _ b:@ {expr_bin!(a BitAnd b)}332 --333 a:(@) _ binop(<"==">) _ b:@ {expr_bin!(a Eq b)}334 a:(@) _ binop(<"!=">) _ b:@ {expr_bin!(a Neq b)}335 --336 a:(@) _ binop(<"<">) _ b:@ {expr_bin!(a Lt b)}337 a:(@) _ binop(<">">) _ b:@ {expr_bin!(a Gt b)}338 a:(@) _ binop(<"<=">) _ b:@ {expr_bin!(a Lte b)}339 a:(@) _ binop(<">=">) _ b:@ {expr_bin!(a Gte b)}340 a:(@) _ binop(<keyword("in")>) _ b:@ {expr_bin!(a In b)}341 --342 a:(@) _ binop(<"<<">) _ b:@ {expr_bin!(a Lhs b)}343 a:(@) _ binop(<">>">) _ b:@ {expr_bin!(a Rhs b)}344 --345 a:(@) _ binop(<"+">) _ b:@ {expr_bin!(a Add b)}346 a:(@) _ binop(<"-">) _ b:@ {expr_bin!(a Sub b)}347 --348 a:(@) _ binop(<"*">) _ b:@ {expr_bin!(a Mul b)}349 a:(@) _ binop(<"/">) _ b:@ {expr_bin!(a Div b)}350 a:(@) _ binop(<"%">) _ b:@ {expr_bin!(a Mod b)}351 --352 unaryop(<"+">) _ b:@ {expr_un!(Plus b)}353 unaryop(<"-">) _ b:@ {expr_un!(Minus b)}354 unaryop(<"!">) _ b:@ {expr_un!(Not b)}355 unaryop(<"~">) _ b:@ {expr_un!(BitNot b)}356 --357 a:(@) _ "[" _ e:slice_desc(s) _ "]" {Expr::Slice(a, e)}358 indexable:(@) _ parts:index_part(s)+ {Expr::Index{indexable, parts}}359 a:(@) _ "(" _ args:args(s) _ ")" ts:(_ keyword("tailstrict"))? {Expr::Apply(a, args, ts.is_some())}360 a:(@) _ "{" _ body:objinside(s) _ "}" {Expr::ObjExtend(a, body)}361 --362 e:expr_basic(s) {e}363 }364 pub rule index_part(s: &ParserSettings) -> IndexPart365 = n:("?" _ ensure_null_coaelse())? "." _ value:id_loc(s) {IndexPart {366 value,367 #[cfg(feature = "exp-null-coaelse")]368 null_coaelse: n.is_some(),369 }}370 / n:("?" _ "." _ ensure_null_coaelse())? "[" _ value:expr(s) _ "]" {IndexPart {371 value,372 #[cfg(feature = "exp-null-coaelse")]373 null_coaelse: n.is_some(),374 }}375376 pub rule jsonnet(s: &ParserSettings) -> LocExpr = _ e:expr(s) _ {e}377 }378}379380pub type ParseError = peg::error::ParseError<peg::str::LineCol>;381pub fn parse(str: &str, settings: &ParserSettings) -> Result<LocExpr, ParseError> {382 jsonnet_parser::jsonnet(str, settings)383}384385pub fn string_to_expr(str: IStr, settings: &ParserSettings) -> LocExpr {386 let len = str.len();387 LocExpr::new(Expr::Str(str), Span(settings.source.clone(), 0, len as u32))388}389390#[cfg(test)]391pub mod tests {392 use jrsonnet_interner::IStr;393 use BinaryOpType::*;394395 use super::{expr::*, parse};396 use crate::{source::Source, ParserSettings};397398 macro_rules! parse {399 ($s:expr) => {400 parse(401 $s,402 &ParserSettings {403 source: Source::new_virtual("<test>".into(), IStr::empty()),404 },405 )406 .unwrap()407 };408 }409410 macro_rules! el {411 ($expr:expr, $from:expr, $to:expr$(,)?) => {412 LocExpr::new(413 $expr,414 Span(415 Source::new_virtual("<test>".into(), IStr::empty()),416 $from,417 $to,418 ),419 )420 };421 }422423 #[test]424 fn multiline_string() {425 assert_eq!(426 parse!("|||\n Hello world!\n a\n|||"),427 el!(Expr::Str("Hello world!\n a\n".into()), 0, 31),428 );429 assert_eq!(430 parse!("|||\n Hello world!\n a\n|||"),431 el!(Expr::Str("Hello world!\n a\n".into()), 0, 27),432 );433 assert_eq!(434 parse!("|||\n\t\tHello world!\n\t\t\ta\n|||"),435 el!(Expr::Str("Hello world!\n\ta\n".into()), 0, 27),436 );437 assert_eq!(438 parse!("|||\n Hello world!\n a\n |||"),439 el!(Expr::Str("Hello world!\n a\n".into()), 0, 30),440 );441 }442443 #[test]444 fn slice() {445 parse!("a[1:]");446 parse!("a[1::]");447 parse!("a[:1:]");448 parse!("a[::1]");449 parse!("str[:len - 1]");450 }451452 #[test]453 fn string_escaping() {454 assert_eq!(455 parse!(r#""Hello, \"world\"!""#),456 el!(Expr::Str(r#"Hello, "world"!"#.into()), 0, 19),457 );458 assert_eq!(459 parse!(r#"'Hello \'world\'!'"#),460 el!(Expr::Str("Hello 'world'!".into()), 0, 18),461 );462 assert_eq!(parse!(r#"'\\\\'"#), el!(Expr::Str("\\\\".into()), 0, 6));463 }464465 #[test]466 fn string_unescaping() {467 assert_eq!(468 parse!(r#""Hello\nWorld""#),469 el!(Expr::Str("Hello\nWorld".into()), 0, 14),470 );471 }472473 #[test]474 fn string_verbantim() {475 assert_eq!(476 parse!(r#"@"Hello\n""World""""#),477 el!(Expr::Str("Hello\\n\"World\"".into()), 0, 19),478 );479 }480481 #[test]482 fn imports() {483 assert_eq!(484 parse!("import \"hello\""),485 el!(Expr::Import(el!(Expr::Str("hello".into()), 7, 14)), 0, 14),486 );487 assert_eq!(488 parse!("importstr \"garnish.txt\""),489 el!(490 Expr::ImportStr(el!(Expr::Str("garnish.txt".into()), 10, 23)),491 0,492 23493 )494 );495 assert_eq!(496 parse!("importbin \"garnish.bin\""),497 el!(498 Expr::ImportBin(el!(Expr::Str("garnish.bin".into()), 10, 23)),499 0,500 23501 )502 );503 }504505 #[test]506 fn empty_object() {507 assert_eq!(508 parse!("{}"),509 el!(Expr::Obj(ObjBody::MemberList(vec![])), 0, 2)510 );511 }512513 #[test]514 fn basic_math() {515 assert_eq!(516 parse!("2+2*2"),517 el!(518 Expr::BinaryOp(519 el!(Expr::Num(2.0), 0, 1),520 Add,521 el!(522 Expr::BinaryOp(el!(Expr::Num(2.0), 2, 3), Mul, el!(Expr::Num(2.0), 4, 5)),523 2,524 5525 )526 ),527 0,528 5529 )530 );531 }532533 #[test]534 fn basic_math_with_indents() {535 assert_eq!(536 parse!("2 + 2 * 2 "),537 el!(538 Expr::BinaryOp(539 el!(Expr::Num(2.0), 0, 1),540 Add,541 el!(542 Expr::BinaryOp(el!(Expr::Num(2.0), 7, 8), Mul, el!(Expr::Num(2.0), 13, 14),),543 7,544 14545 ),546 ),547 0,548 14549 )550 );551 }552553 #[test]554 fn basic_math_parened() {555 assert_eq!(556 parse!("2+(2+2*2)"),557 el!(558 Expr::BinaryOp(559 el!(Expr::Num(2.0), 0, 1),560 Add,561 el!(562 Expr::BinaryOp(563 el!(Expr::Num(2.0), 3, 4),564 Add,565 el!(566 Expr::BinaryOp(567 el!(Expr::Num(2.0), 5, 6),568 Mul,569 el!(Expr::Num(2.0), 7, 8),570 ),571 5,572 8573 ),574 ),575 3,576 8577 ),578 ),579 0,580 9581 )582 );583 }584585 586 #[test]587 fn comments() {588 assert_eq!(589 parse!("2//comment\n+//comment\n3/*test*/*/*test*/4"),590 el!(591 Expr::BinaryOp(592 el!(Expr::Num(2.0), 0, 1),593 Add,594 el!(595 Expr::BinaryOp(596 el!(Expr::Num(3.0), 22, 23),597 Mul,598 el!(Expr::Num(4.0), 40, 41)599 ),600 22,601 41602 )603 ),604 0,605 41606 )607 );608 }609610 #[test]611 fn suffix() {612 613 614 615 616 }617618 #[test]619 fn array_comp() {620 use Expr::*;621 622623624625 assert_eq!(626 parse!("[std.deepJoin(x) for x in arr]"),627 el!(628 ArrComp(629 el!(630 Apply(631 el!(632 Index {633 indexable: el!(Var("std".into()), 1, 4),634 parts: vec![IndexPart {635 value: el!(Str("deepJoin".into()), 5, 13),636 #[cfg(feature = "exp-null-coaelse")]637 null_coaelse: false,638 }],639 },640 1,641 13642 ),643 ArgsDesc::new(vec![el!(Var("x".into()), 14, 15)], vec![]),644 false,645 ),646 1,647 16648 ),649 vec![CompSpec::ForSpec(ForSpecData(650 Destruct::Full("x".into()),651 el!(Var("arr".into()), 26, 29)652 ))]653 ),654 0,655 30656 ),657 )658 }659660 #[test]661 fn reserved() {662 use Expr::*;663 assert_eq!(parse!("null"), el!(Literal(LiteralType::Null), 0, 4));664 assert_eq!(parse!("nulla"), el!(Var("nulla".into()), 0, 5));665 }666667 #[test]668 fn multiple_args_buf() {669 parse!("a(b, null_fields)");670 }671672 #[test]673 fn infix_precedence() {674 use Expr::*;675 assert_eq!(676 parse!("!a && !b"),677 el!(678 BinaryOp(679 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()), 1, 2)), 0, 2),680 And,681 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()), 7, 8)), 6, 8)682 ),683 0,684 8685 )686 );687 }688689 #[test]690 fn infix_precedence_division() {691 use Expr::*;692 assert_eq!(693 parse!("!a / !b"),694 el!(695 BinaryOp(696 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()), 1, 2)), 0, 2),697 Div,698 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()), 6, 7)), 5, 7)699 ),700 0,701 7702 )703 );704 }705706 #[test]707 fn double_negation() {708 use Expr::*;709 assert_eq!(710 parse!("!!a"),711 el!(712 UnaryOp(713 UnaryOpType::Not,714 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()), 2, 3)), 1, 3)715 ),716 0,717 3718 )719 )720 }721722 #[test]723 fn array_test_error() {724 parse!("[a for a in b if c for e in f]");725 726 }727728 #[test]729 fn missing_newline_between_comment_and_eof() {730 parse!(731 "{a:1}732733 //+213"734 );735 }736737 #[test]738 fn default_param_before_nondefault() {739 parse!("local x(foo = 'foo', bar) = null; null");740 }741742 #[test]743 fn add_location_info_to_all_sub_expressions() {744 use Expr::*;745746 let file_name = Source::new_virtual("<test>".into(), IStr::empty());747 let expr = parse(748 "{} { local x = 1, x: x } + {}",749 &ParserSettings { source: file_name },750 )751 .unwrap();752 assert_eq!(753 expr,754 el!(755 BinaryOp(756 el!(757 ObjExtend(758 el!(Obj(ObjBody::MemberList(vec![])), 0, 2),759 ObjBody::MemberList(vec![760 Member::BindStmt(BindSpec::Field {761 into: Destruct::Full("x".into()),762 value: el!(Num(1.0), 15, 16)763 }),764 Member::Field(FieldMember {765 name: FieldName::Fixed("x".into()),766 plus: false,767 params: None,768 visibility: Visibility::Normal,769 value: el!(Var("x".into()), 21, 22),770 })771 ])772 ),773 0,774 24775 ),776 BinaryOpType::Add,777 el!(Obj(ObjBody::MemberList(vec![])), 27, 29),778 ),779 0,780 29781 ),782 );783 }784}