feat: add missing KF6 framework recipes
This commit is contained in:
@@ -0,0 +1,305 @@
|
||||
<!DOCTYPE html>
|
||||
<html><head>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
|
||||
<title>highlight.scheme</title>
|
||||
<meta name="generator" content="KF5::SyntaxHighlighting - Definition (Scheme) - Theme (Breeze Light)"/>
|
||||
</head><body style="background-color:#ffffff;color:#1f1c1b"><pre>
|
||||
<span style="color:#898887">; This is a test file to test kates scheme highlighting</span>
|
||||
<span style="color:#898887">; This is a comment</span>
|
||||
|
||||
<span style="color:#898887">; Brackets colors</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#008800;font-weight:bold">(</span><span style="color:#3689e6;font-weight:bold">(</span><span style="color:#a100a1;font-weight:bold">(</span><span style="color:#ff0000;font-weight:bold">(</span><span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#008800;font-weight:bold">(</span><span style="color:#3689e6;font-weight:bold">(</span><span style="color:#a100a1;font-weight:bold">(</span><span style="color:#ff0000;font-weight:bold">(</span> <span style="color:#ff0000;font-weight:bold">)</span><span style="color:#a100a1;font-weight:bold">)</span><span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span><span style="color:#a100a1;font-weight:bold">)</span><span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; Another comment, usually used.</span>
|
||||
<span style="color:#0057ae;background-color:#e0e9f8">;BEGIN region marker</span>
|
||||
<span style="color:#898887">;; a vektor</span>
|
||||
<span style="color:#ff0000;font-weight:bold">#(</span><span style="color:#b08000">1</span> <span style="color:#b08000">2</span> <span style="color:#b08000">3</span> <span style="color:#b08000">4</span> <span style="color:#b08000">5</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#ca60ca">[</span>'a 'b 'c<span style="color:#ca60ca">]</span>
|
||||
<span style="color:#0057ae;background-color:#e0e9f8">;END region marker</span>
|
||||
<span style="color:#898887">;; this represents integer 28 (</span><span style="color:#ca9219;background-color:#451e1a;font-weight:bold">FIXME</span><span style="color:#898887">: does not work perfectly atm!)</span>
|
||||
<span style="color:#b08000">28</span> <span style="color:#b08000">028</span> <span style="color:#3daee9">#e</span><span style="color:#b08000">28</span> <span style="color:#3daee9">#i</span><span style="color:#b08000">28</span> <span style="color:#898887">;; Normal, normal, exact, inexact</span>
|
||||
<span style="color:#3daee9">#b</span><span style="color:#b08000">11100</span> <span style="color:#3daee9">#o</span><span style="color:#b08000">34</span> <span style="color:#3daee9">#d</span><span style="color:#b08000">28</span> <span style="color:#3daee9">#x</span><span style="color:#b08000">1c</span> <span style="color:#898887">;; Bin, oct, dec, hex</span>
|
||||
<span style="color:#3daee9">#oe</span><span style="color:#b08000">34</span> <span style="color:#3daee9">#eo</span><span style="color:#b08000">34</span> <span style="color:#898887">;; combined.</span>
|
||||
<span style="color:#3daee9">#o#e</span><span style="color:#b08000">34</span> <span style="color:#3daee9">#e#o</span><span style="color:#b08000">34</span> <span style="color:#898887">;; combined.</span>
|
||||
<span style="color:#898887">;; inf</span>
|
||||
<span style="color:#3daee9">#i</span><span style="color:#644a9b">+</span>inf.0 <span style="color:#b08000">3</span>+inf.0
|
||||
|
||||
<span style="color:#898887">;; symbols</span>
|
||||
&symbol-42
|
||||
symbol-42<span style="color:#898887">;comment</span>
|
||||
|
||||
<span style="color:#898887">;; char.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#924c9d">#\y</span> <span style="color:#924c9d">#\space</span><span style="color:#ff0000;font-weight:bold">)</span> <span style="color:#898887">;; list: `y' space.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#924c9d">#\ </span> <span style="color:#924c9d">#\\</span> <span style="color:#924c9d">#\)</span><span style="color:#ff0000;font-weight:bold">)</span> <span style="color:#898887">;; list of spaces, backslash and`)'.</span>
|
||||
<span style="color:#924c9d">#\newline</span> <span style="color:#898887">;; a newline-char</span>
|
||||
<span style="color:#924c9d">#\NewLine</span> <span style="color:#898887">;; another one :)</span>
|
||||
<span style="color:#924c9d">#\</span><span style="color:#bf0303;text-decoration:underline">pager</span> <span style="color:#898887">;; bad char</span>
|
||||
|
||||
<span style="color:#bf0303">"Hello, world"</span> <span style="color:#898887">;; a string</span>
|
||||
|
||||
<span style="color:#bf0303">"hoho, what do you</span>
|
||||
<span style="color:#bf0303">want to do ;; this is NO comment</span>
|
||||
<span style="color:#bf0303">with that?"</span>
|
||||
|
||||
<span style="color:#898887">;; R5RS definiert diese beiden.</span>
|
||||
<span style="color:#bf0303">"Das ist </span><span style="color:#924c9d">\"</span><span style="color:#bf0303">in Anführungszeichen</span><span style="color:#924c9d">\"</span><span style="color:#bf0303"> und mit </span><span style="color:#924c9d">\\</span><span style="color:#bf0303"> Backslash."</span>
|
||||
|
||||
<span style="color:#bf0303">"hexadecimal char </span><span style="color:#924c9d">\x1aF;</span><span style="color:#bf0303">."</span>
|
||||
|
||||
<span style="color:#898887">;; Kawa string templates</span>
|
||||
<span style="color:#bf0303">&{Hello </span><span style="color:#ff0000;font-weight:bold">&[</span>name<span style="color:#ff0000;font-weight:bold">]</span><span style="color:#bf0303">!}</span> 'no-string
|
||||
<span style="color:#bf0303">&{This has a {braced} section.}</span> 'no-string
|
||||
<span style="color:#bf0303">&{</span><span style="color:#924c9d">&#27;</span><span style="color:#bf0303"> </span><span style="color:#924c9d">&#x1B;</span><span style="color:#bf0303"> </span><span style="color:#924c9d">&amp;</span><span style="color:#bf0303"> </span><span style="color:#924c9d">&lt;</span><span style="color:#bf0303"> </span><span style="color:#924c9d">&gt;</span><span style="color:#bf0303"> </span><span style="color:#924c9d">&quot;</span><span style="color:#bf0303"> </span><span style="color:#924c9d">&apos;</span><span style="color:#bf0303">}</span> 'no-string
|
||||
<span style="color:#898887">; Multiline string literals</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span>string-capitalize <span style="color:#bf0303">&{one two three</span>
|
||||
<span style="color:#bf0303">uno dos tres</span>
|
||||
<span style="color:#bf0303">}</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">write</span> <span style="color:#ff8800;font-weight:bold">(</span>string-capitalize <span style="color:#bf0303">&{</span>
|
||||
<span style="color:#bf0303"> </span><span style="color:#ca60ca">&|</span><span style="color:#bf0303">one two three</span>
|
||||
<span style="color:#bf0303"> </span><span style="color:#ca60ca">&|</span><span style="color:#bf0303">uno dos tres</span>
|
||||
<span style="color:#bf0303">}</span><span style="color:#ff8800;font-weight:bold">)</span> out<span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#bf0303">&{abc</span><span style="color:#ca60ca">&-</span><span style="color:#bf0303"> </span><span style="color:#898887">#|comment|#</span>
|
||||
<span style="color:#bf0303"> def}</span> 'no-string
|
||||
<span style="color:#bf0303">&{</span><span style="color:#898887">&#|line 1|#</span><span style="color:#bf0303">one two</span>
|
||||
<span style="color:#bf0303"> </span><span style="color:#898887">&#|line 2|#</span><span style="color:#bf0303"> three</span>
|
||||
<span style="color:#bf0303"> </span><span style="color:#898887">&#|line 3|#</span><span style="color:#bf0303">uno dos tres</span>
|
||||
<span style="color:#bf0303">}</span> 'no-string
|
||||
<span style="color:#898887">; Embedded expressions</span>
|
||||
<span style="color:#bf0303">&{Hello </span><span style="color:#ff0000;font-weight:bold">&[</span><span style="color:#ff8800;font-weight:bold">(</span>string-capitalize name<span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">]</span><span style="color:#bf0303">!}</span> 'no-string
|
||||
<span style="color:#bf0303">&{Hello </span><span style="color:#ff0000;font-weight:bold">&(</span>string-capitalize name<span style="color:#ff0000;font-weight:bold">)</span><span style="color:#bf0303">!}</span> 'no-string
|
||||
<span style="color:#898887">; formatting</span>
|
||||
<span style="color:#bf0303">&{</span><span style="color:#0095ff;font-weight:bold">&~{</span><span style="color:#ff0000;font-weight:bold">&[</span>arr<span style="color:#ff0000;font-weight:bold">]</span><span style="color:#0095ff;font-weight:bold">&~^_&~</span><span style="color:#bf0303">}</span><span style="color:#ca60ca">}</span> 'no-string
|
||||
<span style="color:#bf0303">&{</span><span style="color:#0095ff;font-weight:bold">&~{&~a</span><span style="color:#bf0303">[arr]</span><span style="color:#0095ff;font-weight:bold">&~^_&~</span><span style="color:#bf0303">}</span><span style="color:#ca60ca">}</span> 'no-string
|
||||
|
||||
<span style="color:#898887">;; Kawa XML literals</span>
|
||||
<span style="color:#bf0303">#<p>The result is <b>final</b>!</p></span> 'no-xml
|
||||
<span style="color:#bf0303">#<em>The result is </span><span style="color:#ff0000;font-weight:bold">&{</span>result<span style="color:#ff0000;font-weight:bold">}</span><span style="color:#bf0303">.</em></span> 'no-xml
|
||||
<span style="color:#bf0303">#<p>This is <(</span><span style="font-weight:bold">if</span> be-bold 'strong 'em<span style="color:#bf0303">)>important</>!</p></span> 'no-xml
|
||||
<span style="color:#bf0303">#<p>This is <{</span><span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">if</span> be-bold 'strong 'em<span style="color:#ff0000;font-weight:bold">)</span><span style="color:#bf0303">}>important</>!</p></span> 'no-xml
|
||||
<span style="color:#bf0303">#<p>Special characters <![CDATA[</span><span style="color:#bf0303">< > & ' "</span><span style="color:#bf0303">]]> here.</p></span> 'no-xml
|
||||
<span style="color:#bf0303">#<p>Special characters </span><span style="color:#b08000">&lt;</span><span style="color:#bf0303"> </span><span style="color:#b08000">&gt;</span><span style="color:#bf0303"> </span><span style="color:#b08000">&amp;</span><span style="color:#bf0303"> </span><span style="color:#b08000">&quot;</span><span style="color:#bf0303"> </span><span style="color:#b08000">&apos;</span><span style="color:#bf0303"> here.</p></span> 'no-xml
|
||||
<span style="color:#bf0303">#<gnu:b</span><span style="color:#006e28"> xmlns:gnu=</span><span style="color:#bf0303">"http://gnu.org/"</span><span style="color:#bf0303">/></span> 'no-xml
|
||||
<span style="color:#bf0303">#<chapter><?dbhtml</span><span style="color:#006e28"> filename="intro.html" </span><span style="color:#bf0303">?></span>
|
||||
<span style="color:#bf0303"><title>Introduction</title></span>
|
||||
<span style="color:#bf0303">...</span>
|
||||
<span style="color:#bf0303"></chapter></span> 'no-xml
|
||||
|
||||
|
||||
<span style="color:#898887">;; Kawa Regular expression</span>
|
||||
<span style="color:#ca60ca">#/</span><span style="color:#0095ff;font-weight:bold">a\.c</span><span style="color:#ca60ca">/</span>
|
||||
<span style="color:#ca60ca">#/</span><span style="color:#0095ff;font-weight:bold">a</span><span style="color:#ca60ca">/</span><span style="color:#0095ff;font-weight:bold">i</span>
|
||||
<span style="color:#ca60ca">#/</span><span style="color:#0095ff;font-weight:bold">a</span><span style="color:#ca60ca">/</span><span style="color:#0095ff;font-weight:bold">im</span>
|
||||
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">let</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span>x <span style="color:#008800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> <span style="color:#b08000">1</span> <span style="color:#b08000">2</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span> <span style="color:#888800;font-weight:bold">(</span>y <span style="color:#bf0303">"blah"</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#898887">;; `let' highlighting.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">and</span> <span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">number?</span> x<span style="color:#888800;font-weight:bold">)</span> <span style="color:#898887">;; `and' highlighting.</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">string?</span> y<span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">let*</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span>x <span style="color:#b08000">2</span><span style="color:#888800;font-weight:bold">)</span> <span style="color:#888800;font-weight:bold">(</span>y <span style="color:#008800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> x <span style="color:#b08000">1</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#898887">;; `let*' too.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">or</span> <span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">negative?</span> x<span style="color:#888800;font-weight:bold">)</span> <span style="color:#898887">;; `or' anyways.</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">negative?</span> y<span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">do</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span>vec <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">make-vector</span> <span style="color:#b08000">5</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span> <span style="color:#898887">;; `do' you may guess!</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span>i <span style="color:#b08000">0</span> <span style="color:#008800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> i <span style="color:#b08000">1</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#ca60ca">=</span> i <span style="color:#b08000">5</span><span style="color:#888800;font-weight:bold">)</span> vec<span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">vector-set!</span> vec i i<span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">quasiquote</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> <span style="color:#b08000">1</span> <span style="color:#b08000">2</span><span style="color:#888800;font-weight:bold">)</span> <span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">unquote</span> <span style="color:#008800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> <span style="color:#b08000">1</span> <span style="color:#b08000">2</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#898887">;; same as: `((+ 1 2) ,(+ 1 2))</span>
|
||||
|
||||
<span style="color:#898887">;; see above.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">quasiquote</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> <span style="color:#b08000">1</span> <span style="color:#b08000">2</span><span style="color:#888800;font-weight:bold">)</span> <span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">unquote-splicing</span> <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">list</span> <span style="color:#b08000">1</span> <span style="color:#b08000">2</span> <span style="color:#b08000">3</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#898887">;; same as: `((+ 1 2) ,@(+ 1 2))</span>
|
||||
|
||||
<span style="color:#898887">;; not necessary.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">quote</span> <span style="color:#ff8800;font-weight:bold">()</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">cond</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">string?</span> x<span style="color:#888800;font-weight:bold">)</span> <span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">string->symbol</span> x<span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#898887">;; `cond' highlighting.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">symbol?</span> x<span style="color:#888800;font-weight:bold">)</span> <span style="color:#ca60ca">=></span> <span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#008800;font-weight:bold">(</span>x<span style="color:#008800;font-weight:bold">)</span> x<span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#898887">;; `=>' highlighting.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">else</span> <span style="color:#898887">;; `else' highlighting.</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">error</span> <span style="color:#bf0303">"Blah"</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">case</span> x <span style="color:#898887">;; `case' highlighting.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#b08000">#t</span><span style="color:#888800;font-weight:bold">)</span> 'true<span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#b08000">#f</span><span style="color:#888800;font-weight:bold">)</span> 'false<span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#008800;font-weight:bold">()</span><span style="color:#888800;font-weight:bold">)</span> 'null<span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span><span style="color:#b08000">0</span><span style="color:#888800;font-weight:bold">)</span> 'zero<span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; highlight `let-syntax' and `syntax-rules' .</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">let-syntax</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span>when <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">syntax-rules</span> <span style="color:#3689e6;font-weight:bold">()</span>
|
||||
<span style="color:#3689e6;font-weight:bold">(</span><span style="color:#a100a1;font-weight:bold">(</span>when test stmt1 stmt2 <span style="color:#ca60ca">...</span><span style="color:#a100a1;font-weight:bold">)</span>
|
||||
<span style="color:#898887">;; hl `begin' .</span>
|
||||
<span style="color:#a100a1;font-weight:bold">(</span><span style="font-weight:bold">if</span> test <span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">begin</span> stmt1 stmt2 <span style="color:#ca60ca">...</span><span style="color:#ff0000;font-weight:bold">)</span><span style="color:#a100a1;font-weight:bold">)</span><span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">let</span> <span style="color:#888800;font-weight:bold">(</span><span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">if</span> <span style="color:#b08000">#t</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span> <span style="color:#898887">;; here`if' is actually no keyword.</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span>when <span style="font-weight:bold">if</span> <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">set!</span> <span style="font-weight:bold">if</span> 'now<span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span> <span style="color:#898887">;; nor here.</span>
|
||||
<span style="font-weight:bold">if</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">letrec-syntax</span> <span style="color:#ca60ca">...</span><span style="color:#ff0000;font-weight:bold">)</span> <span style="color:#898887">;; hl `letrec-syntax'.</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-syntax</span><span style="color:#644a9b"> when</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">syntax-rules</span> <span style="color:#888800;font-weight:bold">()</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="color:#008800;font-weight:bold">(</span>when test stmt1 stmt2 <span style="color:#ca60ca">...</span><span style="color:#008800;font-weight:bold">)</span>
|
||||
<span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">if</span> test <span style="color:#3689e6;font-weight:bold">(</span><span style="font-weight:bold">begin</span> stmt1 stmt2 <span style="color:#ca60ca">...</span><span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>)
|
||||
|
||||
<span style="color:#898887">;; variable definitions.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define</span><span style="color:#644a9b"> natural-numbers </span><span style="color:#898887">;; hl `define' and the var name</span>
|
||||
<span style="color:#898887">;; endless stream of all natual numbers.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">letrec</span> <span style="color:#888800;font-weight:bold">(</span><span style="color:#008800;font-weight:bold">(</span>next-cell <span style="color:#898887">;; hl `letrec'.</span>
|
||||
<span style="color:#3689e6;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#a100a1;font-weight:bold">(</span>x<span style="color:#a100a1;font-weight:bold">)</span> <span style="color:#898887">;; hl `lambda'.</span>
|
||||
<span style="color:#898887">;; hl `delay' .</span>
|
||||
<span style="color:#a100a1;font-weight:bold">(</span><span style="font-weight:bold">cons</span> x <span style="color:#ff0000;font-weight:bold">(</span>delay <span style="color:#ff8800;font-weight:bold">(</span>next-cell <span style="color:#888800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> x <span style="color:#b08000">1</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span><span style="color:#a100a1;font-weight:bold">)</span><span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span>next-cell <span style="color:#b08000">0</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; a procedure with unusual but allowed name.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define</span><span style="color:#644a9b"> 1+</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#888800;font-weight:bold">(</span>x<span style="color:#888800;font-weight:bold">)</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="color:#ca60ca">+</span> x <span style="color:#b08000">1</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; a predicate</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define</span><span style="color:#644a9b"> between?</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#888800;font-weight:bold">(</span>x y z<span style="color:#888800;font-weight:bold">)</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">if</span> <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">and</span> <span style="color:#3689e6;font-weight:bold">(</span><span style="color:#ca60ca">>=</span> x y<span style="color:#3689e6;font-weight:bold">)</span> <span style="color:#3689e6;font-weight:bold">(</span><span style="color:#ca60ca"><=</span> x z<span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span>
|
||||
<span style="color:#b08000">#t</span> <span style="color:#898887">;; True</span>
|
||||
<span style="color:#b08000">#f</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span> <span style="color:#898887">;; False.</span>
|
||||
|
||||
<span style="color:#898887">;; imperative procedure</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define</span><span style="color:#644a9b"> set-something!</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#888800;font-weight:bold">(</span>required-argument another-one <span style="color:#ca60ca">.</span> all-remaining-args<span style="color:#888800;font-weight:bold">)</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">set-car!</span> another-one <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> all-args
|
||||
<span style="color:#3689e6;font-weight:bold">(</span><span style="font-weight:bold">set-cdr!</span> required-argument
|
||||
<span style="color:#a100a1;font-weight:bold">(</span><span style="font-weight:bold">append</span> all-remaining-args
|
||||
all-args<span style="color:#a100a1;font-weight:bold">)</span><span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define</span><span style="color:#644a9b"> compose</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#888800;font-weight:bold">(</span>f g<span style="color:#888800;font-weight:bold">)</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#008800;font-weight:bold">(</span>x<span style="color:#008800;font-weight:bold">)</span>
|
||||
<span style="color:#008800;font-weight:bold">(</span>f <span style="color:#3689e6;font-weight:bold">(</span>g x<span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; syntactical sugar for procedure-definitions.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define</span><span style="color:#644a9b"> </span><span style="color:#ff8800;font-weight:bold">(</span>compose f g<span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#888800;font-weight:bold">(</span>x<span style="color:#888800;font-weight:bold">)</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span>f <span style="color:#008800;font-weight:bold">(</span>g x<span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;;;;;;;;;;;;;;;;;;;;;;;;;;;</span>
|
||||
<span style="color:#898887">;; NOW: Guile extensions ;;</span>
|
||||
<span style="color:#898887">;;;;;;;;;;;;;;;;;;;;;;;;;;;</span>
|
||||
|
||||
<span style="color:#898887">;; procedure-generator.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define</span><span style="color:#644a9b"> </span><span style="color:#ff8800;font-weight:bold">(</span><span style="color:#888800;font-weight:bold">(</span>compose f g<span style="color:#888800;font-weight:bold">)</span> x<span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span>f <span style="color:#888800;font-weight:bold">(</span>g x<span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; scheme doesn't say, which chars may be in variables...</span>
|
||||
<span style="color:#898887">;; At least: Guile accepts umlauts</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-private</span><span style="color:#644a9b"> </span><span style="color:#ff8800;font-weight:bold">(</span>timetr??? sprache<span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#898887">;; hl `define-private'.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span>list-dialekt? sprache<span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-public</span><span style="color:#644a9b"> x </span><span style="color:#b08000">#t</span><span style="color:#ff0000;font-weight:bold">)</span> <span style="color:#898887">;; hl `define-public'.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-module</span><span style="color:#644a9b"> </span><span style="color:#ff8800;font-weight:bold">(</span>foo bar<span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span> <span style="color:#898887">;; hl `define-module'.</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-macro</span><span style="color:#644a9b"> </span><span style="color:#ff8800;font-weight:bold">(</span>neither <span style="color:#ca60ca">.</span> exprs<span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#898887">;; hl `define-macro'.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">`(</span><span style="font-weight:bold">and</span> ,<span style="color:#888800;font-weight:bold">@(</span>map <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#3689e6;font-weight:bold">(</span>x<span style="color:#3689e6;font-weight:bold">)</span> <span style="color:#3689e6;font-weight:bold">`(</span><span style="font-weight:bold">not</span> ,x<span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span> exprs<span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">defmacro</span><span style="color:#644a9b"> neither </span>exprs <span style="color:#898887">;; `defmacro' as well.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">`(</span><span style="font-weight:bold">and</span> ,<span style="color:#888800;font-weight:bold">@(</span>map <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#3689e6;font-weight:bold">(</span>x<span style="color:#3689e6;font-weight:bold">)</span> <span style="color:#3689e6;font-weight:bold">`(</span><span style="font-weight:bold">not</span> ,x<span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span> exprs<span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; hl, but I really don't know what this is supposed to do :-)</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-syntax-macro</span><span style="color:#644a9b"> ...</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; hl GOOPS-`defines'</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-method</span><span style="color:#644a9b"> </span><span style="color:#ff8800;font-weight:bold">(</span>foo bar <span style="color:#888800;font-weight:bold">(</span>baz <vector><span style="color:#888800;font-weight:bold">)</span> qux<span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#ca60ca">...</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-class</span><span style="color:#644a9b"> <foo> </span><span style="color:#ca60ca">...</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-generic</span><span style="color:#644a9b"> foo</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="color:#0095ff;font-weight:bold">define-accessor</span><span style="color:#644a9b"> bar</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; Keywords!</span>
|
||||
<span style="color:#ff0000;font-weight:bold">(</span>blah #:foo <span style="color:#b08000">33</span> #:bar <span style="color:#b08000">44</span><span style="color:#ff0000;font-weight:bold">)</span>
|
||||
|
||||
<span style="color:#898887">;; another convention for symbols:</span>
|
||||
#<span style="color:#ca60ca">{</span>foo<span style="color:#ca60ca">}</span>#
|
||||
|
||||
#<span style="color:#ca60ca">{</span>a
|
||||
few
|
||||
lines<span style="color:#ca60ca">}</span>#
|
||||
|
||||
#<span style="color:#ca60ca">{</span><span style="color:#b08000">4711</span><span style="color:#ca60ca">}</span>#
|
||||
|
||||
<span style="color:#898887">;; more chars.</span>
|
||||
<span style="color:#924c9d">#\nul</span> <span style="color:#924c9d">#\nl</span> <span style="color:#924c9d">#\esc</span> <span style="color:#924c9d">#\bs</span> <span style="color:#924c9d">#\bel</span> <span style="color:#924c9d">#\syn</span> <span style="color:#924c9d">#\ack</span> <span style="color:#924c9d">#\sp</span> <span style="color:#898887">;; etc, utc, itc, oops (this is boring)</span>
|
||||
|
||||
<span style="color:#898887">#| R6RS / SRFI-30 block comment</span>
|
||||
<span style="color:#898887">supports #| nested block |# comments |#</span>
|
||||
'now-no-comment-anymore
|
||||
|
||||
<span style="color:#898887">#!</span>
|
||||
<span style="color:#898887"> guile block-comment.</span>
|
||||
<span style="color:#898887">!#</span>
|
||||
|
||||
<span style="color:#898887">;; now, a bit hairy:</span>
|
||||
<span style="color:#898887">#! comment !#</span>
|
||||
<span style="color:#898887">still comment!!!</span>
|
||||
<span style="color:#898887">!#</span>
|
||||
'now-no-comment-anymore
|
||||
|
||||
<span style="color:#898887">;; more precise:</span>
|
||||
<span style="color:#898887">#! comment !#</span>
|
||||
<span style="color:#898887">still comment</span>
|
||||
<span style="color:#898887">!# still comment!</span>
|
||||
<span style="color:#898887">!#</span>
|
||||
'now-no-comment-anymore
|
||||
|
||||
<span style="color:#898887">;; Datum comment</span>
|
||||
<span style="color:#898887">#;(1 2 3)</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;1</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#o12</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;"bla bla\""</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;[1 2 3]</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;[1 [2 (3 (4))]]</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;(1 (2 [3 [4]]))</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#/reg/im</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<p>The result is <b>final</b>!</p></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<em>The result is &{result}.</em></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<p>This is <(if be-bold 'strong 'em)>important</>!</p></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<p>This is <{(if be-bold 'strong 'em)}>important</>!</p></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<p>Specal characters <![CDATA[< > & ' "]]> here.</p></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<p>Specal characters &lt; &gt; &amp; &quot; &apos; here.</p></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<gnu:b xmlns:gnu="http://gnu.org/"/></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#<chapter><?dbhtml filename="intro.html" ?></span>
|
||||
<span style="color:#898887"><title>Introduction</title></span>
|
||||
<span style="color:#898887">...</span>
|
||||
<span style="color:#898887"></chapter></span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;#&{Hello &[name]!}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{This has a {braced} section.}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{&#27;&#x1B; &amp; &lt; &gt; &quot; &apos;}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;(string-capitalize &{one two three</span>
|
||||
<span style="color:#898887">uno dos tres</span>
|
||||
<span style="color:#898887">})</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;(write (string-capitalize &{</span>
|
||||
<span style="color:#898887"> &|one two three</span>
|
||||
<span style="color:#898887"> &|uno dos tres</span>
|
||||
<span style="color:#898887">}) out)</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{abc&-</span>
|
||||
<span style="color:#898887"> def}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{&#|line 1|#one two</span>
|
||||
<span style="color:#898887"> &#|line 2|# three</span>
|
||||
<span style="color:#898887"> &#|line 3|#uno dos tres</span>
|
||||
<span style="color:#898887">}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{Hello &[(string-capitalize name)]!}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{Hello &(string-capitalize name)!}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{&~{&[arr]&~^_&~}}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;&{&~{&~a[arr]&~^_&~}}</span> 'now-no-comment-anymore
|
||||
<span style="color:#898887">#;(</span>
|
||||
<span style="color:#898887">1</span>
|
||||
<span style="color:#898887">2</span>
|
||||
<span style="color:#898887">3)</span> 'now-no-comment-anymore
|
||||
|
||||
<span style="color:#898887">; identifier with hex-escape</span>
|
||||
H\x65;llo<span style="color:#898887">; commment</span>
|
||||
H\x65;\x6c;lo<span style="color:#898887">; commment</span>
|
||||
|
||||
<span style="color:#ff0000;font-weight:bold">(</span><span style="font-weight:bold">while</span> <span style="color:#ff8800;font-weight:bold">(</span><span style="color:#ca60ca">></span> foo <span style="color:#b08000">10</span><span style="color:#ff8800;font-weight:bold">)</span> <span style="color:#898887">;; Highlight `while'.</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">set!</span> foo <span style="color:#888800;font-weight:bold">(</span><span style="color:#ca60ca">-</span> foo <span style="color:#b08000">1</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span>
|
||||
<span style="color:#ff8800;font-weight:bold">(</span><span style="font-weight:bold">catch</span> <span style="color:#b08000">#t</span> <span style="color:#898887">;; Highlight `catch'.</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#008800;font-weight:bold">()</span> <span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">display</span> foo<span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span>
|
||||
<span style="color:#888800;font-weight:bold">(</span><span style="font-weight:bold">lambda</span> <span style="color:#008800;font-weight:bold">(</span>key <span style="color:#ca60ca">.</span> args<span style="color:#008800;font-weight:bold">)</span>
|
||||
<span style="color:#008800;font-weight:bold">(</span><span style="font-weight:bold">if</span> <span style="color:#3689e6;font-weight:bold">(</span><span style="font-weight:bold">eq?</span> key 'system-error<span style="color:#3689e6;font-weight:bold">)</span>
|
||||
<span style="color:#3689e6;font-weight:bold">(</span><span style="font-weight:bold">break</span><span style="color:#3689e6;font-weight:bold">)</span> <span style="color:#898887">;; Highlight `break'.</span>
|
||||
<span style="color:#3689e6;font-weight:bold">(</span><span style="font-weight:bold">continue</span><span style="color:#3689e6;font-weight:bold">)</span><span style="color:#008800;font-weight:bold">)</span><span style="color:#888800;font-weight:bold">)</span><span style="color:#ff8800;font-weight:bold">)</span><span style="color:#ff0000;font-weight:bold">)</span> <span style="color:#898887">;; Highlight `continue'.</span>
|
||||
</pre></body></html>
|
||||
Reference in New Issue
Block a user