GitLab

d1c54ffc

by Simon Jakobi at 2026-03-11T21:08:16+01:00

Add regression test for #18177

Closes #18177.

Assisted-by: Codex

@@ -767,6 +767,14 @@ T16476b:
  	"$(TEST_HC)" $(TEST_HC_OPTS) -v0 @resp
  	./T16476b
 +# Test that GHC can handle an empty preprocessor response file.
 +# This used to cause GHC to hang indefinitely: #18177
 +.PHONY: T18177
 +T18177:
 +	touch cpp-args
 +	"$(TEST_HC)" $(TEST_HC_OPTS) -v0 -fforce-recomp -c T18177.hs -fhpc \
 +	    -optP@cpp-args -optP-DX
++
  .PHONY: T20569
  T20569:
  	"$(TEST_HC)" $(TEST_HC_OPTS) -c T20569/A.hs -i -iT20569 -hidir=interface

+module T18177 where

@@ -314,6 +314,7 @@ test('MultiRootsErr', normal, multimod_compile_fail, ['MultiRootsErr', 'MultiRoo
  test('patch-level2', normal, compile, ['-Wcpp-undef'])
  test('T16476a', normal, makefile_test, [])
  test('T16476b', normal, makefile_test, [])
 +test('T18177', req_c, makefile_test, [])
  test('T20569', extra_files(["T20569/"]), makefile_test, [])
  test('T21866', normal, multimod_compile, ['T21866','-no-link'])
  test('T21349', extra_files(['T21349']), makefile_test, [])