From 401414480ad32dd226cd923b56abe9d1dcf5fd70 Mon Sep 17 00:00:00 2001 From: Sylwester Arabas Date: Mon, 11 Mar 2024 23:35:58 +0100 Subject: [PATCH] strip first char of version string for !GDL.RELEASE if it is "v" --- src/initsysvar.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/initsysvar.cpp b/src/initsysvar.cpp index 095c1fa20..3a40f5ebe 100644 --- a/src/initsysvar.cpp +++ b/src/initsysvar.cpp @@ -656,7 +656,7 @@ namespace SysVar // !GDL (to allow distinguish IDL/GDL with DEFSYSV, '!gdl', exists=exists ) DStructGDL* gdlStruct = new DStructGDL( "!GNUDATALANGUAGE"); - gdlStruct->NewTag("RELEASE", new DStringGDL( VERSION)); + gdlStruct->NewTag("RELEASE", new DStringGDL( VERSION + (VERSION[0] == 'v' ? 1 : 0))); // creating an explicit build date in !GDL (also exist in !version) gdlStruct->NewTag("BUILD_DATE", new DStringGDL(BUILD_DATE));