; -----------------------------------------------------------------
;
;                 Linux API Functions
;
; -----------------------------------------------------------------

; nice value      	Win32 Priority
; -20 To -16 	      THREAD_PRIORITY_HIGHEST
; -15 To -6 	        THREAD_PRIORITY_ABOVE_NORMAL
; -5 To +4 	        THREAD_PRIORITY_NORMAL
; +5 To +14 	    THREAD_PRIORITY_BELOW_NORMAL
; +15 To +19 	  THREAD_PRIORITY_LOWEST

Procedure.l LinThreadPriority(Thread.l, Priority.l)
  ReturnC.l = setpriority_(0, Thread.l, Priority.l)
  ProcedureReturn ReturnC.l
EndProcedure