Commit 40f12023 authored by Maxime Perrotin's avatar Maxime Perrotin
Browse files

Set timer resolution initial value to 100 ms

parent 56aed8f1
......@@ -66,7 +66,8 @@ package body Parser_Utils is
Switch => "-p", Long_Switch => "--polyorb-hi-c",
Help => "Use PolyORB-HI-C runtime in place of Ada");
Define_Switch (Config, Output => Result.Timer_Resolution'Access,
Switch => "-x:", Long_Switch => "--timer=",
Switch => "-x:", Long_Switch => "--timer=",
Initial => 100,
Help => "Specify timer resolution (default 100 ms)");
Define_Switch (Config, Output => Result.Debug_Flag'Access,
Switch => "-g", Long_Switch => "--debug",
......
package Parser_Version is
Parser_Release : constant String :=
"5b38c95 ; Commit Date: Thu Dec 21 10:41:52 2017 ";
"56aed8f ; Commit Date: Thu Dec 21 10:41:52 2017 ";
Ocarina_Version : constant String :=
"Ocarina 2017.x (Working Copy from r0b92ed3)";
end Parser_Version;
\ No newline at end of file
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment