[armedbear-cvs] r14120 - trunk/abcl/src/org/armedbear/lisp

[ehuelsmann at common-lisp.net]

Author: ehuelsmann
Date: Sat Aug 18 04:06:14 2012
New Revision: 14120

Log:
Move profiler exports to profiler.lisp.

Modified:
   trunk/abcl/src/org/armedbear/lisp/autoloads.lisp
   trunk/abcl/src/org/armedbear/lisp/profiler.lisp

Modified: trunk/abcl/src/org/armedbear/lisp/autoloads.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/autoloads.lisp	Sat Aug 18 04:05:37 2012	(r14119)
+++ trunk/abcl/src/org/armedbear/lisp/autoloads.lisp	Sat Aug 18 04:06:14 2012	(r14120)
@@ -52,10 +52,6 @@
 (export 'concatenate-to-string '#:system)
 
 
-;; Profiler.
-(in-package "PROFILER")
-(export '(*granularity* show-call-counts show-hot-counts with-profiling))
-
 ;; Extensions.
 (in-package "EXTENSIONS")
 (export 'simple-search)

Modified: trunk/abcl/src/org/armedbear/lisp/profiler.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/profiler.lisp	Sat Aug 18 04:05:37 2012	(r14119)
+++ trunk/abcl/src/org/armedbear/lisp/profiler.lisp	Sat Aug 18 04:06:14 2012	(r14120)
@@ -31,7 +31,8 @@
 
 (in-package #:profiler)
 
-(export '(*hidden-functions*))
+(export '(*hidden-functions* *granularity*
+          show-call-counts show-hot-counts with-profiling))
 
 (require '#:clos)
 (require '#:format)