From 1d4ec1959d851a96b0874de516a477be7ace5ad3 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Fri, 6 Nov 2009 04:36:46 -0600 Subject: [PATCH] stack-checker.known-words: fix declared output type for dispatch-stats primitive --- basis/stack-checker/known-words/known-words.factor | 2 +- basis/tools/time/time-tests.factor | 4 ++++ 2 files changed, 5 insertions(+), 1 deletion(-) create mode 100644 basis/tools/time/time-tests.factor diff --git a/basis/stack-checker/known-words/known-words.factor b/basis/stack-checker/known-words/known-words.factor index db492f97fe..154e67ebb1 100644 --- a/basis/stack-checker/known-words/known-words.factor +++ b/basis/stack-checker/known-words/known-words.factor @@ -699,7 +699,7 @@ M: bad-executable summary \ lookup-method { object array } { word } define-primitive \ reset-dispatch-stats { } { } define-primitive -\ dispatch-stats { } { array } define-primitive +\ dispatch-stats { } { byte-array } define-primitive \ optimized? { word } { object } define-primitive diff --git a/basis/tools/time/time-tests.factor b/basis/tools/time/time-tests.factor new file mode 100644 index 0000000000..00c774663c --- /dev/null +++ b/basis/tools/time/time-tests.factor @@ -0,0 +1,4 @@ +IN: tools.time.tests +USING: tools.time tools.test compiler ; + +[ ] [ [ [ ] time ] compile-call ] unit-test