this is the source :
Code: Select all
(define (bold text)
(print (string "<b>" text "</b>")))
(define (italic text)
(print (string "<i>" text "</i>")))
(print "Content-type: text/html\n\n")
(print "<html>")
(print "<body>")
(print (string "<p> this is " (bold "bold") " and this " (italic "italic") " then normal </p>" ))
(print "</body>")
(print "</html>")
(exit)
this is <b> bold</b> and this is <i>italic</i> then normal
i see
<b>bold</b> <i>italic</i>
this is <b> bold</b> and this is <i>italic</i> then normal
there are two extra words: <b>bold</b> and <i>italic</i>
before the desired output.
I'm using newlisp 8.01.
Any suggestion ?
Regards
Maurizio