This is the mail archive of the guile@cygnus.com mailing list for the guile project.

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]

No Subject

   References: <m0xDW5c-000cuUC@aubrey.jaffer>
   From: Mikael Djurfeldt <mdj@nada.kth.se>
   Date: 23 Sep 1997 19:15:57 +0200
   Lines: 8
   X-Mailer: Gnus v5.4.63/Emacs 19.34
   X-UIDL: ad9105dbad4beaec68ae52dfdb0d2391

   Aubrey Jaffer <jaffer@martigny.ai.mit.edu> writes:

   > I released new versions of SLIB and JACAL yesterday.  The JACAL
   > problems (at least) should be fixed by this release.

   I still get the error "Unbound variable: horner" with Jacal1a7.

   /mdj

Thank you for your succinct problem-report.  JACAL is written in
Scheme, which is case-insensitive for identifiers.  Guile supposedly
has some mechanism for case-sensitivity, but I have not kept up with
the releases.  The following patch should fix the `Horner' problem.

			      -=-=-=-=-

diff -c -N temp/jacal/modeinit.scm temp/njacal/modeinit.scm
*** temp/jacal/modeinit.scm	Wed Feb  9 20:11:48 1994
--- temp/njacal/modeinit.scm	Tue Sep 23 13:34:13 1997
***************
*** 13,19 ****
  
  (set! linkradicals #t)		;Relate radicals in the traditional manner.
  
! (set! Horner #f)		;Horner's rule on expression output
  
  (set! page-height #t)		;#t for pagination on, #f off
  
--- 13,19 ----
  
  (set! linkradicals #t)		;Relate radicals in the traditional manner.
  
! (set! horner #f)		;Horner's rule on expression output
  
  (set! page-height #t)		;#t for pagination on, #f off
  
diff -c -N temp/jacal/toploads.scm temp/njacal/toploads.scm
*** temp/jacal/toploads.scm	Mon Sep 22 12:44:54 1997
--- temp/njacal/toploads.scm	Tue Sep 23 13:34:20 1997
***************
*** 22,28 ****
  (define math:phases #f)
  (define math:trace #f)
  (define linkradicals #f)
! (define Horner #f)
  (define page-height #f)
  (define page-width #f)
  (define newextstr #f)
--- 22,28 ----
  (define math:phases #f)
  (define math:trace #f)
  (define linkradicals #f)
! (define horner #f)
  (define page-height #f)
  (define page-width #f)
  (define newextstr #f)