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 -- [email protected], [email protected], UNS / OCA / CNRS
