Commit cccb390e authored by ian@well-typed.com's avatar ian@well-typed.com
Browse files

Rename some numeric tests: nnnn -> Tnnnn

parent fc4e1946
local1750.package.conf:
{1750A-1}
{1750B-1}
name: 1750A
version: 1
id: 1750A-1-XXX
depends: 1750B-1-XXX
name: 1750B
version: 1
id: 1750B-1-XXX
depends: 1750A-1-XXX
......@@ -110,20 +110,20 @@ ghcpkg06 :
if $(LOCAL_GHC_PKG06) register testdup.pkg; then false else true; fi
$(LOCAL_GHC_PKG06) register --force testdup.pkg
PKGCONF1750=local1750.package.conf
LOCAL_GHC_PKG1750 = '$(GHC_PKG)' --no-user-package-db -f $(PKGCONF1750)
1750:
rm -rf $(PKGCONF1750) 1750.hs 1750.o 1750.hi 1750.out
$(LOCAL_GHC_PKG1750) init $(PKGCONF1750)
$(LOCAL_GHC_PKG1750) register --force 1750A.pkg >1750.out 2>&1
$(LOCAL_GHC_PKG1750) register --force 1750B.pkg >1750.out 2>&1
GHC_PACKAGE_PATH=$(PKGCONF1750) '$(GHC_PKG)' --no-user-package-db list
PKGCONFT1750=localT1750.package.conf
LOCAL_GHC_PKGT1750 = '$(GHC_PKG)' --no-user-package-db -f $(PKGCONFT1750)
T1750:
rm -rf $(PKGCONFT1750) T1750.hs T1750.o T1750.hi T1750.out
$(LOCAL_GHC_PKGT1750) init $(PKGCONFT1750)
$(LOCAL_GHC_PKGT1750) register --force T1750A.pkg >T1750.out 2>&1
$(LOCAL_GHC_PKGT1750) register --force T1750B.pkg >T1750.out 2>&1
GHC_PACKAGE_PATH=$(PKGCONFT1750) '$(GHC_PKG)' --no-user-package-db list
# GHC_PACKAGE_PATH trick is to make this work with 6.8.2 which doesn't have
# the patch "Change the command-line semantics for query commands" to
# ghc-pkg
echo "main = return ()" >1750.hs
'$(TEST_HC)' $(TEST_HC_OPTS) -package-db $(PKGCONF1750) -package 1750A 1750.hs || true
echo "main = return ()" >T1750.hs
'$(TEST_HC)' $(TEST_HC_OPTS) -package-db $(PKGCONFT1750) -package T1750A T1750.hs || true
PKGCONFSHADOW1=localshadow1.package.conf
PKGCONFSHADOW2=localshadow2.package.conf
......
WARNING: there are broken packages. Run 'ghc-pkg check' for more details.
<command line>: cannot satisfy -package 1750A:
1750A-1-XXX is unusable due to missing or recursive dependencies:
1750B-1-XXX
<command line>: cannot satisfy -package T1750A:
T1750A-1-XXX is unusable due to missing or recursive dependencies:
T1750B-1-XXX
(use -v for more information)
localT1750.package.conf:
{T1750A-1}
{T1750B-1}
name: T1750A
version: 1
id: T1750A-1-XXX
depends: T1750B-1-XXX
name: T1750B
version: 1
id: T1750B-1-XXX
depends: T1750A-1-XXX
......@@ -51,11 +51,11 @@ test('ghcpkg06',
# (this was disallowed in GHC 6.4 and earlier)
test('pkg01', normal, compile, [''])
test('1750',
extra_clean(['1750.hs', '1750.out',
'local1750.package.conf',
'local1750.package.conf.old']),
run_command, ['$MAKE -s --no-print-directory 1750'])
test('T1750',
extra_clean(['T1750.hs', 'T1750.out',
'localT1750.package.conf',
'localT1750.package.conf.old']),
run_command, ['$MAKE -s --no-print-directory T1750'])
test('shadow',
extra_clean(['shadow.out', 'shadow.hs', 'shadow.hi',
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment