fork download
copy 
  1. (defun is-atoms (array)
  2. 	(cond
  3. 		((null array) t)
  4. 		((atom (car array)) (is-atoms (cdr array)))
  5. 	)
  6. )
  7.  
  8. (print (is-atoms '(9 8 7 6 (5))))
Success #stdin #stdout #stderr 0.01s 9596KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
NIL
stderr
copy 
Warning: reserving address range 0x80000c0000...0x1fffffffffff that contains memory mappings. clisp might crash later!
Memory dump:
  0x8000000000 - 0x80000bffff
  0x14988e800000 - 0x14988eae4fff
  0x14988ec00000 - 0x14988ec02fff
  0x14988ec03000 - 0x14988ee01fff
  0x14988ee02000 - 0x14988ee02fff
  0x14988ee03000 - 0x14988ee03fff
  0x14988ee15000 - 0x14988ee39fff
  0x14988ee3a000 - 0x14988efacfff
  0x14988efad000 - 0x14988eff5fff
  0x14988eff6000 - 0x14988eff8fff
  0x14988eff9000 - 0x14988effbfff
  0x14988effc000 - 0x14988effffff
  0x14988f000000 - 0x14988f003fff
  0x14988f004000 - 0x14988f203fff
  0x14988f204000 - 0x14988f204fff
  0x14988f205000 - 0x14988f205fff
  0x14988f277000 - 0x14988f278fff
  0x14988f279000 - 0x14988f288fff
  0x14988f289000 - 0x14988f2bcfff
  0x14988f2bd000 - 0x14988f3f3fff
  0x14988f3f4000 - 0x14988f3f4fff
  0x14988f3f5000 - 0x14988f3f7fff
  0x14988f3f8000 - 0x14988f3f8fff
  0x14988f3f9000 - 0x14988f3fafff
  0x14988f3fb000 - 0x14988f3fbfff
  0x14988f3fc000 - 0x14988f3fdfff
  0x14988f3fe000 - 0x14988f3fefff
  0x14988f3ff000 - 0x14988f3fffff
  0x14988f400000 - 0x14988f400fff
  0x14988f401000 - 0x14988f40efff
  0x14988f40f000 - 0x14988f41cfff
  0x14988f41d000 - 0x14988f429fff
  0x14988f42a000 - 0x14988f42dfff
  0x14988f42e000 - 0x14988f42efff
  0x14988f42f000 - 0x14988f42ffff
  0x14988f430000 - 0x14988f435fff
  0x14988f436000 - 0x14988f437fff
  0x14988f438000 - 0x14988f438fff
  0x14988f439000 - 0x14988f439fff
  0x14988f43a000 - 0x14988f43afff
  0x14988f43b000 - 0x14988f468fff
  0x14988f469000 - 0x14988f477fff
  0x14988f478000 - 0x14988f51dfff
  0x14988f51e000 - 0x14988f5b4fff
  0x14988f5b5000 - 0x14988f5b5fff
  0x14988f5b6000 - 0x14988f5b6fff
  0x14988f5b7000 - 0x14988f5cafff
  0x14988f5cb000 - 0x14988f5f2fff
  0x14988f5f3000 - 0x14988f5fcfff
  0x14988f5fd000 - 0x14988f5fefff
  0x14988f5ff000 - 0x14988f604fff
  0x14988f605000 - 0x14988f607fff
  0x14988f60a000 - 0x14988f60afff
  0x14988f60b000 - 0x14988f60bfff
  0x14988f60c000 - 0x14988f60cfff
  0x14988f60d000 - 0x14988f60dfff
  0x14988f60e000 - 0x14988f60efff
  0x14988f60f000 - 0x14988f615fff
  0x14988f616000 - 0x14988f618fff
  0x14988f619000 - 0x14988f619fff
  0x14988f61a000 - 0x14988f63afff
  0x14988f63b000 - 0x14988f642fff
  0x14988f643000 - 0x14988f643fff
  0x14988f644000 - 0x14988f644fff
  0x14988f645000 - 0x14988f645fff
  0x55da3d7f7000 - 0x55da3d8e7fff
  0x55da3d8e8000 - 0x55da3d9f1fff
  0x55da3d9f2000 - 0x55da3da51fff
  0x55da3da53000 - 0x55da3da81fff
  0x55da3da82000 - 0x55da3dab2fff
  0x55da3dab3000 - 0x55da3dab6fff
  0x55da3e147000 - 0x55da3e167fff
  0x7ffe19320000 - 0x7ffe19340fff
  0x7ffe193bc000 - 0x7ffe193bffff
  0x7ffe193c0000 - 0x7ffe193c1fff
https://ideone.com/OxS2GJ
language:
Common Lisp (clisp 2.49.92)
created:
23 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!