Craig Oates
6 years ago
2 changed files with 25 additions and 5 deletions
@ -1,4 +1,27 @@ |
|||||||
namespace Commands |
namespace Commands |
||||||
module ConsoleCommands = |
module ConsoleCommands = |
||||||
let Test() = "The console is working" |
|
||||||
|
open System |
||||||
|
open Console.Waterworks |
||||||
|
open Console.Waterworks.Attributes |
||||||
|
|
||||||
|
[<ListCommand>] |
||||||
|
[<Description "Display a message to the console signifying the program is running as intended.">] |
||||||
|
[<Parameters "none">] |
||||||
|
[<Usage "> test">] |
||||||
|
let test() = "The console is working" |
||||||
|
|
||||||
|
[<ListCommand>] |
||||||
|
[<Description "Closes the program.">] |
||||||
|
[<Parameters "none">] |
||||||
|
[<Usage "> exit">] |
||||||
|
let exit() = System.Environment.Exit(Environment.ExitCode) |
||||||
|
|
||||||
|
[<ListCommand>] |
||||||
|
[<Description "Display a list of available commands, info. about the command, its parameters and an example of how to use it.">] |
||||||
|
[<Parameters "None">] |
||||||
|
[<Usage "> help">] |
||||||
|
let help() = |
||||||
|
let liaison = CW_Liaison() |
||||||
|
liaison.RequestHelpDocumentation("Commands") |
||||||
|
|
||||||
|
@ -1,10 +1,7 @@ |
|||||||
open Console.Waterworks |
open Console.Waterworks |
||||||
|
|
||||||
// Learn more about F# at http://fsharp.org |
|
||||||
// See the 'F# Tutorial' project for more help. |
|
||||||
|
|
||||||
[<EntryPoint>] |
[<EntryPoint>] |
||||||
let main argv = |
let main argv = |
||||||
let liaison = CW_Liaison() |
let liaison = CW_Liaison() |
||||||
liaison.Run("Commands", true) |
liaison.Run("Commands", true) |
||||||
0 // return an integer exit code |
0 |
||||||
|
Loading…
Reference in new issue