From b34c48d95bf94f787fe693e28126e37a4bb485c1 Mon Sep 17 00:00:00 2001 From: Konstantin Ritt Date: Mon, 26 Nov 2012 07:39:34 +0200 Subject: qmake: Test recursive function calls Change-Id: If7d659728d30b2e5c52082ab999bc00de3733972 Reviewed-by: Oswald Buddenhagen --- tests/auto/tools/qmake/testdata/functions/functions.pro | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/tests/auto/tools/qmake/testdata/functions/functions.pro b/tests/auto/tools/qmake/testdata/functions/functions.pro index 32a9b6a137..bf1344eb68 100644 --- a/tests/auto/tools/qmake/testdata/functions/functions.pro +++ b/tests/auto/tools/qmake/testdata/functions/functions.pro @@ -88,6 +88,20 @@ myTestFunction("oink baa moo") message("FAILED: myTestFunction: $$RESULT") } +#recursive +defineReplace(myRecursiveReplaceFunction) { + RESULT = + list = $$1 + RESULT += $$member(list, 0) + list -= $$RESULT + !isEmpty(list):RESULT += $$myRecursiveReplaceFunction($$list) + return($$RESULT) +} +RESULT = $$myRecursiveReplaceFunction(oink baa moo) +!isEqual(RESULT, "oink baa moo") { + message( "FAILED: myRecursiveReplaceFunction [$$RESULT] != oink baa moo" ) +} + moo = "this is a test" "for real" fn = $$OUT_PWD/testdir/afile write_file($$fn, moo)|message("FAILED: write_file() failed") -- cgit v1.2.3