#                                                                    -*-perl-*-$description = "Test the eval function.";$details = "This is a test of the eval function in GNU make.This function will evaluate inline makefile syntax and incorporate theresults into its internal database.\n";open(MAKEFILE,"> $makefile");print MAKEFILE <<'EOF';define Y  all:: ; @echo $AA  A = BendefX = $(eval $(value Y))$(eval $(shell echo A = A))$(eval $(Y))$(eval A = C)$(eval $(X))EOFclose(MAKEFILE);&run_make_with_options($makefile, "", &get_logfile);# Create the answer to what should be produced by this Makefile$answer = "AA\nBA\n";&compare_output($answer,&get_logfile(1));# Test to make sure defining variables when we have extra scope pushed works# as expected.$makefile2 = &get_tmpfile;open(MAKEFILE,"> $makefile2");print MAKEFILE <<'EOF';VARS = A BVARSET = $(1) = $(2)$(foreach v,$(VARS),$(eval $(call VARSET,$v,$v)))all: ; @echo A = $(A) B = $(B)EOFclose(MAKEFILE);&run_make_with_options($makefile2, "", &get_logfile);# Create the answer to what should be produced by this Makefile$answer = "A = A B = B\n";&compare_output($answer,&get_logfile(1));1;