Why doesn't "-m" option take effect?
Posted: Wed Jun 27, 2018 7:01 am
Hi all,
Greeting from me!
I try arg-test program in http://www.newlisp.org/downloads/CodePa ... html#toc-2:
Using current stable 10.7.1, the result of running arg-test is like this:
The "Maximum number of Lisp cells constant" of sys-info is 576460752303423488 , but from the source code:
It seems MAX_CELL_COUNT is not changed and "-m" option doesn't take effect.
Best Regards
Nan Xiao
Greeting from me!
I try arg-test program in http://www.newlisp.org/downloads/CodePa ... html#toc-2:
Code: Select all
#!/usr/bin/newlisp -s 100000 -m 10
(println (main-args))
(println (sys-info))
(exit) ; important
Code: Select all
$ ./arg-test.lsp
("/usr/bin/newlisp" "-s 100000 -m 10" "./arg-test.lsp")
(491 576460752303423488 410 2 0 100000 0 102774 10701 385)
Code: Select all
......
if(strncmp(argv[idx], "-m", 2) == 0)
{
#ifndef NEWLISP64
MAX_CELL_COUNT = abs(0x0010000 * atoi(getArg(argv, argc, &idx)));
#else
MAX_CELL_COUNT = abs(0x0008000 * atoi(getArg(argv, argc, &idx)));
#endif
continue;
}
......
Best Regards
Nan Xiao