nlc_test.cpp

Go to the documentation of this file.

#ifdef BUILD_UNITTEST
 
#include "warning_push.h"
#include <gtest/gtest.h>
#include "warning_pop.h"
 
 
 
#include "../nlc.h"
#include "builtin.h"
 
using namespace newlang;
 
//TEST(NLC, Options) {
//
//    NLC nlc0;
//    ASSERT_TRUE(nlc0.m_path.empty());
//    ASSERT_EQ(NLC::Mode::ModeError, nlc0.m_mode);
//
//    NLC nlc1("");
//    ASSERT_TRUE(nlc1.m_path.empty());
//    ASSERT_EQ(NLC::Mode::ModeError, nlc1.m_mode);
//
//    NLC nlc2("path");
//    ASSERT_STREQ("path", nlc2.m_path.c_str());
//    ASSERT_EQ(NLC::Mode::ModeInter, nlc2.m_mode) << nlc2.m_output;
//
//    NLC nlc3("   path   --help    ");
//    ASSERT_STREQ("path", nlc3.m_path.c_str());
//    ASSERT_EQ(NLC::Mode::ModeHelp, nlc3.m_mode);
//    ASSERT_FALSE(nlc3.m_output.empty()) << nlc3.m_output;
//
//    NLC nlc4("path   -v");
//    ASSERT_STREQ("path", nlc4.m_path.c_str());
//    ASSERT_EQ(NLC::Mode::ModeVersion, nlc4.m_mode);
//
//    //    NLC nlc5("path  --output=output_file -cinput_file");
//    //    ASSERT_STREQ("path", nlc5.m_path.c_str());
//    //    ASSERT_EQ(NLC::COMPILE, nlc5.m_mode) << nlc5.m_output;
//    //    ASSERT_STREQ("output_file", nlc5.m_ofile.c_str());
//    //    ASSERT_STREQ("input_file", nlc5.m_ifile.c_str());
//
//    //    NLC nlc6("path  --badarg --output=output_file");
//    //    ASSERT_EQ(NLC::ERROR, nlc6.m_mode);
//
//    //    NLC nlc7("path func(bad!,,args)");
//    //    ASSERT_EQ(NLC::ERROR, nlc7.m_mode) << nlc7.m_output;
//
//    //    NLC nlc8("path  -lmodule.nlm --exec=file_name");
//    //    ASSERT_STREQ("path", nlc8.m_path.c_str());
//    //    ASSERT_EQ(NLC::EXEC, nlc8.m_mode);
//    //    ASSERT_STREQ("file_name", nlc8.m_ifile.c_str());
//    //    ASSERT_EQ(1, nlc8.m_modules.size());
//    //    ASSERT_STREQ("module.nlm", nlc8.m_modules[0].c_str());
//
//    NLC nlc9("path  --load=module2.nlm  call(arg1,100)");
//    ASSERT_STREQ("path", nlc9.m_path.c_str());
//    ASSERT_EQ(NLC::Mode::ModeEval, nlc9.m_mode);
//    ASSERT_EQ(1, nlc9.m_modules.size());
//    ASSERT_STREQ("module2.nlm", nlc9.m_modules[0].c_str());
//    ASSERT_STREQ("call(arg1,100)", nlc9.m_eval.c_str());
//
//    NLC nlc10("path  --load=module2.nlm,module3.nlm 100+200");
//    ASSERT_STREQ("path", nlc10.m_path.c_str());
//    ASSERT_EQ(NLC::Mode::ModeEval, nlc10.m_mode);
//    ASSERT_EQ(2, nlc10.m_modules.size());
//    ASSERT_STREQ("module2.nlm", nlc10.m_modules[0].c_str());
//    ASSERT_STREQ("module3.nlm", nlc10.m_modules[1].c_str());
//    ASSERT_STREQ("100+200", nlc10.m_eval.c_str());
//
//    NLC nlc11("path  --load=module2.nlm,,   --load-only=,tt1,tt2,tt3  \"100+200\"");
//    ASSERT_STREQ("path", nlc11.m_path.c_str());
//    ASSERT_EQ(NLC::Mode::ModeEval, nlc11.m_mode) << nlc11.m_output;
//    ASSERT_EQ(1, nlc11.m_modules.size());
//    ASSERT_STREQ("module2.nlm", nlc11.m_modules[0].c_str());
//    ASSERT_STREQ("\"100+200\"", nlc11.m_eval.c_str());
//
//    ASSERT_EQ(3, nlc11.m_load_only.size());
//    ASSERT_STREQ("tt1", nlc11.m_load_only[0].c_str());
//    ASSERT_STREQ("tt2", nlc11.m_load_only[1].c_str());
//    ASSERT_STREQ("tt3", nlc11.m_load_only[2].c_str());
//
//    //    NLC nlc_empty("path");
//    //    ASSERT_STREQ("path", nlc_empty.m_path.c_str());
//    //    ASSERT_EQ(NLC::HELP, nlc_empty.m_mode);
//    //    ASSERT_FALSE(nlc_empty.m_output.empty()) << nlc_empty.m_output;
//}
//
//TEST(NLC, FileFunc) {
//
//    ASSERT_STREQ("", GetFileExt("").c_str());
//    ASSERT_STREQ(".", GetFileExt(".").c_str());
//    ASSERT_STREQ(".", GetFileExt(".").c_str());
//    ASSERT_STREQ(".", GetFileExt("name.").c_str());
//    ASSERT_STREQ(".ext", GetFileExt("name.ext").c_str());
//    ASSERT_STREQ(".ext", GetFileExt(".ext").c_str());
//
//    ASSERT_STREQ("", AddDefaultFileExt("", ".nlm").c_str());
//    ASSERT_STREQ(".", AddDefaultFileExt(".", ".nlm").c_str());
//    ASSERT_STREQ("name.nlm", AddDefaultFileExt("name", ".nlm").c_str());
//    ASSERT_STREQ("name.nlm", AddDefaultFileExt("name.nlm", ".nlm").c_str());
//    ASSERT_STREQ("name.test", AddDefaultFileExt("name.test", ".nlm").c_str());
//    ASSERT_STREQ("name.", AddDefaultFileExt("name.", ".nlm").c_str());
//
//    ASSERT_STREQ("", ReplaceFileExt("", ".src", ".nlm").c_str());
//    ASSERT_STREQ(".", ReplaceFileExt(".", ".src", ".nlm").c_str());
//    ASSERT_STREQ("name.nlm", ReplaceFileExt("name", ".src", ".nlm").c_str());
//    ASSERT_STREQ("name.nlm", ReplaceFileExt("name.src", ".src", ".nlm").c_str());
//    ASSERT_STREQ("name.test.nlm", ReplaceFileExt("name.test", ".src", ".nlm").c_str());
//    ASSERT_STREQ("name.", ReplaceFileExt("name.", ".src", ".nlm").c_str());
//}
//
//TEST(NLC, Eval) {
//    NLC nlc6("path  --badarg --output=output_file");
//    ASSERT_EQ(NLC::Mode::ModeEval, nlc6.m_mode);
//    ASSERT_EQ(1, nlc6.Run());
//
//    NLC nlc7("path func(bad!,,args)");
//    ASSERT_EQ(NLC::Mode::ModeEval, nlc7.m_mode) << nlc7.m_output;
//    ASSERT_EQ(1, nlc7.Run());
//}
//
// * #!./dist/Debug/GNU-Linux/nlc --exec
// * print(str="") $= { %{ printf("%s", static_cast<char *>($str)); return $str; %} };
// * @print("Привет, мир!\n");
// */
//TEST(NLC, EvalHelloWorld) {
//
//    std::string cmd;
//    cmd += "#!./dist/Debug/GNU-Linux/nlc --eval\n";
//    cmd += "hello(str='') := { printf := :Pointer('printf(format:FmtChar, ...):Int32'); printf('%s', $str); $str;};\n";
//    cmd += "hello('Привет, мир!\\n');";
//
//    std::filesystem::create_directories("temp");
//    ASSERT_TRUE(std::filesystem::is_directory("temp"));
//
//
//    std::ofstream out("temp/hello.temp.sh");
//    out << cmd;
//    out.close();
//
//    NLC run;
//    ObjPtr result = run.m_ctx.ExecStr(cmd, nullptr, Context::CatchType::CATCH_ALL);
//    ASSERT_TRUE(result);
//    ASSERT_STREQ("Привет, мир!\n", result->GetValueAsString().c_str());
//}
//
 
#endif // UNITTEST