From 29cd838eab01ed7110f3ccb2e8c6a35c8a31dbcc Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Thu, 11 Apr 2024 10:21:29 +0200 Subject: Adding upstream version 1:0.1.9998svn3589+dfsg. Signed-off-by: Daniel Baumann --- src/kmk/testcase-xargs.kmk | 59 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 59 insertions(+) create mode 100644 src/kmk/testcase-xargs.kmk (limited to 'src/kmk/testcase-xargs.kmk') diff --git a/src/kmk/testcase-xargs.kmk b/src/kmk/testcase-xargs.kmk new file mode 100644 index 0000000..ee6b5a8 --- /dev/null +++ b/src/kmk/testcase-xargs.kmk @@ -0,0 +1,59 @@ +# $Id: testcase-xargs.kmk 2413 2010-09-11 17:43:04Z bird $ +## @file +# kBuild - testcase for the xargs function. +# Requires manual inspection of the output. +# + +# +# Copyright (c) 2007-2010 knut st. osmundsen +# +# This file is part of kBuild. +# +# kBuild is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# kBuild is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with kBuild. If not, see +# +# + +DEPTH = ../.. +include $(PATH_KBUILD)/header.kmk + +ifneq ($(not 1),) + $(error The 'not' function is missing) +endif +ifneq ($(eq 1,1),1) + $(error The 'eq' function is missing) +endif + + +ASSERT_TRUE = $(if $(not $(1)),$(error failure: '$(1)' isn't true)) +ASSERT_FALSE = $(if $(1) ,$(error failure: '$(1)' isn't false)) + +# 94 bytes +ONEARG = abcdefghijklmnopqrstuvwxyz_abcdefghijklmnopqrstuvwxyz_abcdefghijklmnopqrstuvwxyz_xxxxxxxxxxxx +ITERATIONS := 0 1 2 3 4 5 6 7 8 9 +ITERATIONS := $(foreach i, 0 1 2 3 4 5 6 7 8 9,$(addprefix $(i),$(ITERATIONS))) +ITERATIONS := $(foreach i, 0 1 2 3 4 5 6 7 8 9,$(addprefix $(i),$(ITERATIONS))) +ITERATIONS := $(foreach i, 0 1 2 3 4 5 6 7 8 9,$(addprefix $(i),$(ITERATIONS))) +ITERATIONS := $(foreach i, 0 1 2 3 4 5 6 7 8 9,$(addprefix $(i),$(ITERATIONS))) + +# add a 5 bytes sequence number and a space, then duplicate it 10000 times: +# 100 bytes * 10000 = 1,000,000 bytes. +REALLY_LONG := $(foreach i,$(ITERATIONS),$(i)$(ONEARG)) + + +#$(call ASSERT_TRUE, $(xargs $(ECHO) 1:, $(ECHO) 2:, $(ECHO) 3:, asdf asdf asdf asdf asdf asdf asdf adf asdf asdf)) + +all_recursive: + $(xargs @$(ECHO_EXT) 1:, @$(ECHO_EXT) 2:, @$(ECHO_EXT) 3:, $(REALLY_LONG)) + $(ECHO) done + -- cgit v1.2.3