diff --git a/basis/ui/tools/profiler/profiler.factor b/basis/ui/tools/profiler/profiler.factor
index 867afbb65f..bb6635a0f1 100644
--- a/basis/ui/tools/profiler/profiler.factor
+++ b/basis/ui/tools/profiler/profiler.factor
@@ -28,7 +28,8 @@ SINGLETON: word-renderer
 M: word-renderer row-columns
     drop [ [ present ] map ] [ { "All" "" } ] if* ;
 
-M: word-renderer row-value drop first ;
+M: word-renderer row-value
+    drop dup [ first ] when ;
 
 SINGLETON: method-renderer