mirror of
https://github.com/haskell-effectful/effectful.git
synced 2024-12-18 11:31:38 +03:00
6 lines
137 B
C
6 lines
137 B
C
|
// Correct implementation of ThreadId# equality for GHC < 9.
|
||
|
|
long effectful_eq_thread(void *tso1, void *tso2)
|
||
|
|
{
|
||
|
|
return tso1 == tso2;
|
||
|
|
}
|