interpolate: split out format into a hook

[factor.git] / basis / unix / unix.factor

diff --git a/basis/unix/unix.factor b/basis/unix/unix.factor
index bcb1c4a7c357101b46319d5221de5d6229c825dd..4cb43044b9b71aec4a56b3fad04ebcf8b0a63a6f 100644 (file)
--- a/basis/unix/unix.factor
+++ b/basis/unix/unix.factor
@@ -68,8 +68,6 @@ M: unix open-file [ open ] unix-system-call ;
 
 : make-fifo ( path mode -- ) [ mkfifo ] unix-system-call drop ;
 
-: truncate-file ( path n -- ) [ truncate ] unix-system-call drop ;
-
 : touch ( filename -- ) f [ utime ] unix-system-call drop ;
 
 : change-file-times ( filename access modification -- )