Initialise ⎕RL properly (#48)

Dyalog · Aug 26, 2024 · db92599 · db92599
1 parent 08be7c0
commit db92599
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/demo/DemoApexSimpleBar.aplf b/demo/DemoApexSimpleBar.aplf
@@ -1,5 +1,6 @@
  DemoApexSimpleBar connected;series
-
+ ⎕RL←2017    ⍝ assign a non-zero value to ensure we get predictable random numbers (repeated in every test using ? to ensure repeatability independly of sequence of tests)
+
  series←+\?2 10⍴2
 
  'F1'eWC'Form' 'Charts'(50 50)(600 800)('Coord' 'Pixel')

diff --git a/demo/DemoSplitters.aplf b/demo/DemoSplitters.aplf
@@ -1,4 +1,5 @@
  DemoSplitters connected;inputs;scores;TBL;GRID;z;colors;imagefiles;periods;names;expert;type;height;depth;width
+ ⎕RL←2017    ⍝ assign a non-zero value to ensure we get predictable random numbers (repeated in every test using ? to ensure repeatability independly of sequence of tests)
  JSWC.CONNECTED←connected
  :If ~connected
     JSWC.(CONNECTED USEWIN32 LOGMODES)←0 1 ⎕A  ⍝ /// While debugging