picolisp

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/picolisp.git/
Log | Files | Refs | README | LICENSE

refX.html (1237B)


      1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/1998/REC-html40-19980424/loose.dtd">
      2 <html lang="en">
      3 <head>
      4 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
      5 <title>X</title>
      6 <link rel="stylesheet" href="doc.css" type="text/css">
      7 </head>
      8 <body>
      9 
     10 <h1>X</h1>
     11 
     12 <dl>
     13 
     14 <dt><a name="xchg"><code>(xchg 'var 'var ..) -> any</code></a>
     15 <dd>Exchange the values of successive <code>var</code> argument pairs.
     16 
     17 <pre><code>
     18 : (setq  A 1  B 2  C '(a b c))
     19 -> (a b c)
     20 : (xchg  'A C  'B (cdr C))
     21 -> 2
     22 : A
     23 -> a
     24 : B
     25 -> b
     26 : C
     27 -> (1 2 c)
     28 </code></pre>
     29 
     30 <dt><a name="xor"><code>(xor 'any 'any) -> flg</code></a>
     31 <dd>Returns T if exactly one of the arguments evaluates to non-<code>NIL</code>.
     32 
     33 <pre><code>
     34 : (xor T NIL)
     35 -> T
     36 : (xor T T)
     37 -> NIL
     38 </code></pre>
     39 
     40 <dt><a name="x|"><code>(x| 'num ..) -> num</code></a>
     41 <dd>Returns the bitwise <code>XOR</code> of all <code>num</code> arguments. When
     42 one of the arguments evaluates to <code>NIL</code>, it is returned immediately.
     43 See also <code><a href="ref_.html#&">&</a></code>, <code><a
     44 href="ref_.html#|">|</a></code> and <code><a
     45 href="refB.html#bit?">bit?</a></code>.
     46 
     47 <pre><code>
     48 : (x| 2 7)
     49 -> 5
     50 : (x| 2 7 1)
     51 -> 4
     52 </code></pre>
     53 
     54 </dl>
     55 
     56 </body>
     57 </html>