;; Benchmark: 196ns
;; Benchmark-Repeat: 10532
(do
  ;; 1. Provokation Stack-Gap (bei Optimization Level 2)
  (def result
    (fn []
      (do
        ;; Wird entfernt, Slot 0 ist dann "leer"
        (def unused 10)
        ;; Bleibt auf Slot 1 -> Lücke!
        (def used 42)
        used)))

  ;; 2. Provokation Inlining-Blockade
  ;; Diese Funktion wird nicht inlined, weil sie ein 'def' enthält
  (def complex-add
    (fn [a]
      (do
        (def b 100)
        (+ a b))))

  (assert-eq [42 150] [(result) (complex-add 50)])
)