From 2f11e06dec19e7f11973e393457071dc79c990f7 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Sun, 24 Mar 2013 10:06:50 -0700 Subject: [PATCH] tools.coverage: Rename --- basis/tools/coverage/coverage.factor | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/basis/tools/coverage/coverage.factor b/basis/tools/coverage/coverage.factor index e1bf66f919..1d3dadd972 100644 --- a/basis/tools/coverage/coverage.factor +++ b/basis/tools/coverage/coverage.factor @@ -7,9 +7,9 @@ combinators.short-circuit namespaces tools.test combinators continuations classes ; IN: tools.coverage -TUPLE: coverage < identity-tuple executed? ; +TUPLE: coverage-state < identity-tuple executed? ; -C: coverage +C: coverage-state SYMBOL: covered @@ -61,7 +61,7 @@ M: string remove-coverage M: word add-coverage H{ } clone [ "coverage" set-word-prop ] 2keep '[ - \ coverage new [ _ set-at ] 2keep + \ coverage-state new [ _ set-at ] 2keep '[ _ flag-covered ] prepend ] deep-annotate ; @@ -72,7 +72,7 @@ M: string reset-coverage [ reset-coverage ] each-word ; M: word reset-coverage - [ dup coverage? [ f >>executed? ] when drop ] each-word ; + [ dup coverage-state? [ f >>executed? ] when drop ] each-word ; GENERIC: coverage ( object -- seq )