fix: fix leading % format in fmt (#1380)

carp-lang · Jan 24, 2022 · bd653ad · bd653ad
1 parent 027d8b3
commit bd653ad
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/core/Format.carp b/core/Format.carp
@@ -14,7 +14,7 @@
  (if (= \% (String.char-at s (inc idx))) ; this is an escaped %
  `(ref
  (String.append
- "%"
+ %(String.slice s 0 (inc idx))
  %(fmt-internal (String.slice s (+ idx 2) len) args)))
  (if (= 0 (length args)) ; we need to insert something, but have nothing
  (macro-error

diff --git a/test/format.carp b/test/format.carp
@@ -34,6 +34,10 @@
  "10 % 12.0 yay"
  &(fmt "%d %% %.1f %s" 10 12.0 "yay")
  "fmt macro works")
+ (assert-equal test
+ "hi % 12.0"
+ &(fmt "hi %% %.1f" 12.0)
+ "fmt macro works with leading % (regression test)")
  (assert-equal test
  "1 [2 3] h"
  &(let [x 1