Merge pull request audetto#62 from audetto/fullspeed

sa2: do not call VideoPresentScreen every Apple ][ frame when in full…
jvernet · Jan 14, 2022 · 26a7293 · 26a7293
2 parents c70377f + d88ab11
commit 26a7293
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 3 deletions.
diff --git a/source/frontends/sdl/main.cpp b/source/frontends/sdl/main.cpp
@@ -155,8 +155,9 @@ void run_sdl(int argc, const char * argv [])
       frame->ExecuteOneFrame(oneFrame);
       cpuTimer.toc();
 
-      if (!options.headless)
+      if (!options.headless && !g_bFullSpeed)
       {
+        // in full speed VideoRedrawScreenDuringFullSpeed is called inside SDLFrame::Execute
         refreshScreenTimer.tic();
         frame->VideoPresentScreen();
         refreshScreenTimer.toc();

diff --git a/source/frontends/sdl/sdlframe.cpp b/source/frontends/sdl/sdlframe.cpp
@@ -591,8 +591,9 @@ namespace sa2
         g_dwCyclesThisFrame -= dwClksPerFrame;
         if (g_bFullSpeed)
         {
-          NTSC_VideoClockResync(g_dwCyclesThisFrame);
-          GetVideo().VideoRefreshBuffer(GetVideo().GetVideoMode(), true);
+          // only call VideoPresentScreen every 16ms
+          // hardcoded in FrameBase::VideoRedrawScreenDuringFullSpeed()
+          VideoRedrawScreenDuringFullSpeed(g_dwCyclesThisFrame);
         }
       }
     } while (totalCyclesExecuted < cyclesToExecute);
@@ -687,6 +688,7 @@ namespace sa2
         // entering full speed
         MB_Mute();
         setGLSwapInterval(0);
+        VideoRedrawScreenDuringFullSpeed(0, true);
       }
       else
       {