Line data    Source code

       1              : // This file (ex_traceln.cc) was created by Ron Rechenmacher <ron@fnal.gov> on
       2              : // Jun  7, 2019. "TERMS AND CONDITIONS" governing this file are in the README
       3              : // or COPYING file. If you do not have such a file, one can be obtained by
       4              : // contacting Ron or Fermi Lab in Batavia IL, 60510, phone: 630-840-3000.
       5              : // $RCSfile: .emacs.gnu,v $
       6              : // rev="$Revision: 1784 $$Date: 2026-10-09 13:51:46 -0500 (Fri, 09 Oct 2026) $";
       7              : 
       8              : #include "ex_traceln.h"
       9              : #include "TRACE/traceln.h"
      10              : //#define TRACE_NAME &std::string(__FILE__).substr(std::string(__FILE__).rfind('/')+1)[0]
      11              : //#define __FIL__ "/x/srcs/this/that/then"
      12              : #define __FIL__ "ex_traceln.cc"
      13              : //#define TRACE_NAME (strstr(&__FIL__[0], "/srcs/") ? strstr(&__FIL__[0], "/srcs/") + 6 : __FIL__)
      14              : //#define TRACE_NAME &std::string(__FIL__).substr(std::string(__FIL__).rfind('/',std::string(__FIL__).rfind('/')-1)+1)[0]
      15              : 
      16              : #include <stdio.h>  // printf
      17              : 
      18              : #define Q(X)     #X
      19              : #define QUOTE(X) Q(X)
      20              : #define VAL(X)   QUOTE(X) << " = " << X
      21              : 
      22            0 : int main()
      23              : {
      24            0 :         int delayBetweenDataRequests= 1000;  // some example variable
      25              : #define FFF "/x/srcs/this/that/then"
      26            0 :         TLOG(1) << "start " << std::string(FFF).substr(std::string(FFF).rfind('/') + 1);
      27            0 :         TLOG(1) << "start " << std::string(FFF).substr(std::string(FFF).rfind('/', std::string(FFF).rfind('/') - 1) + 1);
      28            0 :         ExTraceLn().trc();
      29            0 :         TLOG(1) << VAL(delayBetweenDataRequests);
      30            0 :         return (0);
      31              : }  // main