Hello, 

When attempting to compile a file with bigloo 4.3a (beta16Oct16), I am 
recieving an error I have never seen before. A truncated version of the error 
message can be found below. The error may not be specific to bigloo 4.3a; I 
have not tried compiling with an earlier Bigloo version yest. Does any one know 
what this error indicates? If it helps, I am seeing this error when compiling 
recette/tabled.scm found at https://github.com/donaldsonjw/bkanren. I recently 
revisited the project and was attempting to properly merge the changes made by 
Peter Kourzanov. Any help would be appreciated. 
Thanks,Joseph Donaldson


*** ERROR:cfa-variable-value-a1578:
No method for this object -- #0=#|sfun/Ginfo [arity: 2] [side-effect: #f] 
[predicate-of: #f] [stack-allocator: #f] [top?: #t] [the-closure: #unspecified] 
[effect: #unspecified] [failsafe: #unspecified] [property: ()] [args: 
(#1=#|reshaped-local [id: s1619716261] [name: BgL_s1619716261z00_11116] [type: 
#2=#|type [id: _] [name: _] [size: #unspecified] [class: bigloo] [coerce-to: 
()] [parents: ()] [init?: #t] [magic?: #t] [$: #f] [alias: #f] [pointed-to-by: 
#f] [tvector: #unspecified] [location: #f] [import-location: #f] [occurrence: 
2]|] [value: #|svar/Cinfo [loc: #unspecified] [approx: #|approx [type: #2#] 
[type-locked?: #f] [allocs: #{large-set  #3=#{meta-set 
#(#4=#|make-procedure-app [loc: #unspecified] [type: #5=#|type [id: procedure] 
[name: obj_t] [size: #unspecified] [class: bigloo] [coerce-to: (#{coercer #5# 
#6=#|type [id: procedure-el] [name: obj_t] [size: #unspecified] [class: bigloo] 
[coerce-to: (#{coercer #6# #7=#|type [id: obj] [name: obj_t] [size: 
#unspecified] [class: bigloo] [coerce-to: (#8=#{coercer #7# #9=#|tclass [id: 
%var] [name: BgL_z52varz52_bglt] [size: struct BgL_z52varz52_bgl] [class: 
bigloo] [coerce-to: (#{coercer #9# #10=#|type [id: cobj] [name: long] [size: 
#unspecified] [class: C] [coerce-to: (#{coercer #10# #11=#|type [id: 
output-port] [name: obj_t] [size: #unspecified] [class: bigloo] [coerce-to: 
(#{coercer #11# #12=#|type [id: bool] [name: bool_t] [size: #unspecified] 
[class: C] [coerce-to: (#{coercer #12# #7# (#13=(#t . #12#) . #14=((#t . 
#15=#|type [id: bbool] [name: obj_t] [size: #unspecified] [class: bigloo] 
[coerce-to: (#{coercer #15# #10# (#16=(#t . #15#) . #17=((#t . #12#))) 
(#18=($bbool->bool . #12#) . #19=((#t . #10#)))} #{coercer #15# #12# (#16#) 
(#18#)} #{coercer #15# #7# #14# #20=((#t . #7#))})] [parents: (#7#)] [init?: 
#t] [magic?: #f] [$: #f] [alias: #f] [pointed-to-by: #f] [tvector: 
#unspecified] [location: #f] [import-location: #f] [occurrence: 11]|))) 
(#21=($bool->bbool . #15#) . #20#)} #{coercer #12# #15# #22=(#13#) #23=(#21#)} 
#{coercer #12# #10# #17# #19#})] [parents: (#10#)] [init?: #t] [magic?: #f] [$: 
#f] [alias: #f] [pointed-to-by: #f] [tvector: #unspecified] [location: #f] 
[import-location: #f] [occurrence: 1457]| ((#t . #11#)) (((lambda (x) #t) . 
#12#))} #{coercer #11# #10# (#24=(#t . #11#) . #25=((#t . #26=#|type [id: file] 
[name: FILE *] [size: #unspecified] [class: C] [coerce-to: (#{coercer #26# #11# 
#27=((#t . #26#)) #28=(($file->output-port . #11#))} #{coercer #26# #7# 
(#29=(#t . #26#) . #30=((#t . #31=#|type [id: input-port] [name: obj_t] [size: 
#unspecified] [class: bigloo] [coerce-to: (#{coercer #31# #10# (#32=(#t . #31#) 
. #17#) (#33=((lambda (x) #t) . #12#) . #19#)} #{coercer #31# #12# (#32#) 
(#33#)} #{coercer #31# #7# #30# #34=((#t . #7#))})] [parents: (#7#)] [init?: 
#t] [magic?: #f] [$: #f] [alias: #f] [pointed-to-by: #f] [tvector: 
#unspecified] [location: #{location Unsafe/gunzip.scm 2393 61}] 
[import-location: #f] [occurrence: 132]|))) (#35=($file->input-port . #31#) . 
#34#)} #{coercer #26# #31# #36=(#29#) #37=(#35#)} #{coercer #26# #10# #25# 
#38=((#t . #10#))})] [parents: (#10#)] [init?: #t] [magic?: #f] [$: #f] [alias: 
#f] [pointed-to-by: #f] [tvector: #unspecified] [location: #unspecified] 
[import-location: #f] [occurrence: 10]|))) (#39=($output-port->file . #26#) . 
#38#)} #{coercer #11# #26# #40=(#24#) #41=(#39#)} #{coercer #11# #7# ((#t . 
#11#)) ((#t . #7#))})] [parents: (#7#)] [init?: #t] [magic?: #f] [$: #f] 
[alias: #f] [pointed-to-by: #f] [tvector: #unspecified] [location: #{location 
Ieee/port.scm 2422 73}] [import-location: #f] [occurrence: 79]| (#42=(#t . 
#10#) . #27#) (#43=(#t . #26#) . #28#)} #{coercer #10# #31# (#42# . #36#) (#43# 
. #37#)} #{coercer #10# #44=#|type [id: real] [name: obj_t] [size: 
#unspecified] [class: bigloo] [coerce-to: (#{coercer #44# #12# ((#t . #44#)) 
(((lambda (x) #t) . #12#))} #{coercer #44# #45=#|type [id: double] [name: 
double] [size: #unspecified] [class: C] [coerce-to: (#{coercer #45# #46=#|type 
[id: float] [name: float] [size: #unspecified] [class: C] [coerce-to: 
(#{coercer #46# #7# (#47=(#t . #46#) . #48=((#t . #44#))) (#49=($float->real . 
#44#) . #50=((#t . #7#)))} #{coercer #46# #44# #51=(#47#) #52=(#49#)} #{coercer 
#46# #12# ((#t . #46#)) (((lambda (x::float) #t) . #12#))} #{coercer #46# #45# 
((#t . #46#)) (($float->double . #45#))} #{coercer #46# #10# #53=((#t . #46#)) 
#54=((#t . #10#))})] [parents: (#10#)] [init?: #t] [magic?: #f] [$: #f] [alias: 
#f] [pointed-to-by: #f] [tvector: #unspecified] [location: #{location 
Llib/srfi4.scm 5697 150}] [import-location: #f] [occurrence: 23]| ((#t . #45#)) 
(($double->float . #46#))} #{coercer #45# #7# (#55=(#t . #45#) . #48#) 
(#56=($double->real . #44#) . #50#)} #{coercer #45# #44# (#55#) (#56#)} 
#{coercer #45# #12# ((#t . #45#)) (((lambda (x::double) #t) . #12#))} #{coercer 
#45# #10# ((#t . #45#)) ((#t . #10#))})] [parents: (#10#)] [init?: #t] [magic?: 
#f] [$: #f] [alias: #f] [pointed-to-by: #f] [tvector: #unspecified] [location: 
#f] [import-location: #f] [occurrence: 118]| #57=((#t . #44#)) 
#58=(($real->double . #45#))} #{coercer #44# #10# (#59=(#t . #44#) . #53#) 
(#60=($real->float . #46#) . #54#)} #{coercer #44# #46# #61=(#59#) #62=(#60#)} 
#{coercer #44# #7# #48# #50#})] [parents: (#7#)] [init?: #t] [magic?: #f] [$: 
#f] [alias: #f] [pointed-to-by: #f] [tvector: #unspecified] [location: #f] 
[import-location: #f] [occurrence: 15]| (#63=(#t . #10#) . #51#) (#64=(#t . 
#46#) . #52#)} #{coercer #10# #65=#|type [id: buint64] [name: obj_t] [size: 
#unspecified] [class: bigloo] [coerce-to: (#{coercer #65# #10# (#66=(#t . #65#) 
. #67=((#t . #68=#|type [id: uint64] [name: uint64_t] [size: #unspecified] 
[class: C] [coerce-to: (#{coercer #68# #69=#|type [id: int64] [name: int64_t] 
[size: #unspecified] [class: C] [coerce-to: (#{coercer #69# #68# ((#t . #69#)) 
(($int64->uint64 . #68#))} #{coercer #69# #7# (#70=(#t . #69#) . #71=((#t . 
#72=#|type [id: bint64] [name: obj_t] [size: #unspecified] [class: bigloo] 
[coerce-to: (#{coercer #72# #10# (#73=(#t . #72#) . #74=((#t . #69#))) 
(#75=($bint64->int64 . #69#) . #76=((#t . #10#)))

Reply via email to