/usr/share/doc/racket/scheme/nest.html is in racket-doc 6.7-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 | <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html><head><meta http-equiv="content-type" content="text/html; charset=utf-8"/><title>31 scheme/nest</title><link rel="stylesheet" type="text/css" href="../scribble.css" title="default"/><link rel="stylesheet" type="text/css" href="../racket.css" title="default"/><link rel="stylesheet" type="text/css" href="../manual-style.css" title="default"/><link rel="stylesheet" type="text/css" href="../manual-racket.css" title="default"/><link rel="stylesheet" type="text/css" href="../manual-racket.css" title="default"/><link rel="stylesheet" type="text/css" href="../doc-site.css" title="default"/><script type="text/javascript" src="../scribble-common.js"></script><script type="text/javascript" src="../manual-racket.js"></script><script type="text/javascript" src="../manual-racket.js"></script><script type="text/javascript" src="../doc-site.js"></script><script type="text/javascript" src="../local-redirect/local-redirect.js"></script><script type="text/javascript" src="../local-redirect/local-user-redirect.js"></script><!--[if IE 6]><style type="text/css">.SIEHidden { overflow: hidden; }</style><![endif]--></head><body id="doc-racket-lang-org"><div class="tocset"><div class="tocview"><div class="tocviewlist tocviewlisttopspace"><div class="tocviewtitle"><table cellspacing="0" cellpadding="0"><tr><td style="width: 1em;"><a href="javascript:void(0);" title="Expand/Collapse" class="tocviewtoggle" onclick="TocviewToggle(this,"tocview_0");">▼</a></td><td></td><td><a href="index.html" class="tocviewlink" data-pltdoc="x">Scheme:<span class="mywbr"> </span> Compatibility Libraries and Executables</a></td></tr></table></div><div class="tocviewsublistonly" style="display: block;" id="tocview_0"><table cellspacing="0" cellpadding="0"><tr><td align="right">1 </td><td><a href="scheme.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme</span></span></a></td></tr><tr><td align="right">2 </td><td><a href="scheme_base.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>base</span></span></a></td></tr><tr><td align="right">3 </td><td><a href="scheme_async-channel.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>async-<wbr></wbr>channel</span></span></a></td></tr><tr><td align="right">4 </td><td><a href="scheme_bool.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>bool</span></span></a></td></tr><tr><td align="right">5 </td><td><a href="scheme_class.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>class</span></span></a></td></tr><tr><td align="right">6 </td><td><a href="scheme_cmdline.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>cmdline</span></span></a></td></tr><tr><td align="right">7 </td><td><a href="scheme_contract.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>contract</span></span></a></td></tr><tr><td align="right">8 </td><td><a href="scheme_control.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>control</span></span></a></td></tr><tr><td align="right">9 </td><td><a href="scheme_date.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>date</span></span></a></td></tr><tr><td align="right">10 </td><td><a href="scheme_dict.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>dict</span></span></a></td></tr><tr><td align="right">11 </td><td><a href="scheme_file.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>file</span></span></a></td></tr><tr><td align="right">12 </td><td><a href="scheme_fixnum.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>fixnum</span></span></a></td></tr><tr><td align="right">13 </td><td><a href="scheme_flonum.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>flonum</span></span></a></td></tr><tr><td align="right">14 </td><td><a href="scheme_foreign.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>foreign</span></span></a></td></tr><tr><td align="right">15 </td><td><a href="scheme_function.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>function</span></span></a></td></tr><tr><td align="right">16 </td><td><a href="scheme_future.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>future</span></span></a></td></tr><tr><td align="right">17 </td><td><a href="scheme_generator.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>generator</span></span></a></td></tr><tr><td align="right">18 </td><td><a href="scheme_gui.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>gui</span></span></a></td></tr><tr><td align="right">19 </td><td><a href="scheme_gui_base.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>gui/<span class="mywbr"> </span>base</span></span></a></td></tr><tr><td align="right">20 </td><td><a href="scheme_gui_dynamic.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>gui/<span class="mywbr"> </span>dynamic</span></span></a></td></tr><tr><td align="right">21 </td><td><a href="scheme_help.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>help</span></span></a></td></tr><tr><td align="right">22 </td><td><a href="scheme_include.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>include</span></span></a></td></tr><tr><td align="right">23 </td><td><a href="scheme_init.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>init</span></span></a></td></tr><tr><td align="right">24 </td><td><a href="scheme_language-info.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>language-<wbr></wbr>info</span></span></a></td></tr><tr><td align="right">25 </td><td><a href="scheme_list.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>list</span></span></a></td></tr><tr><td align="right">26 </td><td><a href="scheme_load.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>load</span></span></a></td></tr><tr><td align="right">27 </td><td><a href="scheme_local.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>local</span></span></a></td></tr><tr><td align="right">28 </td><td><a href="scheme_match.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>match</span></span></a></td></tr><tr><td align="right">29 </td><td><a href="scheme_math.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>math</span></span></a></td></tr><tr><td align="right">30 </td><td><a href="scheme_mpair.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>mpair</span></span></a></td></tr><tr><td align="right">31 </td><td><a href="" class="tocviewselflink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>nest</span></span></a></td></tr><tr><td align="right">32 </td><td><a href="scheme_package.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>package</span></span></a></td></tr><tr><td align="right">33 </td><td><a href="scheme_path.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>path</span></span></a></td></tr><tr><td align="right">34 </td><td><a href="scheme_port.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>port</span></span></a></td></tr><tr><td align="right">35 </td><td><a href="scheme_pretty.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>pretty</span></span></a></td></tr><tr><td align="right">36 </td><td><a href="scheme_promise.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>promise</span></span></a></td></tr><tr><td align="right">37 </td><td><a href="scheme_provide.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>provide</span></span></a></td></tr><tr><td align="right">38 </td><td><a href="scheme_provide-syntax.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>provide-<wbr></wbr>syntax</span></span></a></td></tr><tr><td align="right">39 </td><td><a href="scheme_provide-transform.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>provide-<wbr></wbr>transform</span></span></a></td></tr><tr><td align="right">40 </td><td><a href="scheme_require.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>require</span></span></a></td></tr><tr><td align="right">41 </td><td><a href="scheme_require-syntax.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>require-<wbr></wbr>syntax</span></span></a></td></tr><tr><td align="right">42 </td><td><a href="scheme_require-transform.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>require-<wbr></wbr>transform</span></span></a></td></tr><tr><td align="right">43 </td><td><a href="scheme_runtime-config.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>runtime-<wbr></wbr>config</span></span></a></td></tr><tr><td align="right">44 </td><td><a href="scheme_runtime-path.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>runtime-<wbr></wbr>path</span></span></a></td></tr><tr><td align="right">45 </td><td><a href="scheme_sandbox.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>sandbox</span></span></a></td></tr><tr><td align="right">46 </td><td><a href="scheme_serialize.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>serialize</span></span></a></td></tr><tr><td align="right">47 </td><td><a href="scheme_set.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>set</span></span></a></td></tr><tr><td align="right">48 </td><td><a href="scheme_signature.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>signature</span></span></a></td></tr><tr><td align="right">49 </td><td><a href="scheme_shared.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>shared</span></span></a></td></tr><tr><td align="right">50 </td><td><a href="scheme_splicing.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>splicing</span></span></a></td></tr><tr><td align="right">51 </td><td><a href="scheme_string.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>string</span></span></a></td></tr><tr><td align="right">52 </td><td><a href="scheme_struct-info.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>struct-<wbr></wbr>info</span></span></a></td></tr><tr><td align="right">53 </td><td><a href="scheme_stxparam.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>stxparam</span></span></a></td></tr><tr><td align="right">54 </td><td><a href="scheme_stxparam-exptime.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>stxparam-<wbr></wbr>exptime</span></span></a></td></tr><tr><td align="right">55 </td><td><a href="scheme_surrogate.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>surrogate</span></span></a></td></tr><tr><td align="right">56 </td><td><a href="scheme_system.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>system</span></span></a></td></tr><tr><td align="right">57 </td><td><a href="scheme_tcp.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>tcp</span></span></a></td></tr><tr><td align="right">58 </td><td><a href="scheme_trait.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>trait</span></span></a></td></tr><tr><td align="right">59 </td><td><a href="scheme_udp.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>udp</span></span></a></td></tr><tr><td align="right">60 </td><td><a href="scheme_unit.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>unit</span></span></a></td></tr><tr><td align="right">61 </td><td><a href="scheme_unit-exptime.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>unit-<wbr></wbr>exptime</span></span></a></td></tr><tr><td align="right">62 </td><td><a href="scheme_unsafe_ops.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>unsafe/<span class="mywbr"> </span>ops</span></span></a></td></tr><tr><td align="right">63 </td><td><a href="scheme_vector.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">scheme/<span class="mywbr"> </span>vector</span></span></a></td></tr><tr><td align="right">64 </td><td><a href="mred.html" class="tocviewlink" data-pltdoc="x"><span class="RktModLink"><span class="RktSym">mred</span></span></a></td></tr><tr><td align="right">65 </td><td><a href="compat-exe.html" class="tocviewlink" data-pltdoc="x">Compatibility Executables</a></td></tr></table></div></div></div><div class="tocsub"><div class="tocsubtitle">On this page:</div><table class="tocsublist" cellspacing="0"><tr><td><a href="#%28form._%28%28lib._scheme%2Fnest..rkt%29._nest%29%29" class="tocsublink" data-pltdoc="x"><span class="RktSym">nest</span></a></td></tr></table></div></div><div class="maincolumn"><div class="main"><div class="navsettop"><span class="navleft"><form class="searchform"><input class="searchbox" style="color: #888;" type="text" value="...search manuals..." title="Enter a search string to search the manuals" onkeypress="return DoSearchKey(event, this, "6.7", "../");" onfocus="this.style.color="black"; this.style.textAlign="left"; if (this.value == "...search manuals...") this.value="";" onblur="if (this.value.match(/^ *$/)) { this.style.color="#888"; this.style.textAlign="center"; this.value="...search manuals..."; }"/></form> <a href="../index.html" title="up to the documentation top" data-pltdoc="x" onclick="return GotoPLTRoot("6.7");">top</a></span><span class="navright"> <a href="scheme_mpair.html" title="backward to "30 scheme/mpair"" data-pltdoc="x">← prev</a> <a href="index.html" title="up to "Scheme: Compatibility Libraries and Executables"" data-pltdoc="x">up</a> <a href="scheme_package.html" title="forward to "32 scheme/package"" data-pltdoc="x">next →</a></span> </div><h3 x-source-module="(lib "scribblings/scheme/scheme.scrbl")" x-source-pkg="racket-doc" x-part-tag=""nest"">31<tt> </tt><a name="(part._nest)"></a><a name="(mod-path._scheme/nest)"></a><a href="" class="RktModLink" data-pltdoc="x"><span class="RktSym">scheme/nest</span></a></h3><p><table cellspacing="0" cellpadding="0" class="defmodule"><tr><td align="left"><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="https://download.racket-lang.org/docs/6.7/html/local-redirect/index.html?doc=reference&rel=require.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._require%2529%2529&version=6.7" class="RktStxLink Sq" data-pltdoc="x">require</a></span><span class="stt"> </span><a href="" class="RktModLink" data-pltdoc="x"><span class="RktSym">scheme/nest</span></a><span class="RktPn">)</span></td><td align="right"><span class="RpackageSpec"><span class="Smaller"> package:</span> <span class="stt">scheme-lib</span></span></td></tr></table></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>syntax</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(form._((lib._scheme/nest..rkt)._nest))"></a><span title="Provided from: scheme/nest | Package: scheme-lib"><span class="RktSym"><span class="RktSymDef RktSym">nest</span></span></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktVar">datum</span><span class="hspace"> </span><span class="RktMeta">...+</span><span class="RktPn">]</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVar">body</span><span class="hspace"> </span><span class="RktMeta">...+</span><span class="RktPn">)</span></p></blockquote></td></tr></table></blockquote></div><div class="SIntrapara">Combines nested expressions that syntactically drift to the right into
a more linear textual format, much in the same way that <span class="RktSym">let*</span>
linearizes a sequence of nested <span class="RktSym">let</span> expressions.</div></p><p>For example,</p><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="RktPn">(</span><span class="RktSym">nest</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">let</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">x</span><span class="hspace"> </span><span class="RktVal">10</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">y</span><span class="hspace"> </span><span class="RktVal">6</span><span class="RktPn">]</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">with-handlers</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">exn:fail?</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">lambda</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">x</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">15</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">parameterize</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">current-output-port</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">current-error-port</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">let-values</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym">d</span><span class="hspace"> </span><span class="RktSym">r</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">quotient/remainder</span><span class="hspace"> </span><span class="RktSym">x</span><span class="hspace"> </span><span class="RktSym">y</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">display</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">+</span><span class="hspace"> </span><span class="RktSym">d</span><span class="hspace"> </span><span class="RktSym">r</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></blockquote><p>is equivalent to</p><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="RktPn">(</span><span class="RktSym">let</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">x</span><span class="hspace"> </span><span class="RktVal">10</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">y</span><span class="hspace"> </span><span class="RktVal">6</span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">with-handlers</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">exn:fail?</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">lambda</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">x</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">15</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">parameterize</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">current-output-port</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">current-error-port</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">let-values</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym">d</span><span class="hspace"> </span><span class="RktSym">r</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">quotient/remainder</span><span class="hspace"> </span><span class="RktSym">x</span><span class="hspace"> </span><span class="RktSym">y</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">display</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">+</span><span class="hspace"> </span><span class="RktSym">d</span><span class="hspace"> </span><span class="RktSym">r</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></blockquote><p>The <span class="RktSym">nest</span> form is unusual in that it has no semantics apart
from its expansion, and its implementation is easier to understand
than a precise prose description:</p><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="RktPn">(</span><span class="RktSym">define-syntax</span><span class="hspace"> </span><span class="RktSym">nest</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">syntax-rules</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym">nest</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktSym">body0</span><span class="hspace"> </span><span class="RktVar">body</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">let</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktSym">body0</span><span class="hspace"> </span><span class="RktVar">body</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym">nest</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">form</span><span class="hspace"> </span><span class="RktSym">forms</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">]</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktSym">body0</span><span class="hspace"> </span><span class="RktVar">body</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">form</span><span class="hspace"> </span><span class="RktSym">forms</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">let</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktSym">body0</span><span class="hspace"> </span><span class="RktVar">body</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym">nest</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">form</span><span class="hspace"> </span><span class="RktSym">forms</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">]</span><span class="hspace"> </span><span class="RktPn">. </span><span class="RktSym">more</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktSym">body0</span><span class="hspace"> </span><span class="RktVar">body</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">form</span><span class="hspace"> </span><span class="RktSym">forms</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym">nest</span><span class="hspace"> </span><span class="RktSym">more</span><span class="hspace"> </span><span class="RktSym">body0</span><span class="hspace"> </span><span class="RktVar">body</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></blockquote><div class="navsetbottom"><span class="navleft"><form class="searchform"><input class="searchbox" style="color: #888;" type="text" value="...search manuals..." title="Enter a search string to search the manuals" onkeypress="return DoSearchKey(event, this, "6.7", "../");" onfocus="this.style.color="black"; this.style.textAlign="left"; if (this.value == "...search manuals...") this.value="";" onblur="if (this.value.match(/^ *$/)) { this.style.color="#888"; this.style.textAlign="center"; this.value="...search manuals..."; }"/></form> <a href="../index.html" title="up to the documentation top" data-pltdoc="x" onclick="return GotoPLTRoot("6.7");">top</a></span><span class="navright"> <a href="scheme_mpair.html" title="backward to "30 scheme/mpair"" data-pltdoc="x">← prev</a> <a href="index.html" title="up to "Scheme: Compatibility Libraries and Executables"" data-pltdoc="x">up</a> <a href="scheme_package.html" title="forward to "32 scheme/package"" data-pltdoc="x">next →</a></span> </div></div></div><div id="contextindicator"> </div></body></html>
|