equal
deleted
inserted
replaced
36 |
36 |
37 using namespace relpipe::cli; |
37 using namespace relpipe::cli; |
38 using namespace relpipe::reader; |
38 using namespace relpipe::reader; |
39 using namespace relpipe::tr::guile; |
39 using namespace relpipe::tr::guile; |
40 |
40 |
41 int main(int argc, char**argv) { |
41 static void relpipeMain(void *closure, int argc, char **argv) { |
42 setlocale(LC_ALL, ""); |
42 setlocale(LC_ALL, ""); |
43 CLI::untieStdIO(); |
43 CLI::untieStdIO(); |
44 CLI cli(argc, argv); |
44 CLI cli(argc, argv); |
45 |
45 |
46 int resultCode = CLI::EXIT_CODE_UNEXPECTED_ERROR; |
46 int resultCode = CLI::EXIT_CODE_UNEXPECTED_ERROR; |
61 fwprintf(stderr, L"Caught Reader exception: %ls\n", e.getMessge().c_str()); |
61 fwprintf(stderr, L"Caught Reader exception: %ls\n", e.getMessge().c_str()); |
62 fwprintf(stderr, L"Debug: Input stream: eof=%ls, lastRead=%d\n", (cin.eof() ? L"true" : L"false"), cin.gcount()); |
62 fwprintf(stderr, L"Debug: Input stream: eof=%ls, lastRead=%d\n", (cin.eof() ? L"true" : L"false"), cin.gcount()); |
63 resultCode = CLI::EXIT_CODE_DATA_ERROR; |
63 resultCode = CLI::EXIT_CODE_DATA_ERROR; |
64 } |
64 } |
65 |
65 |
66 return resultCode; |
66 exit(resultCode); |
67 } |
67 } |
|
68 |
|
69 int main(int argc, char**argv) { |
|
70 scm_boot_guile(argc, argv, relpipeMain, nullptr); |
|
71 return 999; // never reached – see exit(resultCode) above |
|
72 } |