From 02d753e346d914c0fdd5ac151885bbe87016a7d1 Mon Sep 17 00:00:00 2001
From: kub <derkub@gmail.com>
Date: Sat, 10 Apr 2021 21:31:16 +0200
Subject: [PATCH] md, fix irq priority handling for H-int

---
 pico/pico_cmn.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/pico/pico_cmn.c b/pico/pico_cmn.c
index c5d72278..d1ebe22b 100644
--- a/pico/pico_cmn.c
+++ b/pico/pico_cmn.c
@@ -67,7 +67,8 @@ static void do_hint(struct PicoVideo *pv)
   pv->pending_ints |= 0x10;
   if (pv->reg[0] & 0x10) {
     elprintf(EL_INTS, "hint: @ %06x [%u]", SekPc, SekCyclesDone());
-    SekInterrupt(4);
+    if (SekIrqLevel < 4)
+      SekInterrupt(4);
   }
 }
 
-- 
2.39.5