Development-dependencies updated

Author: aplteam

APLSource/EventCodes.aplc

@@ -62,11 +62,13 @@
 
     ∇ r←Version
       :Access Public Shared
-      r←({⍵}⍕⎕THIS)'3.0.1+25' '2021-03-02'
+      r←({⍵}⍕⎕THIS)'3.1.0+25' '2024-11-30'
     ∇
 
     ∇ History
       :Access Public Shared
+      ⍝ * 3.1.0
+      ⍝   * 819⌶ exchanged against ⎕C for 20.0-readiness
       ⍝ * 3.0.1
       ⍝   * Package config corrected
       ⍝ * 3.0.0
@@ -144,7 +146,7 @@
       :Else
           'Invalid sort type: either '''' (alpha) or ⍬ (numeric)'⎕SIGNAL 11
       :EndIf
-      :If 0≠≢__start←{1(819⌶)⍕⍵}__start~'*'
+      :If 0≠≢__start←{2::1(819⌶)⍵ ⋄ 1 ⎕C ⍵}⍕__start~'*'
           __allNumbers←(((⍴,__start)↑[2]↑__allNumbers[;1])∧.=__start)⌿__allNumbers
       :EndIf
     ∇

APLSource/TestCases/Test_30.aplf

@@ -1,18 +1,22 @@
- R←Test_30(stopFlag batchFlag);⎕TRAP;errors;TEMP;html;list;version
+ R←Test_30(stopFlag batchFlag);⎕TRAP;errors;TEMP;html;list;version;ind
 ⍝ Check whether we cover all documented codes according to the latest installed version
  ⎕TRAP←(999 'C' '. ⍝ Deliberate error')(0 'N')
  R←T._Failed
 
  list←⌽GetInstalledAPLs ⍬
- :Repeat
-     version←3⊃' 'APLTreeUtils2.Split⊃list
-     :If 0=≢errors←∆GetErrorsFromHelpPage'http://help.dyalog.com/',version,'/Content/Language/System%20Functions/trap.htm'
-         list←1↓list
-     :EndIf
- :Until (0<≢errors)∨0=≢list
- 'Could not find any APL?!'⎕SIGNAL 11/⍨0=≢errors
- list←##.EventCodes.List''
- →T.PassesIf∧/list[;2]∊errors[;1]
- →T.PassesIf∧/errors[;1]∊list[;2]
+ :If 0=≢ind←'Which version? (Latest?!)'CommTools.Select list
+     R←T._SkippedByUser
+ :Else
+     :Repeat
+         version←3⊃' 'APLTreeUtils2.Split ind⊃list
+         :If 0=≢errors←∆GetErrorsFromHelpPage'http://help.dyalog.com/',version,'/Content/Language/System%20Functions/trap.htm'
+             list←1↓list
+         :EndIf
+     :Until (0<≢errors)∨0=≢list
+     'Could not find any APL?!'⎕SIGNAL 11/⍨0=≢errors
+     list←##.EventCodes.List''
+     →T.PassesIf∧/list[;2]∊errors[;1]
+     →T.PassesIf∧/errors[;1]∊list[;2]
 
- R←T._OK
+     R←T._OK
+ :EndIf

APLSource/TestCases/∆GetErrorsFromHelpPage.aplf

@@ -13,7 +13,7 @@
  :If ∨/'<title>401 Unauthorized</title>'⍷html
      errors←''
  :Else
-     html←{⍵↓⍨3⊃{⍵/⍳≢⍵}'<table'⍷⍵}html
+     html←{⍵↓⍨3⊃{⍵/⍳≢⍵}'<table'⍷⍵}html  ⍝ Index Error?! Maybe the documentation is not yet available for the selected version?
      buff←(≢'<td class="Dyalog">')↓¨{⍵~⎕TC}¨('<td class="Dyalog">'⍷html)⊂html
      bool←(≢buff)⍴1 0
      codes←{⍵↑⍨¯1+⍵⍳'<'}¨bool/buff

TestResults/CodeCoverage.cr

@@ -19,5 +19,5 @@
   source: "APLSource/EventCodes.aplc",
   tags: "event-constants",
   userCommandScript: "",
-  version: "3.0.1+27",
+  version: "3.1.0+28",
 }

TestResults/CodeCoverage.html

@@ -1,13 +1,13 @@
 {
   packageID: [
     "aplteam-WinReg-5.0.4",
-    "aplteam-Tester2-3.6.0",
-    "aplteam-FilesAndDirs-5.7.0",
-    "aplteam-CommTools-1.7.1",
-    "aplteam-CodeCoverage-0.10.5",
-    "aplteam-APLTreeUtils2-1.3.1",
+    "aplteam-Tester2-3.10.0",
+    "aplteam-FilesAndDirs-5.8.1",
+    "aplteam-CommTools-1.8.2",
+    "aplteam-CodeCoverage-0.10.7",
+    "aplteam-APLTreeUtils2-1.4.0",
     "aplteam-OS-3.1.1",
-    "aplteam-IniFiles-5.0.3",
+    "aplteam-IniFiles-5.1.0",
   ],
   principal: [
     1,

TestResults/CodeCoverage.profile

@@ -1,6 +1,6 @@
-aplteam-APLTreeUtils2-1.3.1
-aplteam-Tester2-3.6.0
-aplteam-CodeCoverage-0.10.5
-aplteam-FilesAndDirs-5.7.0
+aplteam-APLTreeUtils2-1.4.0
+aplteam-Tester2-3.10.0
+aplteam-CodeCoverage-0.10.7
+aplteam-FilesAndDirs-5.8.1
 aplteam-WinReg-5.0.4
-aplteam-CommTools-1.7.1
+aplteam-CommTools-1.8.2