From 9167b9ca9e5de8fddda016fb99a7d926625233bb Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Tue, 7 May 2024 20:00:17 -0400 Subject: fb-emulator-gb: It's not as slow --- fig-emulator-gb/src/Fig/Emulator/GB/Component/Serial.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'fig-emulator-gb/src/Fig/Emulator/GB/Component/Serial.hs') diff --git a/fig-emulator-gb/src/Fig/Emulator/GB/Component/Serial.hs b/fig-emulator-gb/src/Fig/Emulator/GB/Component/Serial.hs index 0ee529b..7a4bceb 100644 --- a/fig-emulator-gb/src/Fig/Emulator/GB/Component/Serial.hs +++ b/fig-emulator-gb/src/Fig/Emulator/GB/Component/Serial.hs @@ -18,7 +18,7 @@ instance Pretty SerialError where , b ] -compSerial :: (MonadIO m, MonadThrow m) => Maybe Handle -> Component m +compSerial :: Maybe Handle -> Component compSerial mh = Component { compState = () , compMatches = (== 0xff01) -- cgit v1.2.3