From 95d5daaa7d735b02a39d1cd9ad689a11a5d60e40 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Mon, 14 Nov 2011 10:26:08 -0800 Subject: [PATCH] slots: fix initial value tests. --- core/slots/slots-tests.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/core/slots/slots-tests.factor b/core/slots/slots-tests.factor index 7ec0136467..5129827ad7 100644 --- a/core/slots/slots-tests.factor +++ b/core/slots/slots-tests.factor @@ -37,5 +37,5 @@ UNION: comme-ci integer float ; UNION: comme-ca integer float ; comme-ca 25.5 "initial-value" set-word-prop -[ 0 ] [ comme-ci initial-value ] unit-test -[ 25.5 ] [ comme-ca initial-value ] unit-test +[ 0 t ] [ comme-ci initial-value ] unit-test +[ 25.5 t ] [ comme-ca initial-value ] unit-test