fork download 
  1. (with-open-file (stream *load-pathname*)
  2.   (format t "~A: ~A~%"
  3.           (truename *load-pathname*)
  4.           (file-length stream)))
  5.  
Success #stdin #stdout 0.01s 9720KB
comments (?)
stdin 
Standard input is empty
stdout 
/home/hMGfv3/prog.lisp: 134
https://ideone.com/8G7hUD
language:
Common Lisp (clisp 2.49.92)
created:
5 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!