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::{Source, SourceDirectory, SourceFile, SourcePath, SourcePathT, SourceVirtual};1516pub struct ParserSettings {17 pub source: Source,18}1920macro_rules! expr_bin {21 ($a:ident $op:ident $b:ident) => {22 Expr::BinaryOp($a, $op, $b)23 };24}25macro_rules! expr_un {26 ($op:ident $a:ident) => {27 Expr::UnaryOp($op, $a)28 };29}3031parser! {32 grammar jsonnet_parser() for str {33 use peg::ParseLiteral;3435 rule eof() = quiet!{![_]} / expected!("<eof>")36 rule eol() = "\n" / eof()3738 39 rule comment()40 = "//" (!eol()[_])* eol()41 / "/*" ("\\*/" / "\\\\" / (!("*/")[_]))* "*/"42 / "#" (!eol()[_])* eol()4344 rule single_whitespace() = quiet!{([' ' | '\r' | '\n' | '\t'] / comment())} / expected!("<whitespace>")45 rule _() = quiet!{([' ' | '\r' | '\n' | '\t']+) / comment()}* / expected!("<whitespace>")4647 48 rule comma() = quiet!{_ "," _} / expected!("<comma>")49 rule alpha() -> char = c:$(['_' | 'a'..='z' | 'A'..='Z']) {c.chars().next().unwrap()}50 rule digit() -> char = d:$(['0'..='9']) {d.chars().next().unwrap()}51 rule end_of_ident() = !['0'..='9' | '_' | 'a'..='z' | 'A'..='Z']52 53 rule uint_str() -> &'input str = a:$(digit()+) { a }54 55 rule number() -> f64 = quiet!{a:$(uint_str() ("." uint_str())? (['e'|'E'] (s:['+'|'-'])? uint_str())?) {? a.parse().map_err(|_| "<number>") }} / expected!("<number>")5657 58 rule reserved() = ("assert" / "else" / "error" / "false" / "for" / "function" / "if" / "import" / "importstr" / "importbin" / "in" / "local" / "null" / "tailstrict" / "then" / "self" / "super" / "true") end_of_ident()59 rule id() -> IStr = v:$(quiet!{ !reserved() alpha() (alpha() / digit())*} / expected!("<identifier>")) { v.into() }6061 rule keyword(id: &'static str) -> ()62 = ##parse_string_literal(id) end_of_ident()6364 pub rule param(s: &ParserSettings) -> expr::Param = name:destruct(s) expr:(_ "=" _ expr:expr(s){expr})? { expr::Param(name, expr) }65 pub rule params(s: &ParserSettings) -> expr::ParamsDesc66 = params:param(s) ** comma() comma()? { expr::ParamsDesc(Rc::new(params)) }67 / { expr::ParamsDesc(Rc::new(Vec::new())) }6869 pub rule arg(s: &ParserSettings) -> (Option<IStr>, LocExpr)70 = name:(quiet! { (s:id() _ "=" !['='] _ {s})? } / expected!("<argument name>")) expr:expr(s) {(name, expr)}7172 pub rule args(s: &ParserSettings) -> expr::ArgsDesc73 = args:arg(s)**comma() comma()? {?74 let unnamed_count = args.iter().take_while(|(n, _)| n.is_none()).count();75 let mut unnamed = Vec::with_capacity(unnamed_count);76 let mut named = Vec::with_capacity(args.len() - unnamed_count);77 let mut named_started = false;78 for (name, value) in args {79 if let Some(name) = name {80 named_started = true;81 named.push((name, value));82 } else {83 if named_started {84 return Err("<named argument>")85 }86 unnamed.push(value);87 }88 }89 Ok(expr::ArgsDesc::new(unnamed, named))90 }9192 pub rule destruct_rest() -> expr::DestructRest93 = "..." into:(_ into:id() {into})? {if let Some(into) = into {94 expr::DestructRest::Keep(into)95 } else {expr::DestructRest::Drop}}96 pub rule destruct_array(s: &ParserSettings) -> expr::Destruct97 = "[" _ start:destruct(s)**comma() rest:(98 comma() _ rest:destruct_rest()? end:(99 comma() end:destruct(s)**comma() (_ comma())? {end}100 / comma()? {Vec::new()}101 ) {(rest, end)}102 / comma()? {(None, Vec::new())}103 ) _ "]" {?104 #[cfg(feature = "exp-destruct")] return Ok(expr::Destruct::Array {105 start,106 rest: rest.0,107 end: rest.1,108 });109 #[cfg(not(feature = "exp-destruct"))] Err("!!!experimental destructuring was not enabled")110 }111 pub rule destruct_object(s: &ParserSettings) -> expr::Destruct112 = "{" _113 fields:(name:id() into:(_ ":" _ into:destruct(s) {into})? default:(_ "=" _ v:expr(s) {v})? {(name, into, default)})**comma()114 rest:(115 comma() rest:destruct_rest()? {rest}116 / comma()? {None}117 )118 _ "}" {?119 #[cfg(feature = "exp-destruct")] return Ok(expr::Destruct::Object {120 fields,121 rest,122 });123 #[cfg(not(feature = "exp-destruct"))] Err("!!!experimental destructuring was not enabled")124 }125 pub rule destruct(s: &ParserSettings) -> expr::Destruct126 = v:id() {expr::Destruct::Full(v)}127 / "?" {?128 #[cfg(feature = "exp-destruct")] return Ok(expr::Destruct::Skip);129 #[cfg(not(feature = "exp-destruct"))] Err("!!!experimental destructuring was not enabled")130 }131 / arr:destruct_array(s) {arr}132 / obj:destruct_object(s) {obj}133134 pub rule bind(s: &ParserSettings) -> expr::BindSpec135 = into:destruct(s) _ "=" _ expr:expr(s) {expr::BindSpec::Field{into, value: expr}}136 / name:id() _ "(" _ params:params(s) _ ")" _ "=" _ expr:expr(s) {expr::BindSpec::Function{name, params, value: expr}}137138 pub rule assertion(s: &ParserSettings) -> expr::AssertStmt139 = keyword("assert") _ cond:expr(s) msg:(_ ":" _ e:expr(s) {e})? { expr::AssertStmt(cond, msg) }140141 pub rule whole_line() -> &'input str142 = str:$((!['\n'][_])* "\n") {str}143 pub rule string_block() -> String144 = "|||" (!['\n']single_whitespace())* "\n"145 empty_lines:$(['\n']*)146 prefix:[' ' | '\t']+ first_line:whole_line()147 lines:("\n" {"\n"} / [' ' | '\t']*<{prefix.len()}> s:whole_line() {s})*148 [' ' | '\t']*<, {prefix.len() - 1}> "|||"149 {let mut l = empty_lines.to_owned(); l.push_str(first_line); l.extend(lines); l}150151 rule hex_char()152 = quiet! { ['0'..='9' | 'a'..='f' | 'A'..='F'] } / expected!("<hex char>")153154 rule string_char(c: rule<()>)155 = (!['\\']!c()[_])+156 / "\\\\"157 / "\\u" hex_char() hex_char() hex_char() hex_char()158 / "\\x" hex_char() hex_char()159 / ['\\'] (quiet! { ['b' | 'f' | 'n' | 'r' | 't' | '"' | '\''] } / expected!("<escape character>"))160 pub rule string() -> String161 = ['"'] str:$(string_char(<"\"">)*) ['"'] {? unescape::unescape(str).ok_or("<escaped string>")}162 / ['\''] str:$(string_char(<"\'">)*) ['\''] {? unescape::unescape(str).ok_or("<escaped string>")}163 / quiet!{ "@'" str:$(("''" / (!['\''][_]))*) "'" {str.replace("''", "'")}164 / "@\"" str:$(("\"\"" / (!['"'][_]))*) "\"" {str.replace("\"\"", "\"")}165 / string_block() } / expected!("<string>")166167 pub rule field_name(s: &ParserSettings) -> expr::FieldName168 = name:id() {expr::FieldName::Fixed(name)}169 / name:string() {expr::FieldName::Fixed(name.into())}170 / "[" _ expr:expr(s) _ "]" {expr::FieldName::Dyn(expr)}171 pub rule visibility() -> expr::Visibility172 = ":::" {expr::Visibility::Unhide}173 / "::" {expr::Visibility::Hidden}174 / ":" {expr::Visibility::Normal}175 pub rule field(s: &ParserSettings) -> expr::FieldMember176 = name:field_name(s) _ plus:"+"? _ visibility:visibility() _ value:expr(s) {expr::FieldMember{177 name,178 plus: plus.is_some(),179 params: None,180 visibility,181 value,182 }}183 / name:field_name(s) _ "(" _ params:params(s) _ ")" _ visibility:visibility() _ value:expr(s) {expr::FieldMember{184 name,185 plus: false,186 params: Some(params),187 visibility,188 value,189 }}190 pub rule obj_local(s: &ParserSettings) -> BindSpec191 = keyword("local") _ bind:bind(s) {bind}192 pub rule member(s: &ParserSettings) -> expr::Member193 = bind:obj_local(s) {expr::Member::BindStmt(bind)}194 / assertion:assertion(s) {expr::Member::AssertStmt(assertion)}195 / field:field(s) {expr::Member::Field(field)}196 pub rule objinside(s: &ParserSettings) -> expr::ObjBody197 = 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})? {198 let mut compspecs = vec![CompSpec::ForSpec(forspec)];199 compspecs.extend(others.unwrap_or_default());200 expr::ObjBody::ObjComp(expr::ObjComp{201 pre_locals,202 field,203 post_locals,204 compspecs,205 })206 }207 / members:(member(s) ** comma()) comma()? {expr::ObjBody::MemberList(members)}208 pub rule ifspec(s: &ParserSettings) -> IfSpecData209 = keyword("if") _ expr:expr(s) {IfSpecData(expr)}210 pub rule forspec(s: &ParserSettings) -> ForSpecData211 = keyword("for") _ id:destruct(s) _ keyword("in") _ cond:expr(s) {ForSpecData(id, cond)}212 pub rule compspec(s: &ParserSettings) -> Vec<expr::CompSpec>213 = s:(i:ifspec(s) { expr::CompSpec::IfSpec(i) } / f:forspec(s) {expr::CompSpec::ForSpec(f)} ) ** _ {s}214 pub rule local_expr(s: &ParserSettings) -> Expr215 = keyword("local") _ binds:bind(s) ** comma() (_ ",")? _ ";" _ expr:expr(s) { Expr::LocalExpr(binds, expr) }216 pub rule string_expr(s: &ParserSettings) -> Expr217 = s:string() {Expr::Str(s.into())}218 pub rule obj_expr(s: &ParserSettings) -> Expr219 = "{" _ body:objinside(s) _ "}" {Expr::Obj(body)}220 pub rule array_expr(s: &ParserSettings) -> Expr221 = "[" _ elems:(expr(s) ** comma()) _ comma()? "]" {Expr::Arr(elems)}222 pub rule array_comp_expr(s: &ParserSettings) -> Expr223 = "[" _ expr:expr(s) _ comma()? _ forspec:forspec(s) _ others:(others: compspec(s) _ {others})? "]" {224 let mut specs = vec![CompSpec::ForSpec(forspec)];225 specs.extend(others.unwrap_or_default());226 Expr::ArrComp(expr, specs)227 }228 pub rule number_expr(s: &ParserSettings) -> Expr229 = n:number() { expr::Expr::Num(n) }230 pub rule var_expr(s: &ParserSettings) -> Expr231 = n:id() { expr::Expr::Var(n) }232 pub rule id_loc(s: &ParserSettings) -> LocExpr233 = a:position!() n:id() b:position!() { LocExpr(Rc::new(expr::Expr::Str(n)), ExprLocation(s.source.clone(), a as u32,b as u32)) }234 pub rule if_then_else_expr(s: &ParserSettings) -> Expr235 = cond:ifspec(s) _ keyword("then") _ cond_then:expr(s) cond_else:(_ keyword("else") _ e:expr(s) {e})? {Expr::IfElse{236 cond,237 cond_then,238 cond_else,239 }}240241 pub rule literal(s: &ParserSettings) -> Expr242 = v:(243 keyword("null") {LiteralType::Null}244 / keyword("true") {LiteralType::True}245 / keyword("false") {LiteralType::False}246 / keyword("self") {LiteralType::This}247 / keyword("$") {LiteralType::Dollar}248 / keyword("super") {LiteralType::Super}249 ) {Expr::Literal(v)}250251 pub rule expr_basic(s: &ParserSettings) -> Expr252 = literal(s)253254 / string_expr(s) / number_expr(s)255 / array_expr(s)256 / obj_expr(s)257 / array_expr(s)258 / array_comp_expr(s)259260 / keyword("importstr") _ path:expr(s) {Expr::ImportStr(path)}261 / keyword("importbin") _ path:expr(s) {Expr::ImportBin(path)}262 / keyword("import") _ path:expr(s) {Expr::Import(path)}263264 / var_expr(s)265 / local_expr(s)266 / if_then_else_expr(s)267268 / keyword("function") _ "(" _ params:params(s) _ ")" _ expr:expr(s) {Expr::Function(params, expr)}269 / assertion:assertion(s) _ ";" _ expr:expr(s) { Expr::AssertExpr(assertion, expr) }270271 / keyword("error") _ expr:expr(s) { Expr::ErrorStmt(expr) }272273 rule slice_part(s: &ParserSettings) -> Option<LocExpr>274 = _ e:(e:expr(s) _{e})? {e}275 pub rule slice_desc(s: &ParserSettings) -> SliceDesc276 = start:slice_part(s) ":" pair:(end:slice_part(s) step:(":" e:slice_part(s){e})? {(end, step.flatten())})? {277 let (end, step) = if let Some((end, step)) = pair {278 (end, step)279 }else{280 (None, None)281 };282283 SliceDesc { start, end, step }284 }285286 rule binop(x: rule<()>) -> ()287 = quiet!{ x() } / expected!("<binary op>")288 rule unaryop(x: rule<()>) -> ()289 = quiet!{ x() } / expected!("<unary op>")290291 rule ensure_null_coaelse()292 = "" {?293 #[cfg(not(feature = "exp-null-coaelse"))] return Err("!!!experimental null coaelscing was not enabled");294 #[cfg(feature = "exp-null-coaelse")] Ok(())295 }296 use BinaryOpType::*;297 use UnaryOpType::*;298 rule expr(s: &ParserSettings) -> LocExpr299 = precedence! {300 start:position!() v:@ end:position!() { LocExpr(Rc::new(v), ExprLocation(s.source.clone(), start as u32, end as u32)) }301 --302 a:(@) _ binop(<"||">) _ b:@ {expr_bin!(a Or b)}303 a:(@) _ binop(<"??">) _ ensure_null_coaelse() b:@ {304 #[cfg(feature = "exp-null-coaelse")] return expr_bin!(a NullCoaelse b);305 unreachable!("ensure_null_coaelse will fail if feature is not enabled")306 }307 --308 a:(@) _ binop(<"&&">) _ b:@ {expr_bin!(a And b)}309 --310 a:(@) _ binop(<"|">) _ b:@ {expr_bin!(a BitOr b)}311 --312 a:@ _ binop(<"^">) _ b:(@) {expr_bin!(a BitXor b)}313 --314 a:(@) _ binop(<"&">) _ b:@ {expr_bin!(a BitAnd b)}315 --316 a:(@) _ binop(<"==">) _ b:@ {expr_bin!(a Eq b)}317 a:(@) _ binop(<"!=">) _ b:@ {expr_bin!(a Neq b)}318 --319 a:(@) _ binop(<"<">) _ b:@ {expr_bin!(a Lt b)}320 a:(@) _ binop(<">">) _ b:@ {expr_bin!(a Gt b)}321 a:(@) _ binop(<"<=">) _ b:@ {expr_bin!(a Lte b)}322 a:(@) _ binop(<">=">) _ b:@ {expr_bin!(a Gte b)}323 a:(@) _ binop(<keyword("in")>) _ b:@ {expr_bin!(a In b)}324 --325 a:(@) _ binop(<"<<">) _ b:@ {expr_bin!(a Lhs b)}326 a:(@) _ binop(<">>">) _ b:@ {expr_bin!(a Rhs b)}327 --328 a:(@) _ binop(<"+">) _ b:@ {expr_bin!(a Add b)}329 a:(@) _ binop(<"-">) _ b:@ {expr_bin!(a Sub b)}330 --331 a:(@) _ binop(<"*">) _ b:@ {expr_bin!(a Mul b)}332 a:(@) _ binop(<"/">) _ b:@ {expr_bin!(a Div b)}333 a:(@) _ binop(<"%">) _ b:@ {expr_bin!(a Mod b)}334 --335 unaryop(<"+">) _ b:@ {expr_un!(Plus b)}336 unaryop(<"-">) _ b:@ {expr_un!(Minus b)}337 unaryop(<"!">) _ b:@ {expr_un!(Not b)}338 unaryop(<"~">) _ b:@ {expr_un!(BitNot b)}339 --340 a:(@) _ "[" _ e:slice_desc(s) _ "]" {Expr::Slice(a, e)}341 indexable:(@) _ parts:index_part(s)+ {Expr::Index{indexable, parts}}342 a:(@) _ "(" _ args:args(s) _ ")" ts:(_ keyword("tailstrict"))? {Expr::Apply(a, args, ts.is_some())}343 a:(@) _ "{" _ body:objinside(s) _ "}" {Expr::ObjExtend(a, body)}344 --345 e:expr_basic(s) {e}346 "(" _ e:expr(s) _ ")" {Expr::Parened(e)}347 }348 pub rule index_part(s: &ParserSettings) -> IndexPart349 = n:("?" _ ensure_null_coaelse())? "." _ value:id_loc(s) {IndexPart {350 value,351 #[cfg(feature = "exp-null-coaelse")]352 null_coaelse: n.is_some(),353 }}354 / n:("?" _ "." _ ensure_null_coaelse())? "[" _ value:expr(s) _ "]" {IndexPart {355 value,356 #[cfg(feature = "exp-null-coaelse")]357 null_coaelse: n.is_some(),358 }}359360 pub rule jsonnet(s: &ParserSettings) -> LocExpr = _ e:expr(s) _ {e}361 }362}363364pub type ParseError = peg::error::ParseError<peg::str::LineCol>;365pub fn parse(str: &str, settings: &ParserSettings) -> Result<LocExpr, ParseError> {366 jsonnet_parser::jsonnet(str, settings)367}368369pub fn string_to_expr(str: IStr, settings: &ParserSettings) -> LocExpr {370 let len = str.len();371 LocExpr(372 Rc::new(Expr::Str(str)),373 ExprLocation(settings.source.clone(), 0, len as u32),374 )375}376377#[cfg(test)]378pub mod tests {379 use jrsonnet_interner::IStr;380 use BinaryOpType::*;381382 use super::{expr::*, parse};383 use crate::{source::Source, ParserSettings};384385 macro_rules! parse {386 ($s:expr) => {387 parse(388 $s,389 &ParserSettings {390 source: Source::new_virtual("<test>".into(), IStr::empty()),391 },392 )393 .unwrap()394 };395 }396397 macro_rules! el {398 ($expr:expr, $from:expr, $to:expr$(,)?) => {399 LocExpr(400 std::rc::Rc::new($expr),401 ExprLocation(402 Source::new_virtual("<test>".into(), IStr::empty()),403 $from,404 $to,405 ),406 )407 };408 }409410 #[test]411 fn multiline_string() {412 assert_eq!(413 parse!("|||\n Hello world!\n a\n|||"),414 el!(Expr::Str("Hello world!\n a\n".into()), 0, 31),415 );416 assert_eq!(417 parse!("|||\n Hello world!\n a\n|||"),418 el!(Expr::Str("Hello world!\n a\n".into()), 0, 27),419 );420 assert_eq!(421 parse!("|||\n\t\tHello world!\n\t\t\ta\n|||"),422 el!(Expr::Str("Hello world!\n\ta\n".into()), 0, 27),423 );424 assert_eq!(425 parse!("|||\n Hello world!\n a\n |||"),426 el!(Expr::Str("Hello world!\n a\n".into()), 0, 30),427 );428 }429430 #[test]431 fn slice() {432 parse!("a[1:]");433 parse!("a[1::]");434 parse!("a[:1:]");435 parse!("a[::1]");436 parse!("str[:len - 1]");437 }438439 #[test]440 fn string_escaping() {441 assert_eq!(442 parse!(r#""Hello, \"world\"!""#),443 el!(Expr::Str(r#"Hello, "world"!"#.into()), 0, 19),444 );445 assert_eq!(446 parse!(r#"'Hello \'world\'!'"#),447 el!(Expr::Str("Hello 'world'!".into()), 0, 18),448 );449 assert_eq!(parse!(r#"'\\\\'"#), el!(Expr::Str("\\\\".into()), 0, 6));450 }451452 #[test]453 fn string_unescaping() {454 assert_eq!(455 parse!(r#""Hello\nWorld""#),456 el!(Expr::Str("Hello\nWorld".into()), 0, 14),457 );458 }459460 #[test]461 fn string_verbantim() {462 assert_eq!(463 parse!(r#"@"Hello\n""World""""#),464 el!(Expr::Str("Hello\\n\"World\"".into()), 0, 19),465 );466 }467468 #[test]469 fn imports() {470 assert_eq!(471 parse!("import \"hello\""),472 el!(Expr::Import(el!(Expr::Str("hello".into()), 7, 14)), 0, 14),473 );474 assert_eq!(475 parse!("importstr \"garnish.txt\""),476 el!(477 Expr::ImportStr(el!(Expr::Str("garnish.txt".into()), 10, 23)),478 0,479 23480 )481 );482 assert_eq!(483 parse!("importbin \"garnish.bin\""),484 el!(485 Expr::ImportBin(el!(Expr::Str("garnish.bin".into()), 10, 23)),486 0,487 23488 )489 );490 }491492 #[test]493 fn empty_object() {494 assert_eq!(495 parse!("{}"),496 el!(Expr::Obj(ObjBody::MemberList(vec![])), 0, 2)497 );498 }499500 #[test]501 fn basic_math() {502 assert_eq!(503 parse!("2+2*2"),504 el!(505 Expr::BinaryOp(506 el!(Expr::Num(2.0), 0, 1),507 Add,508 el!(509 Expr::BinaryOp(el!(Expr::Num(2.0), 2, 3), Mul, el!(Expr::Num(2.0), 4, 5)),510 2,511 5512 )513 ),514 0,515 5516 )517 );518 }519520 #[test]521 fn basic_math_with_indents() {522 assert_eq!(523 parse!("2 + 2 * 2 "),524 el!(525 Expr::BinaryOp(526 el!(Expr::Num(2.0), 0, 1),527 Add,528 el!(529 Expr::BinaryOp(el!(Expr::Num(2.0), 7, 8), Mul, el!(Expr::Num(2.0), 13, 14),),530 7,531 14532 ),533 ),534 0,535 14536 )537 );538 }539540 #[test]541 fn basic_math_parened() {542 assert_eq!(543 parse!("2+(2+2*2)"),544 el!(545 Expr::BinaryOp(546 el!(Expr::Num(2.0), 0, 1),547 Add,548 el!(549 Expr::Parened(el!(550 Expr::BinaryOp(551 el!(Expr::Num(2.0), 3, 4),552 Add,553 el!(554 Expr::BinaryOp(555 el!(Expr::Num(2.0), 5, 6),556 Mul,557 el!(Expr::Num(2.0), 7, 8),558 ),559 5,560 8561 ),562 ),563 3,564 8565 )),566 2,567 9568 ),569 ),570 0,571 9572 )573 );574 }575576 577 #[test]578 fn comments() {579 assert_eq!(580 parse!("2//comment\n+//comment\n3/*test*/*/*test*/4"),581 el!(582 Expr::BinaryOp(583 el!(Expr::Num(2.0), 0, 1),584 Add,585 el!(586 Expr::BinaryOp(587 el!(Expr::Num(3.0), 22, 23),588 Mul,589 el!(Expr::Num(4.0), 40, 41)590 ),591 22,592 41593 )594 ),595 0,596 41597 )598 );599 }600601 602 #[test]603 fn comment_escaping() {604 assert_eq!(605 parse!("2/*\\*/+*/ - 22"),606 el!(607 Expr::BinaryOp(el!(Expr::Num(2.0), 0, 1), Sub, el!(Expr::Num(22.0), 12, 14)),608 0,609 14610 )611 );612 }613614 #[test]615 fn suffix() {616 617 618 619 620 }621622 #[test]623 fn array_comp() {624 use Expr::*;625 626627628629 assert_eq!(630 parse!("[std.deepJoin(x) for x in arr]"),631 el!(632 ArrComp(633 el!(634 Apply(635 el!(636 Index {637 indexable: el!(Var("std".into()), 1, 4),638 parts: vec![IndexPart {639 value: el!(Str("deepJoin".into()), 5, 13),640 #[cfg(feature = "exp-null-coaelse")]641 null_coaelse: false,642 }],643 },644 1,645 13646 ),647 ArgsDesc::new(vec![el!(Var("x".into()), 14, 15)], vec![]),648 false,649 ),650 1,651 16652 ),653 vec![CompSpec::ForSpec(ForSpecData(654 Destruct::Full("x".into()),655 el!(Var("arr".into()), 26, 29)656 ))]657 ),658 0,659 30660 ),661 )662 }663664 #[test]665 fn reserved() {666 use Expr::*;667 assert_eq!(parse!("null"), el!(Literal(LiteralType::Null), 0, 4));668 assert_eq!(parse!("nulla"), el!(Var("nulla".into()), 0, 5));669 }670671 #[test]672 fn multiple_args_buf() {673 parse!("a(b, null_fields)");674 }675676 #[test]677 fn infix_precedence() {678 use Expr::*;679 assert_eq!(680 parse!("!a && !b"),681 el!(682 BinaryOp(683 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()), 1, 2)), 0, 2),684 And,685 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()), 7, 8)), 6, 8)686 ),687 0,688 8689 )690 );691 }692693 #[test]694 fn infix_precedence_division() {695 use Expr::*;696 assert_eq!(697 parse!("!a / !b"),698 el!(699 BinaryOp(700 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()), 1, 2)), 0, 2),701 Div,702 el!(UnaryOp(UnaryOpType::Not, el!(Var("b".into()), 6, 7)), 5, 7)703 ),704 0,705 7706 )707 );708 }709710 #[test]711 fn double_negation() {712 use Expr::*;713 assert_eq!(714 parse!("!!a"),715 el!(716 UnaryOp(717 UnaryOpType::Not,718 el!(UnaryOp(UnaryOpType::Not, el!(Var("a".into()), 2, 3)), 1, 3)719 ),720 0,721 3722 )723 )724 }725726 #[test]727 fn array_test_error() {728 parse!("[a for a in b if c for e in f]");729 730 }731732 #[test]733 fn missing_newline_between_comment_and_eof() {734 parse!(735 "{a:1}736737 //+213"738 );739 }740741 #[test]742 fn default_param_before_nondefault() {743 parse!("local x(foo = 'foo', bar) = null; null");744 }745746 #[test]747 fn add_location_info_to_all_sub_expressions() {748 use Expr::*;749750 let file_name = Source::new_virtual("<test>".into(), IStr::empty());751 let expr = parse(752 "{} { local x = 1, x: x } + {}",753 &ParserSettings { source: file_name },754 )755 .unwrap();756 assert_eq!(757 expr,758 el!(759 BinaryOp(760 el!(761 ObjExtend(762 el!(Obj(ObjBody::MemberList(vec![])), 0, 2),763 ObjBody::MemberList(vec![764 Member::BindStmt(BindSpec::Field {765 into: Destruct::Full("x".into()),766 value: el!(Num(1.0), 15, 16)767 }),768 Member::Field(FieldMember {769 name: FieldName::Fixed("x".into()),770 plus: false,771 params: None,772 visibility: Visibility::Normal,773 value: el!(Var("x".into()), 21, 22),774 })775 ])776 ),777 0,778 24779 ),780 BinaryOpType::Add,781 el!(Obj(ObjBody::MemberList(vec![])), 27, 29),782 ),783 0,784 29785 ),786 );787 }788}