From bcc78ab220e362063c374ee808506c505e4f5937 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Mon, 20 Jul 2015 17:13:52 -0700 Subject: [PATCH] basis: whitespace. --- basis/compiler/tests/intrinsics.factor | 2 +- basis/compiler/tests/redefine15.factor | 2 +- basis/xml/tests/test.factor | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/basis/compiler/tests/intrinsics.factor b/basis/compiler/tests/intrinsics.factor index 2db01739b3..78a6b5ee7a 100644 --- a/basis/compiler/tests/intrinsics.factor +++ b/basis/compiler/tests/intrinsics.factor @@ -288,7 +288,7 @@ cell 8 = [ cell 8 = [ [ t ] [ 1 58 fixnum-shift dup [ fixnum+ ] compile-call 1 59 fixnum-shift = ] unit-test [ -576460752303423489 ] [ 1 59 shift neg >fixnum [ -1 fixnum+ ] compile-call ] unit-test - + [ t ] [ 1 40 shift 1 40 shift [ fixnum* ] compile-call 1 80 shift = ] unit-test [ t ] [ 1 40 shift neg 1 40 shift [ fixnum* ] compile-call 1 80 shift neg = ] unit-test [ t ] [ 1 40 shift neg 1 40 shift neg [ fixnum* ] compile-call 1 80 shift = ] unit-test diff --git a/basis/compiler/tests/redefine15.factor b/basis/compiler/tests/redefine15.factor index 7e4d7f4b59..d200449b82 100644 --- a/basis/compiler/tests/redefine15.factor +++ b/basis/compiler/tests/redefine15.factor @@ -5,7 +5,7 @@ DEFER: word-1 : word-2 ( a -- b ) word-1 ; -[ \ word-1 [ ] ( a -- b ) define-declared ] with-compilation-unit +[ \ word-1 [ ] ( a -- b ) define-declared ] with-compilation-unit [ "a" ] [ "a" word-2 ] unit-test diff --git a/basis/xml/tests/test.factor b/basis/xml/tests/test.factor index dba51d57ab..57d89baaf0 100644 --- a/basis/xml/tests/test.factor +++ b/basis/xml/tests/test.factor @@ -76,4 +76,4 @@ SYMBOL: xml-file ! tests ! this tests just checks that pull-event doesn't raise an exception -[ ] [ "vocab:xml/tests/test.xml" binary [ pull-event drop ] with-file-reader ] unit-test \ No newline at end of file +[ ] [ "vocab:xml/tests/test.xml" binary [ pull-event drop ] with-file-reader ] unit-test