diff --git a/src/fqsched.F90 b/src/fqsched.F90
index 6a705d537103d0392e78d7768a6c7393ed8074aa..d08fd92ac22f97666207d9a5d85432c9a6ef2855 100644
--- a/src/fqsched.F90
+++ b/src/fqsched.F90
@@ -22,7 +22,9 @@
 Module quicksched
   Use, Intrinsic :: ISO_C_BINDING
   Implicit None
-
+  Integer(Kind=C_INT), Parameter :: qsched_res_none = -1
+  Integer(Kind=C_INT), Parameter :: qsched_task_none = -1
+  Integer(Kind=C_INT), Parameter :: qsched_owner_none = -1
   Interface
     
     Integer(Kind=C_INT) Function qsched_get_tid() BIND(C)