diff --git a/basis/bootstrap/compiler/compiler.factor b/basis/bootstrap/compiler/compiler.factor index 5a0a6a82db..91e1c0de79 100644 --- a/basis/bootstrap/compiler/compiler.factor +++ b/basis/bootstrap/compiler/compiler.factor @@ -9,10 +9,6 @@ vocabs vocabs.loader words ; FROM: compiler => enable-optimizer ; IN: bootstrap.compiler -"profile-compiler" get [ - "bootstrap.compiler.timing" require -] when - ! Don't bring this in when deploying, since it will store a ! reference to 'eval' in a global variable "deploy-vocab" get "staging" get or [ diff --git a/basis/bootstrap/compiler/timing/tags.txt b/basis/bootstrap/compiler/timing/tags.txt deleted file mode 100644 index ebb74b4d5f..0000000000 --- a/basis/bootstrap/compiler/timing/tags.txt +++ /dev/null @@ -1 +0,0 @@ -not loaded diff --git a/basis/bootstrap/compiler/timing/timing.factor b/basis/bootstrap/compiler/timing/timing.factor deleted file mode 100644 index 8b67623401..0000000000 --- a/basis/bootstrap/compiler/timing/timing.factor +++ /dev/null @@ -1,42 +0,0 @@ -! Copyright (C) 2009, 2010 Slava Pestov. -! See http://factorcode.org/license.txt for BSD license. -USING: accessors kernel make sequences tools.annotations tools.crossref ; -QUALIFIED: compiler.cfg.builder -QUALIFIED: compiler.cfg.linear-scan -QUALIFIED: compiler.cfg.optimizer -QUALIFIED: compiler.cfg.finalization -QUALIFIED: compiler.codegen -QUALIFIED: compiler.tree.builder -QUALIFIED: compiler.tree.optimizer -QUALIFIED: compiler.cfg.liveness -QUALIFIED: compiler.cfg.liveness.ssa -IN: bootstrap.compiler.timing - -: passes ( word -- seq ) - def>> uses [ vocabulary>> "compiler." head? ] filter ; - -: high-level-passes ( -- seq ) \ compiler.tree.optimizer:optimize-tree passes ; - -: low-level-passes ( -- seq ) \ compiler.cfg.optimizer:optimize-cfg passes ; - -: machine-passes ( -- seq ) \ compiler.cfg.finalization:finalize-cfg passes ; - -: linear-scan-passes ( -- seq ) \ compiler.cfg.linear-scan:linear-scan passes ; - -: all-passes ( -- seq ) - [ - \ compiler.tree.builder:build-tree , - \ compiler.tree.optimizer:optimize-tree , - high-level-passes % - \ compiler.cfg.builder:build-cfg , - \ compiler.cfg.optimizer:optimize-cfg , - low-level-passes % - \ compiler.cfg.finalization:finalize-cfg , - machine-passes % - linear-scan-passes % - \ compiler.codegen:generate , - \ compiler.cfg.liveness:compute-live-sets , - \ compiler.cfg.liveness.ssa:compute-ssa-live-sets , - ] { } make ; - -all-passes [ [ reset ] [ add-timing ] bi ] each