[Ecls-list] CMU format

[Julian St.]

Hello,

after changing symbols_list.h as follows I was able to build ECL with
the CMU format code (--with-cmuformat):

diff -u -r1.58 symbols_list.h
--- symbols_list.h      1 Dec 2003 11:21:56 -0000       1.58
+++ symbols_list.h      11 Dec 2003 21:04:52 -0000
@@ -1059,7 +1059,13 @@
 {SYS_ "FILL-POINTER-SET", SI_ORDINARY, si_fill_pointer_set, 2,
OBJNULL}, {SYS_ "FIXNUMP", SI_ORDINARY, si_fixnump, 1, OBJNULL},
 {SYS_ "FORMAT-ERROR", SI_ORDINARY, NULL, -1, OBJNULL},
+
+#ifdef ECL_CMU_FORMAT
+{SYS_ "FORMATTER-AUX", SI_ORDINARY, NULL, -1, OBJNULL},
+#else
 {SYS_ "FORMATTER-AUX", SI_ORDINARY, si_formatter_aux, -1, OBJNULL},
+#endif
+
 {SYS_ "FRS-BDS", SI_ORDINARY, si_frs_bds, 1, OBJNULL},
 {SYS_ "FRS-CLASS", SI_ORDINARY, si_frs_class, 1, OBJNULL},
 {SYS_ "FRS-IHS", SI_ORDINARY, si_frs_ihs, 1, OBJNULL},


But this version of format shows some strange behaviour:
> (funcall (formatter "~@<~@:>") t)
The function STREAM is undefined.
Broken at LAMBDA.
>> :backtrace
Backtrace: > LAMBDA > eval
Broken at LAMBDA.

> (funcall (formatter "~<~@:>") t)
Unknown initialization option COMPLAINT for class #<The STANDARD-CLASS
FORMAT-ERROR> Broken at MAKE-CONDITION.
>> :backtrace
Backtrace: > MAKE-CONDITION > lambda > eval

I don't know what to make of the first error...

Regards,
-- 
Julian Stecklina 
http://www.inf.tu-dresden.de/~s1054849/
FA38 DCD3 00EC 97B8 6DD8  D7CC 35D8 8D0E D65B 2AB5