guile-user
[Top][All Lists]
Advanced
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Looping local binding

From: Dmitry Dzhus
Subject: Looping local binding
Date: Mon, 29 Oct 2007 19:28:56 +0300
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/23.0.0 (gnu/linux) 
Greetings! I've got the following lines in my code:

 (let* ((method (option-ref options 'method "fundmatrix"))
             ;; Command line options override ones in statement file
             (right-bound
              (string->number
               (option-ref options 'right-bound (number->string right-bound))))
             (wave-number
              (string->number
               (option-ref options 'wave-number (number->string wave-number))))
             (subintervals
              (string->number
               (option-ref options 'subintervals (number->string 
subintervals))))
             (test-epsilon
              (string->number
               (option-ref options 'test-epsilon  (number->string 
test-epsilon)))))
             <body follows .. >)

Looks like total mess, doesn't it?

Is there any way to rewrite this somehow, say using a loop over a list

      '(right-bound wave-number subintervals test-epsilon)

?

Desperately I tried to perform local binding using `(let (map ..`, but
obviously that couldn't work.
-- 
Happy Hacking.

Dmitry "Sphinx" Dzhus
http://sphinx.net.ru
reply via email to
[Prev in Thread] Current Thread [Next in Thread]