Added UnthreadV (vector &2B). Called near the end of despatch of the outermost...

Added UnthreadV (vector &2B). Called near the end of despatch of the outermost interrupt, in IRQ32/26 mode with IRQs disabled, just before transient and non-transient callback checking is performed. Suitable for implementing a CBAI replacement.

Version 5.35, 4.79.2.69. Tagged as 'Kernel-5_35-4_79_2_69'

VersionASM

@@ -13,11 +13,11 @@
                         GBLS    Module_ComponentPath
 Module_MajorVersion     SETS    "5.35"
 Module_Version          SETA    535
-Module_MinorVersion     SETS    "4.79.2.68"
-Module_Date             SETS    "18 Jun 2004"
-Module_ApplicationDate  SETS    "18-Jun-04"
+Module_MinorVersion     SETS    "4.79.2.69"
+Module_Date             SETS    "21 Jun 2004"
+Module_ApplicationDate  SETS    "21-Jun-04"
 Module_ComponentName    SETS    "Kernel"
 Module_ComponentPath    SETS    "RiscOS/Sources/Kernel"
-Module_FullVersion      SETS    "5.35 (4.79.2.68)"
-Module_HelpVersion      SETS    "5.35 (18 Jun 2004) 4.79.2.68"
+Module_FullVersion      SETS    "5.35 (4.79.2.69)"
+Module_HelpVersion      SETS    "5.35 (21 Jun 2004) 4.79.2.69"
                         END

VersionNum

@@ -5,19 +5,19 @@
  *
  */
 #define Module_MajorVersion_CMHG        5.35
-#define Module_MinorVersion_CMHG        4.79.2.68
-#define Module_Date_CMHG                18 Jun 2004
+#define Module_MinorVersion_CMHG        4.79.2.69
+#define Module_Date_CMHG                21 Jun 2004
 
 #define Module_MajorVersion             "5.35"
 #define Module_Version                  535
-#define Module_MinorVersion             "4.79.2.68"
-#define Module_Date                     "18 Jun 2004"
+#define Module_MinorVersion             "4.79.2.69"
+#define Module_Date                     "21 Jun 2004"
 
-#define Module_ApplicationDate          "18-Jun-04"
+#define Module_ApplicationDate          "21-Jun-04"
 
 #define Module_ComponentName            "Kernel"
 #define Module_ComponentPath            "RiscOS/Sources/Kernel"
 
-#define Module_FullVersion              "5.35 (4.79.2.68)"
-#define Module_HelpVersion              "5.35 (18 Jun 2004) 4.79.2.68"
+#define Module_FullVersion              "5.35 (4.79.2.69)"
+#define Module_HelpVersion              "5.35 (21 Jun 2004) 4.79.2.69"
 #define Module_LibraryVersionInfo       "5:35"

s/ArthurSWIs

@@ -585,9 +585,9 @@ defaultvectab
  |
    & 0, 0, NaffVector           ; GraphicsV * &2a
  ]
+   & 0, 0, NaffVector           ; UnthreadV * &2b
 
  ; the spares
-   & 0, 0, NaffVector           ; &2b
    & 0, 0, NaffVector           ; &2c
    & 0, 0, NaffVector           ; &2d
    & 0, 0, NaffVector           ; &2e

s/NewIRQs

@@ -63,6 +63,14 @@ Initial_IRQ_Code ROUT
         Pull     r0
         STR      r0, [r11, #IRQsema]
 
+        TEQ      r0, #0
+        BNE      %F10
+        Push     "r10"
+        MOV      r10, #UnthreadV
+        BL       CallVector
+        Pull     "r10"
+10
+
   [ :LNOT:No26bitCode
         MRS      r0, CPSR
         ORR      r0, r0, #&10