From: Robert Dubner <rdubner@symas.com>
Date: Tue, 1 Jul 2025 15:07:18 +0000 (-0400)
Subject: cobol: Update test case for intrinsic function syntax.
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=63f44b398f5938503cbd1e168bcc723697c9e9ad;p=thirdparty%2Fgcc.git

cobol: Update test case for intrinsic function syntax.

gcc/testsuite/ChangeLog:

	* cobol.dg/group2/Intrinsics_without_FUNCTION_keyword__2_.cob:
	Append INTRINSIC keyword.
---

diff --git a/gcc/testsuite/cobol.dg/group2/Intrinsics_without_FUNCTION_keyword__2_.cob b/gcc/testsuite/cobol.dg/group2/Intrinsics_without_FUNCTION_keyword__2_.cob
index b94adf58026..39a0c5b33da 100644
--- a/gcc/testsuite/cobol.dg/group2/Intrinsics_without_FUNCTION_keyword__2_.cob
+++ b/gcc/testsuite/cobol.dg/group2/Intrinsics_without_FUNCTION_keyword__2_.cob
@@ -5,8 +5,8 @@
        ENVIRONMENT      DIVISION.
        CONFIGURATION    SECTION.
        REPOSITORY.
-           FUNCTION     PI
-           FUNCTION     E.
+           FUNCTION     PI INTRINSIC
+           FUNCTION     E  INTRINSIC.
        DATA             DIVISION.
        WORKING-STORAGE  SECTION.
        01  Z            PIC 99V99.