fork download
copy 
  1. (defun rev (l)
  2.  (setq r nil)(dotimes (n (list-size l))
  3.      (push (nth n l) r)
  4.      return r))
  5. (setq k (rev '(a b c d)))
  6. (print k)
  7.  
Runtime error #stdin #stdout #stderr 0s 38080KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
*** - EVAL: undefined function LIST-SIZE
https://ideone.com/l7lwcj
language:
Common Lisp (clisp 2.49.92)
created:
6 years 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!