@@ -249,8 +249,9 @@ (set __rest (__rest cdr))))) ;; profiling macro - experimental -(macro-1 profile (name *body) - `(progn ((NuProfiler defaultProfiler) start:,name) - (set __result (progn ,@*body)) - ((NuProfiler defaultProfiler) stop) - __result)) +(global profile + (macro-1 _ (name *body) + `(progn ((NuProfiler defaultProfiler) start:,name) + (set __result (progn ,@*body)) + ((NuProfiler defaultProfiler) stop) + __result))) nu/nu.nu f45732b9d6ed336f2f5f62906e6936b80d753e0c Tim Burks tim@neontology.com http://github.com/timburks/nu/commit/093862f578d4423dd47e356413ed5129a8c089c6 093862f578d4423dd47e356413ed5129a8c089c6 2009-10-03T19:20:02-07:00 2009-10-03T19:20:02-07:00 made profiling macro global. 49690e77842bad7393b6804b0cbc842dde436f5e Tim Burks tim@neontology.com