Browse Source

Make format arguments optional

master
Macoy Madson 5 months ago
parent
commit
b37fa47159
  1. 2
      src/XML.cake

2
src/XML.cake

@ -159,7 +159,7 @@
(defun output-xml (output-file (* FILE) str (* (const char)))
(fputs str output-file))
(defmacro format-quote (output-file any format-str string &rest format-arguments any)
(defmacro format-quote (output-file any format-str string &optional &rest format-arguments any)
(var quoted-format-str Token (deref format-str))
(token-contents-snprintf quoted-format-str "\"%s\"" (call-on c_str (path format-str > contents)))
(tokenize-push output

Loading…
Cancel
Save