<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN""http://www.w3.org/TR/html4/loose.dtd"> <HTML ><HEAD ><TITLE >string-list-sosofo</TITLE ><META NAME="GENERATOR" CONTENT="Modular DocBook HTML Stylesheet Version 1.79"><LINK REL="HOME" TITLE="DSSSL Library Reference" HREF="index.html"><LINK REL="UP" TITLE="Miscellaneous" HREF="r300.htm"><LINK REL="PREVIOUS" TITLE="match-substitute-sosofo" HREF="match-substitute-sosofo.html"><LINK REL="NEXT" TITLE="repl-substring?" HREF="repl-substring-p.html"></HEAD ><BODY CLASS="REFENTRY" BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#0000FF" VLINK="#840084" ALINK="#0000FF" ><DIV CLASS="NAVHEADER" ><TABLE SUMMARY="Header navigation table" WIDTH="100%" BORDER="0" CELLPADDING="0" CELLSPACING="0" ><TR ><TH COLSPAN="3" ALIGN="center" >DSSSL Library Reference: Part of the Modular DocBook Stylesheet distribution</TH ></TR ><TR ><TD WIDTH="10%" ALIGN="left" VALIGN="bottom" ><A HREF="match-substitute-sosofo.html" ACCESSKEY="P" >Prev</A ></TD ><TD WIDTH="80%" ALIGN="center" VALIGN="bottom" ></TD ><TD WIDTH="10%" ALIGN="right" VALIGN="bottom" ><A HREF="repl-substring-p.html" ACCESSKEY="N" >Next</A ></TD ></TR ></TABLE ><HR ALIGN="LEFT" WIDTH="100%"></DIV ><H1 ><A NAME="STRING-LIST-SOSOFO" ></A >string-list-sosofo</H1 ><DIV CLASS="REFNAMEDIV" ><A NAME="AEN667" ></A ><H2 >Name</H2 >string-list-sosofo -- Build sosofo from a list of strings and an associative list</DIV ><DIV CLASS="REFSYNOPSISDIV" ><A NAME="AEN670" ></A ><H2 >Synopsis</H2 ><PRE CLASS="SYNOPSIS" >(string-list-sosofo string-list assoc-list)</PRE ></DIV ><DIV CLASS="REFSECT1" ><A NAME="AEN673" ></A ><H2 >Description</H2 ><P >Take a list of strings and an associative list that maps strings to sosofos and return an appended sosofo.</P ><P >(This function is used for a particular task in the DocBook stylesheets. It may not be particularly general, but it<TT CLASS="LITERAL" >s in </TT >dblib.dsl' because there is nothing DTD-specific about it.)</P ></DIV ><DIV CLASS="REFSECT1" ><A NAME="AEN678" ></A ><H2 >Example</H2 ><P >Given the string list <TT CLASS="LITERAL" >("what is " "1" " " "+" " " "1")</TT > and the associative list <TT CLASS="LITERAL" >(("1" (literal "one")) ("2" (literal "two")) ("+" (literal "plus")))</TT >, <TT CLASS="LITERAL" >(string-list-sosofo)</TT > returns the sequence of sosofos equivalent to <TT CLASS="LITERAL" >(literal "what is one plus one")</TT >.</P ></DIV ><DIV CLASS="REFSECT1" ><A NAME="AEN685" ></A ><H2 >Author</H2 ><P >Norman Walsh, <ndw@nwalsh.com></P ></DIV ><DIV CLASS="REFSECT1" ><A NAME="AEN688" ></A ><H2 >Source Code</H2 ><PRE CLASS="PROGRAMLISTING" >(define (string-list-sosofo string-list assoc-list) ;; Build sosofo from a list of strings and an associative list (if (null? string-list) (empty-sosofo) (sosofo-append (match-substitute-sosofo (car string-list) assoc-list) (string-list-sosofo (cdr string-list) assoc-list))))</PRE ></DIV ><DIV CLASS="NAVFOOTER" ><HR ALIGN="LEFT" WIDTH="100%"><TABLE SUMMARY="Footer navigation table" WIDTH="100%" BORDER="0" CELLPADDING="0" CELLSPACING="0" ><TR ><TD WIDTH="33%" ALIGN="left" VALIGN="top" ><A HREF="match-substitute-sosofo.html" ACCESSKEY="P" >Prev</A ></TD ><TD WIDTH="34%" ALIGN="center" VALIGN="top" ><A HREF="index.html" ACCESSKEY="H" >Home</A ></TD ><TD WIDTH="33%" ALIGN="right" VALIGN="top" ><A HREF="repl-substring-p.html" ACCESSKEY="N" >Next</A ></TD ></TR ><TR ><TD WIDTH="33%" ALIGN="left" VALIGN="top" >match-substitute-sosofo</TD ><TD WIDTH="34%" ALIGN="center" VALIGN="top" ><A HREF="r300.htm" ACCESSKEY="U" >Up</A ></TD ><TD WIDTH="33%" ALIGN="right" VALIGN="top" >repl-substring?</TD ></TR ></TABLE ></DIV ></BODY ></HTML >