From bfa452a375ea0a0a3f95304a69186936567e5263 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=B6rg=20Frings-F=C3=BCrst?= Date: Mon, 14 Aug 2023 19:45:36 +0200 Subject: New upstream version 4.1.4 --- src/tests/xb_test_expnode.cpp | 123 ------------------------------------------ 1 file changed, 123 deletions(-) delete mode 100755 src/tests/xb_test_expnode.cpp (limited to 'src/tests/xb_test_expnode.cpp') diff --git a/src/tests/xb_test_expnode.cpp b/src/tests/xb_test_expnode.cpp deleted file mode 100755 index cbd79c9..0000000 --- a/src/tests/xb_test_expnode.cpp +++ /dev/null @@ -1,123 +0,0 @@ -/* xb_test_expnode.cpp - -XBase Software Library - -Copyright (c) 1997,2003,2014,2017,2022,2023 Gary A Kunkel - -The xb64 software library is covered under the terms of the GPL Version 3, 2007 license. - -Email Contact: - - XDB-devel@lists.sourceforge.net - XDB-users@lists.sourceforge.net - -*/ - -// This program tests the xb expression node functions -// usage: xb_test_expnode QUITE|NORMAL|VERBOSE - -#include "xbase.h" -using namespace xb; - -#include "tstfuncs.cpp" - - -/**************************************************************************/ - -int main( int argCnt, char **av ) -{ - xbInt16 iRc = 0; - xbInt16 po = 1; /* print option */ - /* 0 - QUIET */ - /* 1 - NORMAL */ - /* 2 - VERBOSE */ - - if( argCnt > 1 ) { - if( av[1][0] == 'Q' ) - po = 0; - else if( av[1][0] == 'V' ) - po = 2; - } - - xbXBase x; - - #ifdef XB_LOGGING_SUPPORT - x.SetLogDirectory( PROJECT_LOG_DIR ); - x.EnableMsgLogging(); - if( po ){ - std::cout << "Logfile is [" << x.GetLogFqFileName().Str() << "]" << std::endl; - } - xbString sMsg; - sMsg.Sprintf( "Program [%s] initializing...", av[0] ); - x.WriteLogMessage( sMsg ); - #endif - - x.SetDataDirectory( PROJECT_DATA_DIR ); - InitTime(); - - if( po > 0 ){ - std::cout << "XBase Expression Node testing program.." << std::endl; - std::cout << "This program tests the XBase expression node logic." << std::endl; - } - - xbString s1 = "TestNode1"; - xbExpNode *n1 = new xbExpNode(); - n1->SetNodeText( s1 ); - n1->SetNodeType( XB_EXP_OPERATOR ); - n1->SetReturnType( XB_EXP_LOGICAL ); - - iRc += TestMethod( po, "GetNodeType()", n1->GetNodeType(), 'O' ); - iRc += TestMethod( po, "GetReturnType()", n1->GetReturnType(), 'L' ); - - xbString s2 = "TestNode2"; - xbExpNode *n2 = new xbExpNode( s2, XB_EXP_FUNCTION, XB_EXP_CHAR ); - - xbString s3 = "TestNode3"; - xbExpNode *n3 = new xbExpNode( s3, XB_EXP_CONSTANT, XB_EXP_NUMERIC ); - - xbString s4 = "TestNode4"; - xbExpNode *n4 = new xbExpNode( s4, XB_EXP_OPERATOR, XB_EXP_DATE ); - - xbString s5 = "TestNode5"; - xbExpNode *n5 = new xbExpNode( s5, XB_EXP_FIELD, XB_EXP_LOGICAL ); - - n1->AddChild( n2 ); - n1->AddChild( n3 ); - n1->AddChild( n4 ); - n1->AddChild( n5 ); - - iRc += TestMethod( po, "GetChildCnt()", (xbInt32) n1->GetChildCnt(), 4 ); - - n1->SetResult( s1 ); - iRc += TestMethod( po, "SetResult() / GetStringResult()", s1, n1->GetStringResult(), 9 ); - - xbBool bVal = xbTrue; - n1->SetResult( bVal ); - iRc += TestMethod( po, "SetResult() / GetBoolResult()", xbTrue, n1->GetBoolResult() ); - - xbDouble d = 123456.789; - n1->SetResult( d ); - iRc += TestMethod( po, "SetResult() / GetNumericResult()", d, n1->GetNumericResult() ); - - #ifdef XB_DEBUG_SUPPORT - if( po > 0 ){ - n1->DumpNode( xbTrue ); - n1->GetChild( 0 )->DumpNode( xbTrue ); - n1->GetChild( 1 )->DumpNode( xbTrue ); - n1->GetChild( 2 )->DumpNode( xbTrue ); - n1->GetChild( 3 )->DumpNode( xbTrue ); - } - #endif - - delete n1; - - if( po > 0 || iRc < 0 ) - fprintf( stdout, "Total Errors = %d\n", iRc * -1 ); - - #ifdef XB_LOGGING_SUPPORT - sMsg.Sprintf( "Program [%s] terminating with [%d] errors...", av[0], iRc * -1 ); - x.WriteLogMessage( sMsg ); - #endif - - return iRc; -} -- cgit v1.2.3