Use (sym-cat (lowcase ?antwort)). Sym-cat turns things into symbols.

Note: please try not to send HTML mail to mailing lists. 

I think Ludwig Pfefferkorn wrote:

> 
> Hi,
> Can anybody help me with the followig problem?
> 
> I use a function to read the answer of the user:
> 
> 
> 
> (deffunction frage-stellen (?text ?erlaubte-werte)
>     (printout t ?text)
>     (bind ?antwort(read))
>     (if (lexemep ?antwort) then (bind ?antwort (lowcase ?antwort)))
>     (while (not (member$ ?antwort ?erlaubte-werte))
>         (printout t ?text)
>         (bind ?antwort(read))
>         (if (lexemep ?antwort) then (bind ?antwort (lowcase ?antwort))))
>     ?antwort)
> 
> My problem is that (lowcase ?antwort) returns a string and not a symbol =
> though ?antwort is a symbol, so member$ doesn't work. I couldn't find a =
> function for making explicit type-conversion, so I don't know how I can =
> solve this problem.
> Thank you for any help.
> 


---------------------------------------------------------
Ernest Friedman-Hill  
Distributed Systems Research        Phone: (925) 294-2154
Sandia National Labs                FAX:   (925) 294-2234
Org. 8920, MS 9012                  [EMAIL PROTECTED]
PO Box 969                  http://herzberg.ca.sandia.gov
Livermore, CA 94550

---------------------------------------------------------------------
To unsubscribe, send the words 'unsubscribe jess-users [EMAIL PROTECTED]'
in the BODY of a message to [EMAIL PROTECTED], NOT to the
list (use your own address!) List problems? Notify [EMAIL PROTECTED]
---------------------------------------------------------------------

Reply via email to