55 lines
55 KiB
HTML
55 lines
55 KiB
HTML
|
<!doctype html>
|
|||
|
<html lang="en" dir="ltr" class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-chap-17/bh-c-rules-about-test-functions" data-has-hydrated="false">
|
|||
|
<head>
|
|||
|
<meta charset="UTF-8">
|
|||
|
<meta name="generator" content="Docusaurus v3.0.1">
|
|||
|
<title data-rh="true">17.2 Rules about Test Functions | Common Lisp (New) Language Reference</title><meta data-rh="true" name="viewport" content="width=device-width,initial-scale=1"><meta data-rh="true" name="twitter:card" content="summary_large_image"><meta data-rh="true" property="og:image" content="https://lisp-docs.github.io/cl-language-reference/img/1024px-Lisp_logo.svg.png"><meta data-rh="true" name="twitter:image" content="https://lisp-docs.github.io/cl-language-reference/img/1024px-Lisp_logo.svg.png"><meta data-rh="true" property="og:url" content="https://lisp-docs.github.io/cl-language-reference/chap-17/bh-c-rules-about-test-functions"><meta data-rh="true" property="og:locale" content="en"><meta data-rh="true" name="docusaurus_locale" content="en"><meta data-rh="true" name="docsearch:language" content="en"><meta data-rh="true" name="google-site-verification" content="Vzaw013_bfdKeUVG89Ch3W1zC9_vH9ID2dPB9Dz0vr0"><meta data-rh="true" name="docusaurus_version" content="current"><meta data-rh="true" name="docusaurus_tag" content="docs-default-current"><meta data-rh="true" name="docsearch:version" content="current"><meta data-rh="true" name="docsearch:docusaurus_tag" content="docs-default-current"><meta data-rh="true" property="og:title" content="17.2 Rules about Test Functions | Common Lisp (New) Language Reference"><meta data-rh="true" name="description" content="17.2.1 Satisfying a Two"><meta data-rh="true" property="og:description" content="17.2.1 Satisfying a Two"><link data-rh="true" rel="icon" href="../img/favicon.ico"><link data-rh="true" rel="canonical" href="bh-c-rules-about-test-functions.html"><link data-rh="true" rel="alternate" href="bh-c-rules-about-test-functions.html" hreflang="en"><link data-rh="true" rel="alternate" href="bh-c-rules-about-test-functions.html" hreflang="x-default"><link data-rh="true" rel="preconnect" href="https://C1F2Q5VM6X-dsn.algolia.net" crossorigin="anonymous"><link rel="preconnect" href="https://www.google-analytics.com">
|
|||
|
<link rel="preconnect" href="https://www.googletagmanager.com">
|
|||
|
<script async src="https://www.googletagmanager.com/gtag/js?id=G-8TJCE4NSF8"></script>
|
|||
|
<script>function gtag(){dataLayer.push(arguments)}window.dataLayer=window.dataLayer||[],gtag("js",new Date),gtag("config","G-8TJCE4NSF8",{})</script>
|
|||
|
|
|||
|
|
|||
|
<link rel="search" type="application/opensearchdescription+xml" title="Common Lisp (New) Language Reference" href="../opensearch.xml"><link rel="stylesheet" href="../assets/css/styles.f13b59fe.css">
|
|||
|
<script src="../assets/js/runtime~main.02699c25.js" defer="defer"></script>
|
|||
|
<script src="../assets/js/main.4f0a7a76.js" defer="defer"></script>
|
|||
|
</head>
|
|||
|
<body class="navigation-with-keyboard">
|
|||
|
<script>!function(){function t(t){document.documentElement.setAttribute("data-theme",t)}var e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return localStorage.getItem("theme")}catch(t){}}();t(null!==e?e:"light")}(),function(){try{const c=new URLSearchParams(window.location.search).entries();for(var[t,e]of c)if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id="__docusaurus"><div role="region" aria-label="Skip to main content"><a class="skipToContent_fXgn" href="bh-c-rules-about-test-functions.html#__docusaurus_skipToContent_fallback">Skip to main content</a></div><nav aria-label="Main" class="navbar navbar--fixed-top"><div class="navbar__inner"><div class="navbar__items"><button aria-label="Toggle navigation bar" aria-expanded="false" class="navbar__toggle clean-btn" type="button"><svg width="30" height="30" viewBox="0 0 30 30" aria-hidden="true"><path stroke="currentColor" stroke-linecap="round" stroke-miterlimit="10" stroke-width="2" d="M4 7h22M4 15h22M4 23h22"></path></svg></button><a href="../../index.html" target="_blank" rel="noopener noreferrer" class="navbar__brand"><div class="navbar__logo"><img src="../img/logo.svg" alt="Lisp Logo" class="themedComponent_mlkZ themedComponent--light_NVdE"><img src="../img/logo.svg" alt="Lisp Logo" class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Common Lisp Docs</b></a><a href="../../docs/tutorial/index.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">Tutorial</a><a href="../index.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">Technical Reference</a><a href="../../docs/whylisp.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">Why Lisp?</a><a href="../../docs/howto.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">Guides</a></div><div class="navbar__items navbar__items--right"><a href="../../docs/contribute.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">Contribute!</a><a href="../../docs/help.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">Getting Help</a><a href="../../docs/about.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">About</a><a href="../../blog.html" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">Blog</a><a href="https://github.com/lisp-docs" target="_blank" rel="noopener noreferrer" class="navbar__item navbar__link">GitHub<svg width="13.5" height="13.5" aria-hidden="true" viewBox="0 0 24 24" class="iconExternalLink_nPIU"><path fill="currentColor" d="M21 13v10h-21v-19h12v2h-10v15h17v-8h2zm3-12h-10.988l4.035 4-6.977 7.07 2.828 2.828 6.977-7.07 4.125 4.172v-11z"></path></svg></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type="button" disabled="" title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live="polite"><svg viewBox="0 0 24 24" width="24" height="24" class="lightToggleIcon_pyhR"><path fill="currentColor" d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z
|
|||
|
<!-- -->
|
|||
|
<!-- -->
|
|||
|
<h2 class="anchor anchorWithStickyNavbar_LWe7" id="1721-satisfying-a-two">17.2.1 Satisfying a Two<a href="bh-c-rules-about-test-functions.html#1721-satisfying-a-two" class="hash-link" aria-label="Direct link to 17.2.1 Satisfying a Two" title="Direct link to 17.2.1 Satisfying a Two"></a></h2>
|
|||
|
<!-- -->
|
|||
|
<p>When an <i>object O</i> is being considered iteratively against each <i>element E<sub>i</sub></i> of a <i>sequence S</i> by an <i>operator F</i> listed in Figure 17–2, it is sometimes useful to control the way in which the presence of <i>O</i> is tested in <i>S</i> is tested by <i>F</i>. This control is offered on the basis of a <i>function</i> designated with either a <!-- -->:test<!-- --> or <!-- -->:test-not<!-- --> <i>argument</i>.</p>
|
|||
|
<p>|</p><p><strong>adjoin nset-exclusive-or search</strong> </p><p><strong>assoc nsublis set-difference count nsubst set-exclusive-or delete nsubstitute sublis</strong> </p><p><strong>find nunion subsetp</strong> </p><p><strong>intersection position subst</strong> </p><p><strong>member pushnew substitute</strong> </p><p><strong>mismatch rassoc tree-equal</strong> </p><p><strong>nintersection remove union</strong> </p><p><strong>nset-difference remove-duplicates</strong></p>|<p></p>
|
|||
|
<p>| :- |</p>
|
|||
|
<p><strong>Figure 17–2. Operators that have Two-Argument Tests to be Satisfied</strong></p>
|
|||
|
<p>The object <i>O</i> might not be compared directly to <i>E<sub>i</sub></i>. If a <!-- -->:key<!-- --> <i>argument</i> is provided, it is a <i>designator</i> for a <i>function</i> of one <i>argument</i> to be called with each <i>E<sub>i</sub></i> as an <i>argument</i>, and <i>yielding</i> an <i>object Z<sub>i</sub></i> to be used for comparison. (If there is no <!-- -->:key<!-- --> <i>argument</i>, <i>Z<sub>i</sub></i>is <i>E<sub>i</sub></i>.)</p>
|
|||
|
<p>The <span><i>function</i></span> designated by the <!-- -->:key<!-- --> <span><i>argument</i></span> is never called on <em>O</em> itself. However, if the function operates on multiple sequences (<em>e.g.</em>, as happens in <span><b>set-difference</b></span>), <em>O</em> will be the result of calling the <!-- -->:key<!-- --> function on an <span><i>element</i></span> of the other sequence.</p>
|
|||
|
<p>A <!-- -->:test<!-- --> <i>argument</i>, if supplied to <i>F</i>, is a <i>designator</i> for a <i>function</i> of two <i>arguments</i>, <i>O</i> and <i>Z<sub>i</sub></i>. An <i>E<sub>i</sub></i>is said (or, sometimes, an <i>O</i> and an <i>E<sub>i</sub></i> are said) to <i>satisfy the test</i> if this <!-- -->:test<!-- --> <i>function</i> returns a <i>generalized boolean</i> representing <i>true</i>.</p>
|
|||
|
<p>A <!-- -->:test-not<!-- --> <i>argument</i>, if supplied to <i>F</i>, is <i>designator</i> for a <i>function</i> of two <i>arguments</i>, <i>O</i> and <i>Z<sub>i</sub></i>. An <i>E<sub>i</sub></i>is said (or, sometimes, an <i>O</i> and an <i>E<sub>i</sub></i> are said) to <i>satisfy the test</i> if this <!-- -->:test-not<!-- --> <i>function</i> returns a <i>generalized boolean</i> representing <i>false</i>.</p>
|
|||
|
<p>If neither a <!-- -->:test<!-- --> nor a <!-- -->:test-not<!-- --> <span><i>argument</i></span> is supplied, it is as if a <!-- -->:test<!-- --> argument of #’eql was supplied.</p>
|
|||
|
<p>The consequences are unspecified if both a <!-- -->:test<!-- --> and a <!-- -->:test-not<!-- --> <span><i>argument</i></span> are supplied in the same <span><i>call</i></span> to <em>F</em>.</p>
|
|||
|
<h3 class="anchor anchorWithStickyNavbar_LWe7" id="17211-examples-of-satisfying-a-two">17.2.1.1 Examples of Satisfying a Two<a href="bh-c-rules-about-test-functions.html#17211-examples-of-satisfying-a-two" class="hash-link" aria-label="Direct link to 17.2.1.1 Examples of Satisfying a Two" title="Direct link to 17.2.1.1 Examples of Satisfying a Two"></a></h3>
|
|||
|
<!-- -->
|
|||
|
<div class="language-lisp codeBlockContainer_Ckt0 theme-code-block" style="--prism-color:#393A34;--prism-background-color:#f6f8fa"><div class="codeBlockContent_biex"><pre tabindex="0" class="prism-code language-lisp codeBlock_bY9V thin-scrollbar" style="color:#393A34;background-color:#f6f8fa"><code class="codeBlockLines_e6Vv"><span class="token-line" style="color:#393A34"><span class="token punctuation" style="color:#393A34">(</span><span class="token car">remove</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"FOO"</span><span class="token plain"> ’</span><span class="token punctuation" style="color:#393A34">(</span><span class="token car">foo</span><span class="token plain"> bar </span><span class="token string" style="color:#e3116c">"FOO"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"BAR"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"foo"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"bar"</span><span class="token punctuation" style="color:#393A34">)</span><span class="token plain"> </span><span class="token lisp-property property" style="color:#36acaa">:test</span><span class="token plain"> #’equal</span><span class="token punctuation" style="color:#393A34">)</span><span class="token plain"> </span><br></span><span class="token-line" style="color:#393A34"><span class="token plain">→ </span><span class="token punctuation" style="color:#393A34">(</span><span class="token car">foo</span><span class="token plain"> bar </span><span class="token string" style="color:#e3116c">"BAR"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"foo"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"bar"</span><span class="token punctuation" style="color:#393A34">)</span><span class="token plain"> </span><br></span><span class="token-line" style="color:#393A34"><span class="token plain"></span><span class="token punctuation" style="color:#393A34">(</span><span class="token car">remove</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"FOO"</span><span class="token plain"> ’</span><span class="token punctuation" style="color:#393A34">(</span><span class="token car">foo</span><span class="token plain"> bar </span><span class="token string" style="color:#e3116c">"FOO"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"BAR"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"foo"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"bar"</span><span class="token punctuation" style="color:#393A34">)</span><span class="token plain"> </span><span class="token lisp-property property" style="color:#36acaa">:test</span><span class="token plain"> #’equalp</span><span class="token punctuation" style="color:#393A34">)</span><span class="token plain"> </span><br></span><span class="token-line" style="color:#393A34"><span class="token plain">→ </span><span class="token punctuation" style="color:#393A34">(</span><span class="token car">foo</span><span class="token plain"> bar </span><span class="token string" style="color:#e3116c">"BAR"</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"bar"</span><span class="token punctuation" style="color:#393A34">)</span><span class="token plain"> </span><br></span><span class="token-line" style="color:#393A34"><span class="token plain"></span><span class="token punctuation" style="color:#393A34">(</span><span class="token car">remove</span><span class="token plain"> </span><span class="token string" style="color:#e3116c">"FOO"</span><span class="token plain"> ’</span><span class="token punctuation" style="colo
|
|||
|
<h2 class="anchor anchorWithStickyNavbar_LWe7" id="1722-satisfying-a-one">17.2.2 Satisfying a One<a href="bh-c-rules-about-test-functions.html#1722-satisfying-a-one" class="hash-link" aria-label="Direct link to 17.2.2 Satisfying a One" title="Direct link to 17.2.2 Satisfying a One"></a></h2>
|
|||
|
<!-- -->
|
|||
|
<p>When using one of the <span><i>functions</i></span> in Figure 17–3, the elements <em>E</em> of a <em>sequence S</em> are filtered not on the basis of the presence or absence of an object <em>O</em> under a two <em>argument predicate</em>, as with the <span><i>functions</i></span> described in Section 17.2.1 (Satisfying a Two-Argument Test), but rather on the basis of a one <em>argument predicate</em>.</p>
|
|||
|
<p>|</p><p><strong>assoc-if member-if rassoc-if</strong> </p><p><strong>assoc-if-not member-if-not rassoc-if-not</strong> </p><p><strong>count-if nsubst-if remove-if</strong> </p><p><strong>count-if-not nsubst-if-not remove-if-not</strong> </p><p><strong>delete-if nsubstitute-if subst-if</strong> </p><p><strong>delete-if-not nsubstitute-if-not subst-if-not</strong> </p><p><strong>find-if position-if substitute-if</strong> </p><p><strong>find-if-not position-if-not substitute-if-not</strong></p>|<p></p>
|
|||
|
<p>| :- |</p>
|
|||
|
<p><strong>Figure 17–3. Operators that have One-Argument Tests to be Satisfied</strong></p>
|
|||
|
<p>The element <i>E<sub>i</sub></i> might not be considered directly. If a <!-- -->:key<!-- --> <i>argument</i> is provided, it is a <i>designator</i> for a <i>function</i> of one <i>argument</i> to be called with each <i>E<sub>i</sub></i> as an <i>argument</i>, and <i>yielding</i> an <i>object Z<sub>i</sub></i> to be used for comparison. (If there is no <!-- -->:key<!-- --> <i>argument</i>, <i>Z<sub>i</sub></i>is <i>E<sub>i</sub></i>.)</p>
|
|||
|
<p><i>Functions</i> defined in this specification and having a name that ends in “-if” accept a first <i>argument</i> that is a <i>designator</i> for a <i>function</i> of one <i>argument</i>, <i>Z<sub>i</sub></i>. An <i>E<sub>i</sub></i>is said to <i>satisfy the test</i> if this <!-- -->:test<!-- --> <i>function</i> returns a <i>generalized boolean</i> representing <i>true</i>.</p>
|
|||
|
<p><i>Functions</i> defined in this specification and having a name that ends in “-if-not” accept a first <i>argument</i> that is a <i>designator</i> for a <i>function</i> of one <i>argument</i>, <i>Z<sub>i</sub></i>. An <i>E<sub>i</sub></i>is said to <i>satisfy the test</i> if this <!-- -->:test<!-- --> <i>function</i> returns a <i>generalized boolean</i> representing <i>false</i>.</p>
|
|||
|
<h3 class="anchor anchorWithStickyNavbar_LWe7" id="17221-examples-of-satisfying-a-one">17.2.2.1 Examples of Satisfying a One<a href="bh-c-rules-about-test-functions.html#17221-examples-of-satisfying-a-one" class="hash-link" aria-label="Direct link to 17.2.2.1 Examples of Satisfying a One" title="Direct link to 17.2.2.1 Examples of Satisfying a One"></a></h3>
|
|||
|
<!-- -->
|
|||
|
<!-- -->
|
|||
|
<p>(count-if #’zerop ’(1 #C(0.0 0.0) 0 0.0d0 0.0s0 3)) → 4</p>
|
|||
|
<p>(remove-if-not #’symbolp ’(0 1 2 3 4 5 6 7 8 9 A B C D E F))</p>
|
|||
|
<p>→ (A B C D E F)</p>
|
|||
|
<p>(remove-if (complement #’symbolp) ’(0 1 2 3 4 5 6 7 8 9 A B C D E F))</p>
|
|||
|
<p>→ (A B C D E F)</p>
|
|||
|
<p>(count-if #’zerop ’("foo" "" "bar" "" "" "baz" "quux") <!-- -->:key<!-- --> #’length)</p>
|
|||
|
<p>→ 3</p></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="theme-doc-footer-edit-meta-row row"><div class="col"><a href="https://github.com/lisp-docs/cl-language-reference/tree/main/docs/chap-17/bh-c-rules-about-test-functions.md" target="_blank" rel="noopener noreferrer" class="theme-edit-this-page"><svg fill="currentColor" height="20" width="20" viewBox="0 0 40 40" class="iconEdit_Z9Sw" aria-hidden="true"><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"></path></g></svg>Edit this page</a></div><div class="col lastUpdated_vwxv"><span class="theme-last-updated">Last updated<!-- --> by <b>daninus14</b></span></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href="bh-b-sequence-concepts.html"><div class="pagination-nav__sublabel">Previous</div><div class="pagination-nav__label">17.1 Sequence Concepts</div></a><a class="pagination-nav__link pagination-nav__link--next" href="../category/173-sequences-dictionary.html"><div class="pagination-nav__sublabel">Next</div><div class="pagination-nav__label">17.3 Sequences Dictionary</div></a></nav></div></div><div class="col col--3"><div class="tableOfContents_bqdL thin-scrollbar theme-doc-toc-desktop"><ul class="table-of-contents table-of-contents__left-border"><li><a href="bh-c-rules-about-test-functions.html#1721-satisfying-a-two" class="table-of-contents__link toc-highlight">17.2.1 Satisfying a Two</a><ul><li><a href="bh-c-rules-about-test-functions.html#17211-examples-of-satisfying-a-two" class="table-of-contents__link toc-highlight">17.2.1.1 Examples of Satisfying a Two</a></li></ul></li><li><a href="bh-c-rules-about-test-functions.html#1722-satisfying-a-one" class="table-of-contents__link toc-highlight">17.2.2 Satisfying a One</a><ul><li><a href="bh-c-rules-about-test-functions.html#17221-examples-of-satisfying-a-one" class="table-of-contents__link toc-highlight">17.2.2.1 Examples of Satisfying a One</a></li></ul></li></ul></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="row footer__links"><div class="col footer__col"><div class="footer__title">Docs</div><ul class="footer__items clean-list"><li class="footer__item"><a href="../../docs/tutorial.html" target="_blank" rel="noopener noreferrer" class="footer__link-item">Common Lisp Tutorial</a></li><li class="footer__item"><a href="../index.html" target="_blank" rel="noopener noreferrer" class="footer__link-item">Common Lisp Technical Reference</a></li><li class="footer__item"><a href="../../docs/help.html" target="_blank" rel="noopener noreferrer" class="footer__link-item">Help</a></li></ul></div><div class="col footer__col"><div class="footer__title">Community</div><ul class="footer__items clean-list"><li class="footer__item"><a href="https://stackoverflow.com/questions/tagged/common-lisp" target="_blank" rel="noopener noreferrer" class="footer__link-item">Stack Overflow<svg width="13.5" height="13.5" aria-hidden="true" viewBox="0 0 24 24" class="iconExternalLink_nPIU"><path fill="currentColor" d="M21 13v10h-21v-19h12v2h-10v15h17v-8h2zm3-12h-10.988l4.035 4-6.977 7.07 2.828 2.828 6.977-7.07 4.125 4.172v-11z"></path></svg></a></li><li class="footer__item"><a href="https://discord.gg/hhk46CE" target="_blank" rel="noopener noreferrer" class="footer__link-item">Discord<svg width="13.5" height="13.5" aria-hidden="true" viewBox="0 0 24 24" class="iconExternalLink_nPIU"><path fill="currentColor" d="M21 13v10h-21v-19h12v2h-10v15h17v-8h2zm3-12h-10.988l4.035 4-6.977 7.07 2.828 2.828 6.977-7.07 4.125 4.172v-11z"></path></svg></a></li><li class="footer__item"><a href="https://www.reddit.com/r/common_lisp" target="_blank" rel="noopener noreferrer" class="footer__link-item">Reddit<svg width="13.5" height="13.5" aria-hidden="true" viewBox="0 0 24 24" class="iconExternalLink_nPIU"><path fill="currentColor" d="M21 13v10h-21v-19h1
|
|||
|
</body>
|
|||
|
</html>
|