changeset 146:fba348bb0d5c

internal mangle_61 error Regan Heath <regan@netwin.co.nz> news:opshmqmfrn5a2sq9@digitalmars.com nntp://digitalmars.com/digitalmars.D.bugs/2306
author thomask
date Thu, 18 Nov 2004 08:13:26 +0000
parents 553c8aaa0982
children 6300c81ad8c0
files run/bug_mangle_61_A.d run/bug_mangle_61_B.d
diffstat 2 files changed, 56 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/run/bug_mangle_61_A.d	Thu Nov 18 08:13:26 2004 +0000
@@ -0,0 +1,28 @@
+// $HeadURL$
+// $Date$
+// $Author$
+
+// @author@	Regan Heath <regan@netwin.co.nz>
+// @date@	2004-11-18
+// @uri@	news:opshmqmfrn5a2sq9@digitalmars.com
+// @url@	nntp://digitalmars.com/digitalmars.D.bugs/2306
+
+module dstress.run.bug_mangle_61_A;
+
+template test(T:T[],alias S) {
+	char[] foo(T[] a, T[] b) {
+		return a ~ S ~ b;
+	}
+}
+
+alias test!(char[],comma).foo catComma;
+char[] comma = ", ";
+
+int main(){
+	char[] a = "Heath";
+	char[] b = "Regan";
+	
+	assert("Heath, Regan"==catComma(a,b));
+
+	return 0;
+}
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/run/bug_mangle_61_B.d	Thu Nov 18 08:13:26 2004 +0000
@@ -0,0 +1,28 @@
+// $HeadURL$
+// $Date$
+// $Author$
+
+// @author@	Regan Heath <regan@netwin.co.nz>
+// @date@	2004-11-18
+// @uri@	news:opshmqmfrn5a2sq9@digitalmars.com
+// @url@	nntp://digitalmars.com/digitalmars.D.bugs/2306
+
+module dstress.run.bug_mangle_61_B;
+
+template test(T:T[],alias S) {
+	char[] foo(T[] a, T[] b) {
+		return a ~ S ~ b;
+	}
+}
+
+char[] comma = ", ";
+alias test!(char[],comma).foo catComma;
+
+int main(){
+	char[] a = "Heath";
+	char[] b = "Regan";
+	
+	assert("Heath, Regan"==catComma(a,b));
+
+	return 0;
+}