From fd0d489543d8a577975aba46a1db46fa3c55d0af Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Mon, 24 Mar 2008 17:25:19 -0500
Subject: [PATCH] finish rename process to priority

---
 extra/io/priority/priority.factor        |  5 -----
 extra/io/unix/priority/priority.factor   | 21 ---------------------
 extra/io/unix/unix.factor                |  2 +-
 extra/io/windows/process/priority.factor |  8 --------
 4 files changed, 1 insertion(+), 35 deletions(-)
 delete mode 100644 extra/io/priority/priority.factor
 delete mode 100644 extra/io/unix/priority/priority.factor
 delete mode 100644 extra/io/windows/process/priority.factor

diff --git a/extra/io/priority/priority.factor b/extra/io/priority/priority.factor
deleted file mode 100644
index 0790563072..0000000000
--- a/extra/io/priority/priority.factor
+++ /dev/null
@@ -1,5 +0,0 @@
-USING: io.backend kernel ;
-IN: io.priority
-
-HOOK: get-priority io-backend ( -- n )
-HOOK: set-priority io-backend ( n -- )
diff --git a/extra/io/unix/priority/priority.factor b/extra/io/unix/priority/priority.factor
deleted file mode 100644
index deb801e3cf..0000000000
--- a/extra/io/unix/priority/priority.factor
+++ /dev/null
@@ -1,21 +0,0 @@
-USING: alien.syntax kernel io.priority io.unix.backend
-unix ;
-IN: io.unix.priority
-
-: PRIO_PROCESS 0 ; inline
-: PRIO_PGRP 1 ; inline
-: PRIO_USER 2 ; inline
-
-: PRIO_MIN -20 ; inline
-: PRIO_MAX 20 ; inline
-
-! which/who = 0 for current process
-FUNCTION: int getpriority ( int which, int who ) ;
-FUNCTION: int setpriority ( int which, int who, int prio ) ;
-
-M: unix-io get-priority ( -- n )
-    clear_err_no
-    0 0 getpriority dup -1 = [ check-errno ] when ;
-
-M: unix-io set-priority ( n -- )
-    0 0 rot setpriority io-error ;
diff --git a/extra/io/unix/unix.factor b/extra/io/unix/unix.factor
index bd58761a5b..d1c0db72f4 100755
--- a/extra/io/unix/unix.factor
+++ b/extra/io/unix/unix.factor
@@ -1,5 +1,5 @@
 USING: io.unix.backend io.unix.files io.unix.sockets io.timeouts
-io.unix.launcher io.unix.mmap io.backend io.unix.priority
+io.unix.launcher io.unix.mmap io.backend io.unix.process
 combinators namespaces system vocabs.loader sequences ;
 
 "io.unix." os append require
diff --git a/extra/io/windows/process/priority.factor b/extra/io/windows/process/priority.factor
deleted file mode 100644
index f0ca04fd8a..0000000000
--- a/extra/io/windows/process/priority.factor
+++ /dev/null
@@ -1,8 +0,0 @@
-USING: kernel ;
-IN: io.windows.process
-
-M: windows-io current-priority ( -- n )
-    ;
-
-M: windows-io set-current-priority ( n -- )
-    ;