fork download
copy 
  1. (defun yoba ()
  2.   (loop :repeat 10
  3.         :do (princ "azaza")))
  4.  
  5. (format t "Result is ~s~%"
  6.   (with-output-to-string (*standard-output*)
  7.     (yoba)))
  8.  
  9. (yoba)
Success #stdin #stdout 0s 10480KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Result is "azazaazazaazazaazazaazazaazazaazazaazazaazazaazaza"
azazaazazaazazaazazaazazaazazaazazaazazaazazaazaza
https://ideone.com/gwhJDL
language:
Common Lisp (clisp 2.49.92)
created:
9 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!