Changeset e9f307 for ThirdParty/mpqc_open/src/bin/mpqc/mpqc.cc

Timestamp:

Sep 13, 2025, 2:44:01 PM (6 weeks ago)

Author:

Frederik Heber <frederik.heber@…>

Branches:

Candidate_v1.7.0, stable

Children:

bd4732

Parents:

9259c3

git-author:

Frederik Heber <frederik.heber@…> (09/13/25 10:26:02)

git-committer:

Frederik Heber <frederik.heber@…> (09/13/25 14:44:01)

Message:

MPQC_OPEN: fix validation testsuite after output muting.

• our muting of the mpqc_open output broke the validation test cases as they diff against the output.
• added "vv" as command-line option for mpqc to enforce output printing.
• FIX: Since perl 5.30 matching an unescaped "{" is deprecated.

File:

• ThirdParty/mpqc_open/src/bin/mpqc/mpqc.cc (modified) (2 diffs)

ThirdParty/mpqc_open/src/bin/mpqc/mpqc.cc

@@ -234 +234 @@
   options.enroll("L", GetLongOpt::NoValue, "print the license", 0);
   options.enroll("k", GetLongOpt::NoValue, "print key/value assignments", 0);
+  options.enroll("vv", GetLongOpt::NoValue, "print the output", 0);
   options.enroll("i", GetLongOpt::NoValue, "convert simple to OO input", 0);
   options.enroll("d", GetLongOpt::NoValue, "debug", 0);
@@ -1199 +1200 @@
   // Based on verbose flag in InitValues, out ExEnv::set_out to nullstream (see out0()) to mute info
   ofstream nullofstream;
-  if (_initvalues.verbose == 0) {
+  if (( _initvalues.output == 0 ) && ( _initvalues.options.retrieve("vv") == 0 )) {
     // only change out0 when oldstream is unset, yet
     if (oldstream == NULL) {