compiler.codegen: removing the insn-counts global

It created a histogram of instructins for debugging, but it is not so
useful...
char-rename
Björn Lindqvist 2016-09-14 14:54:43 +02:00
parent 3bbf421043
commit 409cf9bd3e
1 changed files with 7 additions and 16 deletions

View File

@ -1,19 +1,14 @@
! Copyright (C) 2008, 2011 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays assocs byte-arrays classes combinators
compiler.cfg compiler.cfg.comparisons compiler.cfg.instructions
compiler.cfg.linearization compiler.cfg.stack-frame
compiler.codegen.gc-maps compiler.codegen.labels
compiler.codegen.relocation compiler.constants cpu.architecture
fry generic.parser kernel layouts locals make math namespaces
parser quotations sequences sequences.generalizations slots
USING: accessors arrays assocs byte-arrays combinators compiler.cfg
compiler.cfg.comparisons compiler.cfg.instructions
compiler.cfg.linearization compiler.codegen.gc-maps
compiler.codegen.labels compiler.codegen.relocation compiler.constants
cpu.architecture fry generic.parser kernel layouts locals make math
namespaces parser quotations sequences sequences.generalizations slots
words ;
IN: compiler.codegen
SYMBOL: insn-counts
H{ } clone insn-counts set-global
GENERIC: generate-insn ( insn -- )
! Control flow
@ -64,11 +59,7 @@ M: ##dispatch generate-insn
[ basic-block set ]
[ lookup-label resolve-label ]
[
instructions>> [
[ class-of insn-counts get-global inc-at ]
[ generate-insn ]
bi
] each
instructions>> [ generate-insn ] each
] tri ;
: init-fixup ( -- )