hello,
i'm trying to upgrade the bigloo-lib (
http://sourceforge.net/projects/bigloo-lib/ ) to make it compile with latest
version of bigloo, the library seems to have worked with bigloo of 2007
(perheaps 2013 but not sure),
bigloo was implementing function at this time that are no more supported and i
get errors at compilation:
[mattei@moita bigloo-lib-0.21b]$ make
Making all in common
make[1] : on entre dans le répertoire «
/home/mattei/Téléchargements/bigloo-lib-0.21b/common »
/usr/local/bin/bigloo -I . -L . -cgen misc.scm -o misc.c
File "misc.scm", line 775, character 22558:
# (make-hash-table 256 ptr->0..255 car eq?))
# ^
*** ERROR:toplevel-init
Unbound variable -- make-hash-table
File "misc.scm", line 826, character 23982:
#(define *object-data-registry* (make-hash-table 256 obj->0..255 car equal?))
# ^
*** ERROR:toplevel-init
Unbound variable -- make-hash-table
File "misc.scm", line 826, character 24003:
#(define *object-data-registry* (make-hash-table 256 obj->0..255 car equal?))
# ^
*** ERROR:toplevel-init
Unbound variable -- obj->0..255
File "misc.scm", line 258, character 8614:
# (string->bstring(pragma::string "$1 + 1" found)))))
# ^
*** ERROR:string-after
Unbound variable -- string->bstring
File "misc.scm", line 255, character 8533:
# (bstring->string s)
# ^
*** ERROR:string-after
Unbound variable -- bstring->string
File "misc.scm", line 269, character 9002:
# (bstring->string s))))))
# ^
*** ERROR:string-before
Unbound variable -- bstring->string
File "misc.scm", line 264, character 8857:
# (bstring->string s)
# ^
*** ERROR:string-before
Unbound variable -- bstring->string
File "misc.scm", line 275, character 9211:
# (let*((ps(bstring->string p))
# ^
*** ERROR:<anonymous:1750>
Unbound variable -- bstring->string
File "misc.scm", line 291, character 9763:
# (let*((ps(bstring->string p))
# ^
*** ERROR:<anonymous:1757>
Unbound variable -- bstring->string
File "misc.scm", line 289, character 9683:
# (needle-c(bstring->string needle)))
# ^
*** ERROR:string-split-by-string
Unbound variable -- bstring->string
File "misc.scm", line 693, character 20218:
# (bstring->string s)
# ^
*** ERROR:string->hex
Unbound variable -- bstring->string
File "misc.scm", line 694, character 20240:
# (bstring->string result))
# ^
*** ERROR:string->hex
Unbound variable -- bstring->string
File "misc.scm", line 737, character 21474:
# result i(bstring->string o)))
# ^
*** ERROR:<anonymous:1977>
Unbound variable -- bstring->string
File "misc.scm", line 740, character 21574:
# result i(bint->int o)))
# ^
*** ERROR:<anonymous:1977>
Unbound variable -- bint->int
File "misc.scm", line 778, character 22630:
# (get-hash o *scheme-object-registry*))
# ^
*** ERROR:object-lookup
Unbound variable -- get-hash
File "misc.scm", line 785, character 22803:
# (put-hash! tuple *scheme-object-registry*)
# ^
*** ERROR:object-ref
Unbound variable -- put-hash!
File "misc.scm", line 803, character 23366:
# (rem-key-hash! o *scheme-object-registry*)
# ^
*** ERROR:object-unref
Unbound variable -- rem-key-hash!
File "misc.scm", line 814, character 23655:
# (obj->0..2^x-1 o p)))
# ^
*** ERROR:pair->0..2^x-1
Unbound variable -- obj->0..2^x-1
File "misc.scm", line 829, character 24096:
# (let((data(cond ((get-hash o *object-data-registry*) => cdr))))
# ^
*** ERROR:object-data-get
Unbound variable -- get-hash
File "misc.scm", line 837, character 24335:
# (put-hash! (list o) *object-data-registry*))))
# ^
*** ERROR:object-data-set!
Unbound variable -- put-hash!
File "misc.scm", line 836, character 24295:
# (let((entry (or (get-hash o *object-data-registry*)
# ^
*** ERROR:object-data-set!
Unbound variable -- get-hash
File "misc.scm", line 844, character 24511:
# (rem-key-hash! o *object-data-registry*))
# ^
*** ERROR:object-data-free!
Unbound variable -- rem-key-hash!
File "misc.scm", line 865, character 25150:
# (set-printer!
# ^
*** ERROR:add-printer
Unbound variable -- set-printer!
File "misc.scm", line 864, character 25127:
# (let ((old-printer (current-printer)))
# ^
*** ERROR:add-printer
Unbound variable -- current-printer
24 errors occured, ending ...
make[1]: *** [misc.c] Erreur 255
make[1] : on quitte le répertoire «
/home/mattei/Téléchargements/bigloo-lib-0.21b/common »
make: *** [all-recursive] Erreur 1
[mattei@moita bigloo-lib-0.21b]$
some function have changed of names:
make-hash-table -> make-hashtable
but some function are no more supported by bigloo 4.* such as:
bstring->string
causing errors:
File "misc.scm", line 737, character 21474:
# result i(bstring->string o)))
# ^
*** ERROR:<anonymous:1977>
Unbound variable -- bstring->string
again i having troubles with bstring i do not know how to handle them or cast
them in string ,
any idea ?
also the obj class seems no more accessible from bigloo 4.* :
File "misc.scm", line 814, character 23655:
# (obj->0..2^x-1 o p)))
# ^
*** ERROR:pair->0..2^x-1
Unbound variable -- obj->0..2^x-1
i do not know how to handle all the errors, even when fixing them i have then
serious errors with the generated misc.c due to the structure conversion of
bstring not compatible with string and other incompatibilities
regards,
Damien
