unsafe testing

wavewave · Aug 27, 2023 · d17898a · d17898a
1 parent 8019866
commit d17898a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/fficxx/src/FFICXX/Generate/Util/GHCExactPrint.hs b/fficxx/src/FFICXX/Generate/Util/GHCExactPrint.hs
@@ -561,7 +561,7 @@ mkForImpCcall quote fname typ =
                   (mkRelAnchor 0)
                   ( EpaComment
                       ( EpaBlockComment
-                          ( "{- REPLACE_THIS_LINE |foreign import ccall interruptible \""
+                          ( "{- REPLACE_THIS_LINE |foreign import ccall unsafe \""
                               <> quote
                               <> "\"| -}"
                           )