core: cramp -> bound (was short)

[factor.git] / basis / simple-flat-file / simple-flat-file.factor

diff --git a/basis/simple-flat-file/simple-flat-file.factor b/basis/simple-flat-file/simple-flat-file.factor
index 694061d8ec5eda6f3f46b6441b92a76820f87b15..e6c5233f890a9822d98afa30a5df1edc35322143 100644 (file)
--- a/basis/simple-flat-file/simple-flat-file.factor
+++ b/basis/simple-flat-file/simple-flat-file.factor
@@ -12,7 +12,7 @@ IN: simple-flat-file
     [ drop-comment ] map harvest ;
 
 : split-column ( line -- columns )
-    " \t" split harvest 2 cramp head 2 f pad-tail ;
+    " \t" split harvest 2 bound head 2 f pad-tail ;
 
 : parse-hex ( s -- n )
     dup [