Commit 74a6db0a authored by Jeffrey Lee's avatar Jeffrey Lee
Browse files

Remove startup delay from power saving code

Detail:
  s/Wimp02 - Get rid of the magic ~30 second delay before the Portable_Speed/Portable_Idle power saving kicks in. The fast/slow thresholds are self-adjusting, and any non-null poll event will kick the system into high speed, so removing the startup delay isn't likely to have any adverse affect on desktop startup time.
  s/Wimp01 - MaxIdleEvents is now redundant, remove it
Admin:
  Tested on Raspberry Pi 3
  Should resolve issue reported on the forums where RPCEmu thrashes the hosts's CPU for 30 seconds after entering the desktop:
  https://www.riscosopen.org/forum/forums/10/topics/8990


Version 5.59. Tagged as 'Wimp-5_59'
parent 50eea7b2
...@@ -11,13 +11,13 @@ ...@@ -11,13 +11,13 @@
GBLS Module_HelpVersion GBLS Module_HelpVersion
GBLS Module_ComponentName GBLS Module_ComponentName
GBLS Module_ComponentPath GBLS Module_ComponentPath
Module_MajorVersion SETS "5.58" Module_MajorVersion SETS "5.59"
Module_Version SETA 558 Module_Version SETA 559
Module_MinorVersion SETS "" Module_MinorVersion SETS ""
Module_Date SETS "11 Apr 2017" Module_Date SETS "24 Jul 2017"
Module_ApplicationDate SETS "11-Apr-17" Module_ApplicationDate SETS "24-Jul-17"
Module_ComponentName SETS "Wimp" Module_ComponentName SETS "Wimp"
Module_ComponentPath SETS "castle/RiscOS/Sources/Desktop/Wimp" Module_ComponentPath SETS "castle/RiscOS/Sources/Desktop/Wimp"
Module_FullVersion SETS "5.58" Module_FullVersion SETS "5.59"
Module_HelpVersion SETS "5.58 (11 Apr 2017)" Module_HelpVersion SETS "5.59 (24 Jul 2017)"
END END
/* (5.58) /* (5.59)
* *
* This file is automatically maintained by srccommit, do not edit manually. * This file is automatically maintained by srccommit, do not edit manually.
* Last processed by srccommit version: 1.1. * Last processed by srccommit version: 1.1.
* *
*/ */
#define Module_MajorVersion_CMHG 5.58 #define Module_MajorVersion_CMHG 5.59
#define Module_MinorVersion_CMHG #define Module_MinorVersion_CMHG
#define Module_Date_CMHG 11 Apr 2017 #define Module_Date_CMHG 24 Jul 2017
#define Module_MajorVersion "5.58" #define Module_MajorVersion "5.59"
#define Module_Version 558 #define Module_Version 559
#define Module_MinorVersion "" #define Module_MinorVersion ""
#define Module_Date "11 Apr 2017" #define Module_Date "24 Jul 2017"
#define Module_ApplicationDate "11-Apr-17" #define Module_ApplicationDate "24-Jul-17"
#define Module_ComponentName "Wimp" #define Module_ComponentName "Wimp"
#define Module_ComponentPath "castle/RiscOS/Sources/Desktop/Wimp" #define Module_ComponentPath "castle/RiscOS/Sources/Desktop/Wimp"
#define Module_FullVersion "5.58" #define Module_FullVersion "5.59"
#define Module_HelpVersion "5.58 (11 Apr 2017)" #define Module_HelpVersion "5.59 (24 Jul 2017)"
#define Module_LibraryVersionInfo "5:58" #define Module_LibraryVersionInfo "5:59"
...@@ -1269,7 +1269,6 @@ messages # 4 ; =0 then no messages / -> messages bloc ...@@ -1269,7 +1269,6 @@ messages # 4 ; =0 then no messages / -> messages bloc
; bits for portable speed control ; bits for portable speed control
MaxIdleEvents # 4 ; maximum number of idle events received
; see 321nk later ; see 321nk later
IdlePerSec # 4 ; amount of time spent in idle mode IdlePerSec # 4 ; amount of time spent in idle mode
[ Stork [ Stork
......
...@@ -328,8 +328,8 @@ initfirsttask ...@@ -328,8 +328,8 @@ initfirsttask
STR R0,special_pointer STR R0,special_pointer
; ;
STR R0,IdlePerSec STR R0,IdlePerSec
MOV R0,#-32 STR R0,MaxSlowIdleEvents ; setup ready for speed monitoring
STR R0,MaxIdleEvents ; setup ready for speed monitoring STR R0,MaxFastIdleEvents
; ;
Push "R0-R2" Push "R0-R2"
[ Stork [ Stork
...@@ -650,13 +650,6 @@ callback Entry "R0-R3" ...@@ -650,13 +650,6 @@ callback Entry "R0-R3"
EORNES r0, r0, #cf_active ; r0=0 => command window active EORNES r0, r0, #cf_active ; r0=0 => command window active
EXIT EQ ; not active, so don't mess around with speed EXIT EQ ; not active, so don't mess around with speed
LDR r1, MaxIdleEvents ; get the maximum read so far
CMP r1, #0
ADDLT r1, r1, #1
STRLT r1, MaxIdleEvents ; hmmm?
STRLT r1, MaxSlowIdleEvents
STRLT r1, MaxFastIdleEvents
EXIT LT ; return if LT 0!
[ Stork [ Stork
;DREG r3, "Idle count: ",cc,Integer ;DREG r3, "Idle count: ",cc,Integer
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment