A quick question.    I may be going going insane.

I have the following code:

     (define foo
        (lambda (v)
           (let
              ((wa (vector-ref v W1))
               (wb (vector-ref v W2)))

           (if  (> wb 0)
               (if  (char=? wa #\R)
                   (bar1  wa wb)
                   (bar2 wa wb))))))

This gets a char from the vector, checks to see if it is an R or an S and does it's thing. The problem is that the test for (char=? wa #\R) ALWAYS is false. The vector contains R's and S's. Testing the value of wa with (char? wa) is true.

What on earth is going on and what else can I use to check for an R or an S????

Bill



_______________________________________________
Chicken-users mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/chicken-users

Reply via email to