miyamuko · September 29, 2011 14:16
diff --git a/gistfile1.txt b/gistfile1.txt
 (byte-compile-file "test.l")
 ;=> Compiling hoge...
 ;   done.
 ;   t
 (load "test.lc")
 ;=> t
 (hoge)
 ;=> (4 5 6 7 8 9 10)
diff --git a/test.l b/test.l
 (in-package :user)

 (eval-when (:compile-toplevel :load-toplevel :execute)
  (require "cmu_loop")
  (require "ansi-loop")
  (shadowing-import (intern "loop" :ansi-loop))
  )

 (defun hoge ()
  (loop for i from 0 to 10
    when (and (> i 3) i)
    collect it))
	(in-package :user)

	(eval-when (:compile-toplevel :load-toplevel :execute)
	(require "cmu_loop")
	(require "ansi-loop")
	(shadowing-import (intern "loop" :ansi-loop))
	)

	(defun hoge ()
	(loop for i from 0 to 10
	when (and (> i 3) i)
	collect it))
No results found