From 22f9478c5e39eeb6447cc65602f364d566e1cb30 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Mon, 22 Sep 2008 02:27:07 -0500 Subject: [PATCH] Better error printing --- basis/stack-checker/errors/errors.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/basis/stack-checker/errors/errors.factor b/basis/stack-checker/errors/errors.factor index 3d92aea3e8..bab6c17c85 100644 --- a/basis/stack-checker/errors/errors.factor +++ b/basis/stack-checker/errors/errors.factor @@ -72,8 +72,8 @@ TUPLE: effect-error word inferred declared ; M: effect-error error. "Stack effects of the word " write [ word>> pprint " do not match." print ] - [ "Inferred: " write inferred>> effect>string . ] - [ "Declared: " write declared>> effect>string . ] tri ; + [ "Inferred: " write inferred>> . ] + [ "Declared: " write declared>> . ] tri ; TUPLE: recursive-quotation-error quot ;