ada: Adjust QNX Ada priorities to match QNX system priorities

The Ada priority range of the QNX runtime started from 0, differing from
the QNX system priorities range starting from 1. As this may cause
confusion, especially if used in a mixed language environment, the Ada
priority range now starts at 1.

The default priority of Ada tasks as mandated is the middle of the
priority range. On QNX this means the default priority of Ada tasks is
30. This is much higher than the default QNX priority of 10 and may
cause unexpected system interruptions when Ada tasks take a lot of CPU time.

gcc/ada/

	* libgnarl/s-osinte__qnx.adb: Adjust priority conversion function.
	* libgnat/system-qnx-arm.ads: Adjust priority range and default
	priority.

1 files changed, 1 insertions, 1 deletions

diff --git a/gcc/ada/libgnarl/s-osinte__qnx.adb b/gcc/ada/libgnarl/s-osinte__qnx.adb
index bf08ecb..127d179 100644
--- a/gcc/ada/libgnarl/s-osinte__qnx.adb
+++ b/gcc/ada/libgnarl/s-osinte__qnx.adb
@@ -87,7 +87,7 @@ package body System.OS_Interface is
      (Prio : System.Any_Priority) return Interfaces.C.int
    is
    begin
-      return Interfaces.C.int (Prio) + 1;
+      return Interfaces.C.int (Prio);
    end To_Target_Priority;
 
    -----------------