n class="lisp-bg"><i><span class="symbol">defun</span></i> foo <span class="paren2">(<span class="lisp-bg">x</span>)</span>
    <span class="paren2">(<span class="lisp-bg"><i><span class="symbol">with-foreign-string</span></i> <span class="paren3">(<span class="lisp-bg"><span class="keyword">#:G2021</span> X <span class="keyword">:encoding</span> '<span class="keyword">:utf-8</span></span>)</span>
      <span class="paren3">(<span class="lisp-bg">foreign-string-to-lisp
       <span class="paren4">(<span cla