diff --git a/changelog/2024-10-07T15_01_17+02_00_fix_writeToBiSignal_warnings b/changelog/2024-10-07T15_01_17+02_00_fix_writeToBiSignal_warnings
new file mode 100644
index 0000000000..62f843be93
--- /dev/null
+++ b/changelog/2024-10-07T15_01_17+02_00_fix_writeToBiSignal_warnings
@@ -0,0 +1 @@
+FIXED: Unused argument warnings on writeToBiSignal#
diff --git a/clash-prelude/src/Clash/Signal/BiSignal.hs b/clash-prelude/src/Clash/Signal/BiSignal.hs
index e720fc882f..ad89b9fa2e 100644
--- a/clash-prelude/src/Clash/Signal/BiSignal.hs
+++ b/clash-prelude/src/Clash/Signal/BiSignal.hs
@@ -1,7 +1,7 @@
 {-|
 Copyright  :  (C) 2017, Google Inc.
                   2019, Myrtle Software Ltd
-                  2022-2023, QBayLogic B.V.
+                  2022-2024, QBayLogic B.V.
 License    :  BSD2 (see the file LICENSE)
 Maintainer :  QBayLogic B.V. <devops@qbaylogic.com>
 
@@ -277,8 +277,7 @@ writeToBiSignal#
   -> Signal d Bool
   -> Signal d (BitVector n)
   -> BiSignalOut ds d n
--- writeToBiSignal# = writeToBiSignal#
-writeToBiSignal# _ maybeSignal _ _ = BiSignalOut [maybeSignal]
+writeToBiSignal# bIn maybeSignal wEn val = BiSignalOut [bIn `seq` wEn `seq` val `seq` maybeSignal]
 -- See: https://github.com/clash-lang/clash-compiler/pull/2511
 {-# CLASH_OPAQUE writeToBiSignal# #-}
 {-# ANN writeToBiSignal# hasBlackBox #-}