From e460ceaf489c7ef4dd095539a2c5df3942796032 Mon Sep 17 00:00:00 2001 From: unspeaker Date: Fri, 10 Jan 2025 19:45:13 +0100 Subject: [PATCH] repro align bug --- tek/examples/edn.rs | 1 + tek/examples/edn11.edn | 26 ++++++++++---------------- tek/examples/edn12.edn | 11 +++++++++++ 3 files changed, 22 insertions(+), 16 deletions(-) create mode 100644 tek/examples/edn12.edn diff --git a/tek/examples/edn.rs b/tek/examples/edn.rs index edca5431..2c708dce 100644 --- a/tek/examples/edn.rs +++ b/tek/examples/edn.rs @@ -15,6 +15,7 @@ const EDN: &'static [&'static str] = &[ include_str!("edn09.edn"), include_str!("edn10.edn"), include_str!("edn11.edn"), + include_str!("edn12.edn"), ]; fn main () -> Usually<()> { diff --git a/tek/examples/edn11.edn b/tek/examples/edn11.edn index 97ed0638..1c47cb5f 100644 --- a/tek/examples/edn11.edn +++ b/tek/examples/edn11.edn @@ -1,17 +1,11 @@ (bsp/s - (bsp/e - (align/nw (fixed/xy 5 3 :hello)) - (bsp/e - (align/n (fixed/xy 5 3 :hello)) - (align/ne (fixed/xy 5 3 :hello)))) - (bsp/s - (bsp/e - (align/w (fixed/xy 5 3 :hello)) - (bsp/e - (align/c (fixed/xy 5 3 :hello)) - (align/e (fixed/xy 5 3 :hello)))) - (bsp/e - (align/sw (fixed/xy 5 3 :hello)) - (bsp/e - (align/s (fixed/xy 5 3 :hello)) - (align/se (fixed/xy 5 3 :hello)))))) + (bsp/e (align/nw (fixed/xy 5 3 :hello)) + (bsp/e (align/n (fixed/xy 5 3 :hello)) + (align/ne (fixed/xy 5 3 :hello)))) + (bsp/s + (bsp/e (align/w (fixed/xy 5 3 :hello)) + (bsp/e (align/c (fixed/xy 5 3 :hello)) + (align/e (fixed/xy 5 3 :hello)))) + (bsp/e (align/sw (fixed/xy 5 3 :hello)) + (bsp/e (align/s (fixed/xy 5 3 :hello)) + (align/se (fixed/xy 5 3 :hello)))))) diff --git a/tek/examples/edn12.edn b/tek/examples/edn12.edn new file mode 100644 index 00000000..130caed2 --- /dev/null +++ b/tek/examples/edn12.edn @@ -0,0 +1,11 @@ +(bsp/s + (bsp/e (fixed/xy 5 3 (align/nw :hello)) + (bsp/e (fixed/xy 5 3 (align/n :hello)) + (fixed/xy 5 3 (align/ne :hello)))) + (bsp/s + (bsp/e (fixed/xy 5 3 (align/w :hello)) + (bsp/e (fixed/xy 5 3 (align/c :hello)) + (fixed/xy 5 3 (align/e :hello)))) + (bsp/e (fixed/xy 5 3 (align/sw :hello)) + (bsp/e (fixed/xy 5 3 (align/s :hello)) + (fixed/xy 5 3 (align/se :hello))))))