PROSAGA码农传奇-lisp-cl-who在funcalls中传递流

<div class =“post-text”itemprop =“text”>
  
    我不清楚你想做什么。如果你想在 pieces 中编写一个网页，可以通过函数生成页面的部分，你可以使用
     <code>
 str
 </code>
    在调用其中一个函数时，例如：
  
   <pre>
 <code>
 (defun f1 ()
 (with-html-output-to-string (*output-string*)
 (:p "some text")))

(defun f2 ()
  (with-html-output-to-string (*output-string*)
       (:body (:p "some other text") (str (f1)))))

(f2)
"<body>some other textsome text</body>"

</code>
 </pre>
  
    来自
    <a href="https://edicl.github.io/cl-who" rel="nofollow noreferrer">
      手册
    </A>
    ：
  
  <BLOCKQUOTE>
    
      表格看起来像
       <code>
 (str form)
 </code>
       将被替换
       <code>
 (let ((result form)) (when result (princ result s)))
 </code>
    
  </BLOCKQUOTE>
  
    如果你不使用
     <code>
 str
 </code>
    相反，结果不包含在html输出中：
  
   <pre>
 <code>
 (defun f3 ()
 (with-html-output-to-string (*output-string*)
 (:body (:p "some other text") (f1))))

(f3)
"<body>some other text</body>"

</code>
 </pre>
</DIV>