[Git][ghc/ghc][wip/T24634-oneshot-bytecode] avoid case-insensitivity clobber in test

Torsten Schmits (@torsten.schmits) gitlab at gitlab.haskell.org
Fri Jul 26 14:28:11 UTC 2024



Torsten Schmits pushed to branch wip/T24634-oneshot-bytecode at Glasgow Haskell Compiler / GHC


Commits:
b802ba6d by Torsten Schmits at 2024-07-26T16:24:35+02:00
avoid case-insensitivity clobber in test

- - - - -


5 changed files:

- testsuite/tests/bytecode/T24634/Hello.hs
- testsuite/tests/bytecode/T24634/Makefile
- testsuite/tests/bytecode/T24634/all.T
- testsuite/tests/bytecode/T24634/hello.c → testsuite/tests/bytecode/T24634/hello_c.c
- testsuite/tests/bytecode/T24634/hello.h → testsuite/tests/bytecode/T24634/hello_c.h


Changes:

=====================================
testsuite/tests/bytecode/T24634/Hello.hs
=====================================
@@ -7,7 +7,7 @@ module Hello where
 import Language.Haskell.TH
 import Language.Haskell.TH.Syntax
 
-foreign import capi "hello.h say_hello" say_hello :: IO Int
+foreign import capi "hello_c.h say_hello" say_hello :: IO Int
 
 mkHello :: DecsQ
 mkHello = do


=====================================
testsuite/tests/bytecode/T24634/Makefile
=====================================
@@ -3,7 +3,7 @@ include $(TOP)/mk/boilerplate.mk
 include $(TOP)/mk/test.mk
 
 T24634:
-	$(TEST_HC) -c -dynamic hello.c -o hello.o
+	$(TEST_HC) -c -dynamic hello_c.c -o hello_c.o
 	$(TEST_HC) -c -fbyte-code-and-object-code Hello.hs
-	$(TEST_HC) -fprefer-byte-code hello.o Main.hs
+	$(TEST_HC) -fprefer-byte-code hello_c.o Main.hs
 	./Main


=====================================
testsuite/tests/bytecode/T24634/all.T
=====================================
@@ -1,5 +1,5 @@
 test('T24634',
-     [extra_files(['hello.h', 'hello.c', 'Hello.hs', 'Main.hs']),
+     [extra_files(['hello_c.h', 'hello_c.c', 'Hello.hs', 'Main.hs']),
       req_c,
       req_th,
       ignore_stderr


=====================================
testsuite/tests/bytecode/T24634/hello.c → testsuite/tests/bytecode/T24634/hello_c.c
=====================================
@@ -1,4 +1,4 @@
-#include "hello.h"
+#include "hello_c.h"
 
 int say_hello() {
   return 42;


=====================================
testsuite/tests/bytecode/T24634/hello.h → testsuite/tests/bytecode/T24634/hello_c.h
=====================================



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/b802ba6dc7721958cc4a483aae0ab6bd27702702

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/b802ba6dc7721958cc4a483aae0ab6bd27702702
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20240726/ffa01775/attachment-0001.html>


More information about the ghc-commits mailing list