core: Remove trailing whitespace.

diff --git a/core/classes/algebra/algebra.factor b/core/classes/algebra/algebra.factor
index eb142165a0f66df1883d60d42563b07d901b8c8e..074cf1b9e3c592bb6f68e697b6a66e6cac80e3d8 100644 (file)
--- a/core/classes/algebra/algebra.factor
+++ b/core/classes/algebra/algebra.factor
@@ -162,7 +162,7 @@ PREDICATE: nontrivial-anonymous-intersection < anonymous-intersection
         { [ dup anonymous-union? ] [
             members>>
             [ class-not normalize-class ] map
-            <anonymous-intersection> 
+            <anonymous-intersection>
         ] }
         { [ dup anonymous-intersection? ] [
             participants>>

diff --git a/core/hashtables/hashtables.factor b/core/hashtables/hashtables.factor
index 648f3da537a62152a5593fc9293f98a4184fb2f1..a8c8fc52cbe816d927c56e916ecc77aa61dcda00 100644 (file)
--- a/core/hashtables/hashtables.factor
+++ b/core/hashtables/hashtables.factor
@@ -59,7 +59,7 @@ TUPLE: hashtable
 !
 ! if empty? is f:
 ! - we want to store into i
-! 
+!
 ! if empty? is t:
 ! - we want to store into j if j is not f
 ! - otherwise we want to store into i

diff --git a/core/io/encodings/utf16/utf16.factor b/core/io/encodings/utf16/utf16.factor
index ccdac29173a58f74d6c08bbc53f606e23ccfc960..0660ddfd774784118e80c769c5e357eb9e6c1fb7 100644 (file)
--- a/core/io/encodings/utf16/utf16.factor
+++ b/core/io/encodings/utf16/utf16.factor
@@ -40,7 +40,7 @@ ERROR: missing-bom ;
         [ 0b11 bitand quad-be ]
         [ drop ignore ] if
     ] [ double-be ] if ;
-    
+
 M: utf16be decode-char
     drop dup stream-read1 dup [ begin-utf16be ] when nip ;
 

diff --git a/core/io/encodings/utf8/utf8.factor b/core/io/encodings/utf8/utf8.factor
index c17de5b2590c04da9c5138f4465dd5d6fa4608a6..28ce4899f0534e2f101d3bf3ec2f16294d76817c 100644 (file)
--- a/core/io/encodings/utf8/utf8.factor
+++ b/core/io/encodings/utf8/utf8.factor
@@ -8,7 +8,7 @@ IN: io.encodings.utf8
 
 SINGLETON: utf8
 
-<PRIVATE 
+<PRIVATE
 
 : starts-2? ( char -- ? )
     dup [ -6 shift 0b10 number= ] when ; inline

diff --git a/core/math/parser/parser.factor b/core/math/parser/parser.factor
index 1691e6a042c0bd42c4ad735c3816afe53e7e26d4..4ae7a555cdd73cd7dbe9f281ea3e1303427cfd6b 100644 (file)
--- a/core/math/parser/parser.factor
+++ b/core/math/parser/parser.factor
@@ -263,14 +263,14 @@ DEFER: @neg-digit
         [ @neg-digit ]
     } case ; inline
 
-: @first-char ( i number-parse n char -- n/f ) 
+: @first-char ( i number-parse n char -- n/f )
     {
         { CHAR: - [ [ @neg-first-digit ] require-next-digit ?neg ] }
         { CHAR: + [ [ @pos-first-digit ] require-next-digit ] }
         [ @pos-first-digit ]
     } case ; inline
 
-: @first-char-no-radix ( i number-parse n char -- n/f ) 
+: @first-char-no-radix ( i number-parse n char -- n/f )
     {
         { CHAR: - [ [ @neg-digit ] require-next-digit ?neg ] }
         { CHAR: + [ [ @pos-digit ] require-next-digit ] }

diff --git a/core/slots/slots.factor b/core/slots/slots.factor
index 3b810261a08002d3286ee0d8e972a297ab313ec3..1c1eec61c605b80c53ecb4a96f7e344544bda473 100644 (file)
--- a/core/slots/slots.factor
+++ b/core/slots/slots.factor
@@ -30,7 +30,7 @@ PREDICATE: writer-method < method "writing" word-prop >boolean ;
 
 GENERIC# reader-quot 1 ( class slot-spec -- quot )
 
-M: object reader-quot 
+M: object reader-quot
     nip [
         dup offset>> ,
         \ slot ,