#[cfg(test)]
mod test {
use clojure_reader::edn;
#[macro_export]
macro_rules! display {
($input:expr) => {
let edn = edn::read_string($input).unwrap();
assert_eq!($input, format!("{edn}"));
};
}
#[macro_export]
macro_rules! display_diff {
($expected:expr, $input:expr) => {
let edn = edn::read_string($input).unwrap();
assert_eq!($expected, format!("{edn}"));
};
}
#[test]
fn empty() {
display_diff!("nil", "");
display_diff!("nil", "#_42");
display!("[]");
display!("()");
display!("{}");
display!("#{}");
}
#[test]
fn chars() {
display!("[\\newline 1 \\return \\a \\space cat \\tab]");
}
#[test]
fn collections() {
#[cfg(feature = "floats")]
display_diff!("(42.42 -66 4/2)", "(42.42 -0x42 4/2)");
display_diff!("(-66 [false true] 4/2 \"space cat\")", "(-0x42 [false true] 4/2 \"space cat\")");
display_diff!("{:cat [1 2 3], :猫 \"cat\"}", "{:cat [1 2 3] :猫 \"cat\"}");
display_diff!("#{[1 2 3] :cat}", "#{:cat [1 2 3]}");
}
#[test]
#[cfg(feature = "arbitrary-nums")]
fn big_nums() {
display!("25631065767070977971462822130252989343291119843231829652358861549262445684189654378457649724823121375N");
display!("45533659404590722935254870489403960444959108372566386371357004239357270213019055901312414981294872683212749959873522868216826382578289817566392464917746662928109689171949217403409185837530932882624331531998632400815620054542713762280785035186327752072979942320295706796108096781665970065634683955918435131704895612661039843567687810536853204638619861042194225357509736803723290261076155277120119270233712439357368913371347215210502655654790616883402061480163224326969915678360740686578777470546892660441110005181166215376621505.4356433869379847093529339406319840574059236551822608991350048836535371M");
}
#[test]
fn tagged() {
display!("#inst \"1985-04-12T23:20:50.52Z\"");
display!("#uuid \"f81d4fae-7dec-11d0-a765-00a0c91e6bf6\"");
}
}