![]() ![]() | ![]() |
File: [local] / OpenXM_contrib / PHC / Ada / System / unix_command_line.ads (download)
Revision 1.1.1.1 (vendor branch), Sun Oct 29 17:45:34 2000 UTC (23 years, 10 months ago) by maekawa
Import the second public release of PHCpack. OKed by Jan Verschelde. |
package Unix_Command_Line is -- DESCRIPTION : -- This package allows to access the arguments from the command line. function Number_of_Arguments return natural; -- DESCRIPTION : -- Returns the number of arguments of the command that started -- the current process. -- So, if the command has no arguments, then zero is returned. function Argument ( i : natural ) return string; -- DESCRIPTION : -- Returns the ith argument of the command line. end Unix_Command_Line;