Repositories / ecl.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 25caf88)
fix bootstrap error printing in universal_error_handler.
authorAttila Lendvai <attila@lendvai.name>
Tue, 29 Sep 2015 15:12:57 +0000 (17:12 +0200)
committerAttila Lendvai <attila@lendvai.name>
Tue, 29 Sep 2015 15:41:28 +0000 (17:41 +0200)
Signed-off-by: Attila Lendvai <attila@lendvai.name>
src/c/error.d patch | blob | blame | history

diff --git a/src/c/error.d b/src/c/error.d
index 9193736..82b540e 100644 (file)
--- a/src/c/error.d
+++ b/src/c/error.d
@@ -454,7 +454,7 @@ universal_error_handler(cl_object continue_string, cl_object datum,
                 writestr_stream("\n;;; Message:\n", stream);
                 si_write_ugly_object(datum, stream);
                 writestr_stream("\n;;; Arguments:\n", stream);
-                si_write_ugly_object(datum, args);
+                si_write_ugly_object(args, stream);
                 ecl_bds_unwind_n(the_env, 5);
         }
  ABORT:
Embeddable Common Lisp (Official: https://gitlab.com/embeddable-common-lisp/ecl)