From b0220e545664d501b6fa2478f66e00567deac4b2 Mon Sep 17 00:00:00 2001
From: Christian Groessler <chris@groessler.org>
Date: Sun, 2 Mar 2025 09:26:31 +0100
Subject: [PATCH] fix problem in _get_tv for GEOS CBM

Found by mkslack, see #2046
---
 libsrc/geos-cbm/system/get_ostype.s | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/libsrc/geos-cbm/system/get_ostype.s b/libsrc/geos-cbm/system/get_ostype.s
index 6e6731952..9ba8b7982 100644
--- a/libsrc/geos-cbm/system/get_ostype.s
+++ b/libsrc/geos-cbm/system/get_ostype.s
@@ -82,8 +82,8 @@ tvmode:                         ; PAL/NTSC check here, result in A
         pha
         lda #IO_IN              ; enable access to I/O
         sta CPU_DATA
-        bit rasreg
-        bpl tvmode              ; wait for rasterline  127<x<256
+:       bit rasreg
+        bpl :-                  ; wait for rasterline  127<x<256
         lda #24                 ; (rasterline now >=256!)
 modelp:
         cmp rasreg              ; wait for rasterline = 24 (or 280 on PAL)