Removing <record-type> makes things working fine. I got colorful outputs, which is very nice! Thanks.
On Tue, Dec 4, 2012 at 10:08 PM, Nala Ginrut <nalagin...@gmail.com> wrote: > Hmm...it's hard to find the problem. > Seems <record-type> wasn't exported in that version? > But you may comment out this line in colorized.scm: > ---------------------cut---------------------- > (,<record-type> ,color-record-type dark-gray) > ---------------------end---------------------- > And give it a try. > I think it won't effect anything wrong for you, but <record-type> will > be rendered as an <unknown> object. > > On Tue, 2012-12-04 at 21:58 -0600, Yanbin Zhang wrote: > > Hi Nala, > > > > > > It may be the old version of guile that caused the problem. > > Unfortunately, I usually do not live on the bleeding edge... > > Here is the trace (I have to admit that I am totally lost by looking > > at it): > > scheme@(guile-user)> ,tr (use-modules (ice-9 colorized)) > > trace: | (#<procedure 878a910> #(#<directory (guile-user) 82006c0> #f > > # …)) > > trace: | #(#<directory (guile-user) 82006c0> guile (guile) # ((guile) > > # #f) …) > > trace: (#<procedure 879ac80 ()>) > > trace: | (#<procedure 821dd20 at ice-9/boot-9.scm:2493:4 (name > > #:option…> …) > > trace: | | (nested-ref-module #<module () 8200d38> (guile)) > > trace: | | | (module-ref-submodule #<module () 8200d38> guile) > > trace: | | | | (#<procedure 8219b20 at ice-9/boot-9.scm:170…> …) > > trace: | | | | #<hash-table 821dd70 121/223> > > trace: | | | | (hashq-ref #<hash-table 821dd70 121/223> guile) > > trace: | | | | #<module (guile) 8200e10> > > trace: | | | #<module (guile) 8200e10> > > trace: | | #<module (guile) 8200e10> > > trace: | | (#<procedure 8235750 at ice-9/deprecated.scm:408:8 (mod)> > > #) > > trace: | | | (#<procedure 8219a20 at ice-9/boot-9.scm:1709:2 (m…> … > > ) > > trace: | | | #<interface (guile) 8200dc8> > > trace: | | #<interface (guile) 8200dc8> > > trace: | #<module (guile) 8200e10> > > trace: | (process-use-modules (((ice-9 colorized)))) > > trace: | | (map #<procedure 82201a0 at ice-9/boot-9.scm:3244:25 (mi… > > > …) > > trace: | | | (#<procedure 82201a0 at ice-9/boot-9.scm:3244:25 (…> … > > ) > > trace: | | | | (resolve-interface (ice-9 colorized)) > > trace: | | | | | (#<procedure 821dd20 at ice-9/boot-9.s…> …) > > trace: | | | | | | (nested-ref-module #<module () 8…> …) > > trace: | | | | | | | (module-ref-submodule #<mo…> …) > > trace: | | | | | | | | (#<procedure 8219b20…> …) > > trace: | | | | | | | | #<hash-table 821dd70 121/223> > > trace: | | | | | | | | (hashq-ref #<hash-ta…> …) > > trace: | | | | | | | | #<directory (ice-9) 8200c18> > > trace: | | | | | | | #<directory (ice-9) 8200c18> > > trace: | | | | | | | (module-ref-submodule #<di…> …) > > trace: | | | | | | | | (#<procedure 8219b20…> …) > > trace: | | | | | | | | #<hash-table 82253a0 26/31> > > trace: | | | | | | | | (hashq-ref #<hash-ta…> …) > > trace: | | | | | | | | #<directory (ice-9 colorized) 852baf8> > > trace: | | | | | | | #<directory (ice-9 colorized) 852baf8> > > trace: | | | | | | #<directory (ice-9 colorized) 852baf8> > > trace: | | | | | | (#<procedure 8235750 at ice-9/de…> …) > > trace: | | | | | | | (#<procedure 8219a20 at ic…> …) > > trace: | | | | | | | #<interface (ice-9 colorized) 852bab0> > > trace: | | | | | | #<interface (ice-9 colorized) 852bab0> > > trace: | | | | | #<directory (ice-9 colorized) 852baf8> > > trace: | | | | | (#<procedure 8235750 at ice-9/deprecat…> …) > > trace: | | | | | | (#<procedure 8219a20 at ice-9/bo…> …) > > trace: | | | | | | #<interface (ice-9 colorized) 852bab0> > > trace: | | | | | #<interface (ice-9 colorized) 852bab0> > > trace: | | | | #<interface (ice-9 colorized) 852bab0> > > trace: | | | #<interface (ice-9 colorized) 852bab0> > > trace: | | (reverse! (#<interface (ice-9 colorized) 852bab0>)) > > trace: | | (#<interface (ice-9 colorized) 852bab0>) > > trace: | (call-with-deferred-observers #<procedure 888f110 at > > ice-9/boot…>) > > trace: | | (#<procedure 8219820 at ice-9/boot-9.scm:1807:6 ()>) > > trace: | | | (lock-mutex #<mutex 80f1870>) > > trace: | | | #t > > trace: | | #<unspecified> > > trace: | | (#<procedure 849b130>) > > trace: | | (() ((filename . "ice-9/boot-9.scm") (0 1806 . 6) (3 # . > > 8) #) #) > > trace: | | (#<procedure 84c9850>) > > trace: | | (() ((filename . "ice-9/boot-9.scm") (0 1810 . 6) (5 # . > > 8) # …) …) > > trace: | | (#<procedure 888f110 at ice-9/boot-9.scm:3249:5 ()>) > > trace: | | | (current-module) > > trace: | | | #<directory (guile-user) 82006c0> > > trace: | | (module-use-interfaces! #<directory (guile-user) 82006c0> > > #) > > trace: | | | (#<procedure 8219fa0 at ice-9/boot-9.scm:1709:2 (m…> … > > ) > > trace: | | | (#<interface (guile) 8200dc8> #<autoload (system base > > compi…> …) > > trace: | | | (memq #<interface (ice-9 colorized) 852bab0> (#<…> …)) > > trace: | | | (#<interface (ice-9 colorized) 852bab0>) > > trace: | | | (reverse ()) > > trace: | | | () > > trace: | | | (append (#<interface (guile) 8200dc8> #<autoloa…> …) … > > ) > > trace: | | | (#<interface (guile) 8200dc8> #<autoload (system base > > compi…> …) > > trace: | | | (#<procedure 8219f60 at ice-9/boot-9.scm:1709:2 (m…> … > > ) > > trace: | | | (#<interface (guile) 8200dc8> #<autoload (system base > > compi…> …) > > trace: | | | (#<procedure 8219ca0 at ice-9/boot-9.scm:1709:2 (m…> … > > ) > > trace: | | | #<hash-table 8259480 0/883> > > trace: | | | (hash-clear! #<hash-table 8259480 0/883>) > > trace: | | | #<unspecified> > > trace: | | (module-modified #<directory (guile-user) 82006c0>) > > trace: | | (hash-set! #<hash-table 82198d0 0/31> #<directory (guile… > > > …) > > trace: | | #t > > trace: | | (#<procedure 82197d0 at ice-9/boot-9.scm:1811:6 ()>) > > trace: | | | (hash-for-each #<procedure 82197f0 at ice-9/boot-9…> … > > ) > > trace: | | | | (#<procedure 82197f0 at ice-9/boot-9.scm:181…> …) > > trace: | | | | (module-call-observers #<directory (guile-use…>) > > trace: | | | | | (#<procedure 8219c60 at ice-9/boot-9.s…> …) > > trace: | | | | | () > > trace: | | | | | (for-each #<procedure 861dd70 at ice-9…> …) > > trace: | | | | | #<unspecified> > > trace: | | | | | (#<procedure 8219be0 at ice-9/boot-9.s…> …) > > trace: | | | | | #<weak-key-hash-table 8259470 0/31> > > trace: | | | | (hash-for-each #<procedure 862a350 at ice-9/…> …) > > trace: | | | | #<unspecified> > > trace: | | | #<unspecified> > > trace: | | | (hash-clear! #<hash-table 82198d0 1/31>) > > trace: | | | #<unspecified> > > trace: | | (unlock-mutex #<mutex 80f1870>) > > trace: | | #t > > trace: | #t > > trace: #<unspecified> > > > > > > Thanks! > > > > > > Yanbin > > > > On Tue, Dec 4, 2012 at 8:43 PM, Nala Ginrut <nalagin...@gmail.com> > > wrote: > > On Tue, 2012-12-04 at 16:20 -0600, Yanbin Zhang wrote: > > > Hi, > > > > > > > > > In the example of the README file, the module is spelled as > > > "colorised". I guess it should be "colorized". > > > > > > > Ah~thanks! > > > > > > I tried the example but I got: > > > scheme@(guile-user)> (use-modules (oop goops) (rnrs) (ice-9 > > > colorized)) > > > While compiling expression: > > > ERROR: In procedure module-lookup: Unbound variable: > > <record-type> > > > > > > > Can you provide more information? > > You may post a trace result like that: > > ===============cut================= > > ,tr (use-modules (ice-9 colorized)) > > ===============end================= > > > > And Guile-2.0.5 is old, maybe bugs there. > > I use the latest Guile, and I suggest you update to > > Guile-2.0.7. > > > > > I am using Guile 2.0.5 > > > > > > > > > This is definitely a cool feature if I can get it working. > > But myself > > > is quite new to Guile and does not know my way around very > > well. > > > Thanks. > > > > > > > > > Yanbin > > > > > > > > > > > > On Tue, Dec 4, 2012 at 12:42 AM, nalaginrut > > <nalagin...@gmail.com> > > > wrote: > > > hi folks! > > > Here is the project to colorize Guile REPL: > > > https://github.com/NalaGinrut/guile-colorized > > > Play it according to README. > > > Attached a screen shot for the effect. > > > Enjoy it! > > > > > > And it uses 'before-print-hook', Daniel posted a > > patch to add > > > REPL > > > optional printer in another thread. > > > I'll update my project for this after that patch is > > accepted, > > > and format > > > a patch. > > > > > > PS: Though I've tested it, but maybe bugs remain. > > > Both bug-report/patches/suggestion are welcome, > > thanks! > > > > > > Happy hacking! > > > > > > > > > > > > > > > > > > -- > > > Yanbin Zhang > > > --------------------------------------------- > > > Research Assistant > > > Department of Petroleum Engineering > > > Texas A&M University > > > 3116 TAMU - 702 RICH > > > College Station, TX, 77843 > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > Yanbin Zhang > > --------------------------------------------- > > Research Assistant > > Department of Petroleum Engineering > > Texas A&M University > > 3116 TAMU - 702 RICH > > College Station, TX, 77843 > > 979-847-8797 > > > > > > > > -- Yanbin Zhang --------------------------------------------- Research Assistant Department of Petroleum Engineering Texas A&M University 3116 TAMU - 702 RICH College Station, TX, 77843 979-847-8797
