fork download
copy 
  1. ;(defup swap (array)
  2. ;	(cond
  3. ;		((null (cdr array)) array)
  4. ;		
  5. ;	)
  6. ;)
  7.  
  8. (print (second '(1 2 3)))
Success #stdin #stdout #stderr 0.02s 9496KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
2
stderr
copy 
Warning: reserving address range 0x80000c0000...0x1fffffffffff that contains memory mappings. clisp might crash later!
Memory dump:
  0x8000000000 - 0x80000bffff
  0x15320f400000 - 0x15320f6e4fff
  0x15320f815000 - 0x15320f839fff
  0x15320f83a000 - 0x15320f9acfff
  0x15320f9ad000 - 0x15320f9f5fff
  0x15320f9f6000 - 0x15320f9f8fff
  0x15320f9f9000 - 0x15320f9fbfff
  0x15320f9fc000 - 0x15320f9fffff
  0x15320fa00000 - 0x15320fa02fff
  0x15320fa03000 - 0x15320fc01fff
  0x15320fc02000 - 0x15320fc02fff
  0x15320fc03000 - 0x15320fc03fff
  0x15320fc80000 - 0x15320fc8ffff
  0x15320fc90000 - 0x15320fcc3fff
  0x15320fcc4000 - 0x15320fdfafff
  0x15320fdfb000 - 0x15320fdfbfff
  0x15320fdfc000 - 0x15320fdfefff
  0x15320fdff000 - 0x15320fdfffff
  0x15320fe00000 - 0x15320fe03fff
  0x15320fe04000 - 0x153210003fff
  0x153210004000 - 0x153210004fff
  0x153210005000 - 0x153210005fff
  0x1532100a3000 - 0x1532100a6fff
  0x1532100a7000 - 0x1532100a7fff
  0x1532100a8000 - 0x1532100a9fff
  0x1532100aa000 - 0x1532100aafff
  0x1532100ab000 - 0x1532100abfff
  0x1532100ac000 - 0x1532100acfff
  0x1532100ad000 - 0x1532100bafff
  0x1532100bb000 - 0x1532100c8fff
  0x1532100c9000 - 0x1532100d5fff
  0x1532100d6000 - 0x1532100d9fff
  0x1532100da000 - 0x1532100dafff
  0x1532100db000 - 0x1532100dbfff
  0x1532100dc000 - 0x1532100e1fff
  0x1532100e2000 - 0x1532100e3fff
  0x1532100e4000 - 0x1532100e4fff
  0x1532100e5000 - 0x1532100e5fff
  0x1532100e6000 - 0x1532100e6fff
  0x1532100e7000 - 0x153210114fff
  0x153210115000 - 0x153210123fff
  0x153210124000 - 0x1532101c9fff
  0x1532101ca000 - 0x153210260fff
  0x153210261000 - 0x153210261fff
  0x153210262000 - 0x153210262fff
  0x153210263000 - 0x153210276fff
  0x153210277000 - 0x15321029efff
  0x15321029f000 - 0x1532102a8fff
  0x1532102a9000 - 0x1532102aafff
  0x1532102ab000 - 0x1532102b0fff
  0x1532102b1000 - 0x1532102b3fff
  0x1532102b6000 - 0x1532102b6fff
  0x1532102b7000 - 0x1532102b7fff
  0x1532102b8000 - 0x1532102b8fff
  0x1532102b9000 - 0x1532102b9fff
  0x1532102ba000 - 0x1532102bafff
  0x1532102bb000 - 0x1532102c1fff
  0x1532102c2000 - 0x1532102c4fff
  0x1532102c5000 - 0x1532102c5fff
  0x1532102c6000 - 0x1532102e6fff
  0x1532102e7000 - 0x1532102eefff
  0x1532102ef000 - 0x1532102effff
  0x1532102f0000 - 0x1532102f0fff
  0x1532102f1000 - 0x1532102f1fff
  0x56453cf64000 - 0x56453d054fff
  0x56453d055000 - 0x56453d15efff
  0x56453d15f000 - 0x56453d1befff
  0x56453d1c0000 - 0x56453d1eefff
  0x56453d1ef000 - 0x56453d21ffff
  0x56453d220000 - 0x56453d223fff
  0x56453f0de000 - 0x56453f0fefff
  0x7ffd1aada000 - 0x7ffd1aafafff
  0x7ffd1ab49000 - 0x7ffd1ab4cfff
  0x7ffd1ab4d000 - 0x7ffd1ab4efff
https://ideone.com/bE9QMl
language:
Common Lisp (clisp 2.49.92)
created:
16 hours ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!