Browse Source

Added () to function n Pancake.

The output now changes with each call to it.
Just ned to figure out the repeating of the sentence in the output.
master
Craig Oates 6 years ago
parent
commit
d125fb4064
  1. 2
      WetPancake/ProductServices.fs
  2. 2
      WetPancake/SystemServices.fs
  3. 2
      WetPancakeCLI/ConsoleCommands.cs

2
WetPancake/ProductServices.fs

@ -23,7 +23,7 @@ module Pancake =
|> ConcatToString
// MOVE THIS INTO AN OBJECT (OF SORTS)
let RequestRandomText =
let RequestRandomText() =
let data =
LoadFile SelectRandomSampleFile
|> ReplaceArtifact "\""

2
WetPancake/SystemServices.fs

@ -5,5 +5,5 @@
let PickRandomNumber max = Random().Next(0, max);
let PickRandomItem (rnd: int -> int) seq =
let index = rnd (Seq.length seq)
let index = rnd ((Seq.length seq) - 1)
seq |> Seq.item index

2
WetPancakeCLI/ConsoleCommands.cs

@ -40,7 +40,7 @@ namespace WetPancakeCLI
public static string test1()
{
var result = RequestRandomText;
var result = RequestRandomText();
return result;
}
}

Loading…
Cancel
Save