Fix spelling

diff --git a/basis/tools/memory/memory.factor b/basis/tools/memory/memory.factor
index cf3b7c280f9d835f866a23df0143da1017d8c7e2..fa97e2d8931f3ce5be7c6c0bf7e46d3762e5f77a 100644 (file)
--- a/basis/tools/memory/memory.factor
+++ b/basis/tools/memory/memory.factor
@@ -40,15 +40,15 @@ IN: tools.memory
     "Decks" write-total
     "Cards" write-total ;
 
-: write-labelled-size ( n string -- )
+: write-labeled-size ( n string -- )
     [ write-cell write-size ] with-row ;
 
 : (code-room.) ( -- )
     code-room {
-        [ "Size:" write-labelled-size ]
-        [ "Used:" write-labelled-size ]
-        [ "Total free space:" write-labelled-size ]
-        [ "Largest free block:" write-labelled-size ]
+        [ "Size:" write-labeled-size ]
+        [ "Used:" write-labeled-size ]
+        [ "Total free space:" write-labeled-size ]
+        [ "Largest free block:" write-labeled-size ]
     } spread ;
 
 : heap-stat-step ( obj counts sizes -- )