diff options
Diffstat (limited to 'source/command_line_interface.elna')
| -rw-r--r-- | source/command_line_interface.elna | 18 |
1 files changed, 8 insertions, 10 deletions
diff --git a/source/command_line_interface.elna b/source/command_line_interface.elna index 040fdeb..78e1cf5 100644 --- a/source/command_line_interface.elna +++ b/source/command_line_interface.elna @@ -5,9 +5,7 @@ (* Command line handling. *) -module; - -import cstdlib, cstring, common; +import cstdlib, cstring, common type CommandLine* = record @@ -15,14 +13,14 @@ type output: ^Char; lex: Bool; parse: Bool - end; + end -proc parse_command_line*(argc: Int, argv: ^^Char) -> ^CommandLine; +proc parse_command_line*(argc: Int, argv: ^^Char) -> ^CommandLine var - parameter: ^Char; - i: Int; - result: ^CommandLine; - parsed: Bool; + parameter: ^Char + i: Int + result: ^CommandLine + parsed: Bool begin i := 1; result := cast(malloc(#size(CommandLine)): ^CommandLine); @@ -88,6 +86,6 @@ begin end; return result -end; +end end. |
