</strong> (s) (and (string? s) (not (string-index s #\%))))) . ?a
)
          `(string-append ,&#x40;(cdr x)))
         (else
          `(bformat ,&#x40;(map (<strong id='bold35570'
>lambda</strong> (x) (e x e)) (cdr x)))))
</pre>
</td></tr>
</tbody></table></center>

At compile time the macro BFORMAT will be declared. Hence, we can change
the definition of <code id='code28722'
>foo.scm</code> for:<br/><br/><center id='center28733'
><table cellspacing="0" class="color" cellpadding="0" width="95%"><tbody>
<t