diff --git a/.github/workflows/simdutf-flag-alpine.yml b/.github/workflows/simdutf-flag-alpine.yml
index 009341ef..04d0ebc3 100644
--- a/.github/workflows/simdutf-flag-alpine.yml
+++ b/.github/workflows/simdutf-flag-alpine.yml
@@ -35,6 +35,14 @@ jobs:
       - uses: actions/checkout@v2
       - name: Test
         run: |
+          cat > THLinkTest.hs <<EOF
+          {-# LANGUAGE TemplateHaskell #-}
+          import Debug.Trace
+          import Data.Text
+          main :: IO ()
+          main = return ()
+          ( traceM (unpack (pack "test")) >> pure [] )
+          EOF
           cabal build -f-simdutf --disable-tests --disable-benchmarks
-          cabal exec -f-simdutf --disable-tests --disable-benchmarks ghc -- tests/THLinkTest.hs
+          cabal exec -f-simdutf --disable-tests --disable-benchmarks ghc -- THLinkTest.hs
         shell: bash
diff --git a/tests/THLinkTest.hs b/tests/THLinkTest.hs
deleted file mode 100644
index 8b68b1f5..00000000
--- a/tests/THLinkTest.hs
+++ /dev/null
@@ -1,12 +0,0 @@
--- Simple test script for #450
--- try running a TH splice which depends on text
--- Run directly by CI
-{-# LANGUAGE TemplateHaskell #-}
-
-import Debug.Trace
-import Data.Text
-
-main :: IO ()
-main = return ()
-
-$( traceM (unpack $ pack "test") >> pure [] )