Hi Everyone!
This may look like a dumb question but i don't know where the problem
is.
I'm having trouble with (readline). It doesn't work in the first
example, but when I use (read) before (readline) in the second example,
it works!
(assert (fire-rule))
(defrule get-name
(fire-rule)
=>
(printout t "What is your name? ")
(bind ?name (readline))
(printout t "Your name is " ?name crlf)
)
*************
(assert (fire-rule))
(defrule get-name
(fire-rule)
=>
(printout t "What is your first name? ")
(bind ?f-name (read))
(printout t "What is your complete name? ")
(bind ?name (readline))
(printout t "Your name is " ?name crlf)
)
Thanks.
Gerardo Becerra
Pontificia Universidad Javeriana
Facultad de Ingenierma
--------------------------------------------------------------------
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]
--------------------------------------------------------------------
