From b908c3ed57d80ba4d33386a13c6d90dcda335f87 Mon Sep 17 00:00:00 2001 From: "HOT-ROD\\craig" Date: Tue, 29 May 2018 21:44:37 +0100 Subject: [PATCH] Added the help section. --- BrittleFish/ConsoleCommands.fs | 25 ++++++++++++++++++++++++- BrittleFish/Program.fs | 5 +---- 2 files changed, 25 insertions(+), 5 deletions(-) diff --git a/BrittleFish/ConsoleCommands.fs b/BrittleFish/ConsoleCommands.fs index 47474a7..efcd816 100644 --- a/BrittleFish/ConsoleCommands.fs +++ b/BrittleFish/ConsoleCommands.fs @@ -1,4 +1,27 @@ namespace Commands module ConsoleCommands = - let Test() = "The console is working" + + open System + open Console.Waterworks + open Console.Waterworks.Attributes + + [] + [] + [] + [ test">] + let test() = "The console is working" + + [] + [] + [] + [ exit">] + let exit() = System.Environment.Exit(Environment.ExitCode) + + [] + [] + [] + [ help">] + let help() = + let liaison = CW_Liaison() + liaison.RequestHelpDocumentation("Commands") diff --git a/BrittleFish/Program.fs b/BrittleFish/Program.fs index b195d56..af44061 100644 --- a/BrittleFish/Program.fs +++ b/BrittleFish/Program.fs @@ -1,10 +1,7 @@ open Console.Waterworks -// Learn more about F# at http://fsharp.org -// See the 'F# Tutorial' project for more help. - [] let main argv = let liaison = CW_Liaison() liaison.Run("Commands", true) - 0 // return an integer exit code + 0