Move system word from unix.ffi to libc since its not Unix-specific

diff --git a/basis/libc/libc.factor b/basis/libc/libc.factor
index a2ed34c267dd7e72b1b4d374904240879535b970..68d041ac8faa482a2b1990a9d973706afdec7ffe 100644 (file)
--- a/basis/libc/libc.factor
+++ b/basis/libc/libc.factor
@@ -100,5 +100,7 @@ FUNCTION: int memcmp ( void* a, void* b, ulong size ) ;
 
 FUNCTION: size_t strlen ( c-string alien ) ;
 
+FUNCTION: int system ( c-string command ) ;
+
 DESTRUCTOR: free
 DESTRUCTOR: (free)

diff --git a/basis/unix/ffi/ffi.factor b/basis/unix/ffi/ffi.factor
index 1809ee4b687bc09b7b51ab1326f22d4af2e67e8b..26cdc22bc17b1d1fe28d530a8cd4b6221422a00c 100644 (file)
--- a/basis/unix/ffi/ffi.factor
+++ b/basis/unix/ffi/ffi.factor
@@ -151,7 +151,6 @@ FUNCTION: int setuid ( uid_t uid ) ;
 FUNCTION: int socket ( int domain, int type, int protocol ) ;
 FUNCTION: int symlink ( c-string path1, c-string path2 ) ;
 FUNCTION: int link ( c-string path1, c-string path2 ) ;
-FUNCTION: int system ( c-string command ) ;
 FUNCTION: int unlink ( c-string path ) ;
 FUNCTION: int utimes ( c-string path, timeval[2] times ) ;
 FUNCTION: ssize_t write ( int fd, void* buf, size_t nbytes ) ;