diff --git a/extra/math/analysis/analysis.factor b/extra/math/analysis/analysis.factor index fa01b0376d..a1fc0bd07b 100755 --- a/extra/math/analysis/analysis.factor +++ b/extra/math/analysis/analysis.factor @@ -42,7 +42,7 @@ PRIVATE> #! gamma(x) = integral 0..inf [ t^(x-1) exp(-t) ] dt #! gamma(n+1) = n! for n > 0 dup { [ 0.0 <= ] [ 1.0 mod zero? ] } 1&& [ - drop 1./0. + drop 1/0. ] [ [ abs gamma-lanczos6 ] keep dup 0 > [ drop ] [ gamma-neg ] if ] if ; @@ -51,7 +51,7 @@ PRIVATE> #! gammaln(x) is an alternative when gamma(x)'s range #! varies too widely dup 0 < [ - drop 1./0. + drop 1/0. ] [ [ abs gammaln-lanczos6 ] keep dup 0 > [ drop ] [ gamma-neg ] if ] if ; diff --git a/extra/webapps/site-watcher/site-watcher.factor b/extra/webapps/site-watcher/site-watcher.factor index edd8104a7e..b60f1b1b6a 100644 --- a/extra/webapps/site-watcher/site-watcher.factor +++ b/extra/webapps/site-watcher/site-watcher.factor @@ -1,15 +1,16 @@ ! Copyright (C) 2009 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: accessors assocs db.sqlite furnace furnace.actions furnace.alloy -furnace.auth furnace.auth.features.deactivate-user +USING: accessors assocs db.sqlite furnace furnace.actions +furnace.alloy furnace.auth furnace.auth.features.deactivate-user furnace.auth.features.edit-profile furnace.auth.features.recover-password furnace.auth.features.registration furnace.auth.login furnace.boilerplate furnace.redirection html.forms http.server http.server.dispatchers kernel namespaces site-watcher site-watcher.db site-watcher.private urls validators io.sockets.secure.unix.debug -io.servers.connection db db.tuples sequences webapps.site-watcher.common -webapps.site-watcher.watching webapps.site-watcher.spidering ; +io.servers.connection io.files.temp db db.tuples sequences +webapps.site-watcher.common webapps.site-watcher.watching +webapps.site-watcher.spidering ; QUALIFIED: assocs IN: webapps.site-watcher