Misnamed a setting
This commit is contained in:
@@ -20,7 +20,7 @@ fsharp_space_before_colon=true
|
||||
fsharp_space_before_semicolon=true
|
||||
fsharp_multiline_block_brackets_on_same_column=true
|
||||
fsharp_newline_between_type_definition_and_members=true
|
||||
fsharp_align_function_signature_to_definition=true
|
||||
fsharp_align_function_signature_to_indentation=true
|
||||
fsharp_alternative_long_member_definitions=true
|
||||
fsharp_multi_line_lambda_closing_newline=true
|
||||
fsharp_experimental_keep_indent_in_branch=true
|
||||
|
@@ -389,7 +389,8 @@ module TestInMemoryServer =
|
||||
let duplicationProperty<'a when 'a : equality>
|
||||
(clusterSize : int)
|
||||
(beforeDuplication : ValidHistory<'a>, afterDuplication : ValidHistory<'a>)
|
||||
: bool =
|
||||
: bool
|
||||
=
|
||||
let withoutDuplicate =
|
||||
let cluster, network = InMemoryCluster.make<'a> clusterSize
|
||||
replay beforeDuplication cluster network
|
||||
@@ -421,7 +422,8 @@ module TestInMemoryServer =
|
||||
let allDuplicatedHistories<'a>
|
||||
(clusterSize : int)
|
||||
(ValidHistory historyList : ValidHistory<'a> as history)
|
||||
: _ list =
|
||||
: _ list
|
||||
=
|
||||
let duplicateCandidates = possibleDuplicates historyList
|
||||
|
||||
duplicateCandidates
|
||||
|
@@ -7,7 +7,8 @@ module Table =
|
||||
(document : Browser.Types.Document)
|
||||
(headings : string list)
|
||||
(table : Browser.Types.HTMLTableElement)
|
||||
: unit =
|
||||
: unit
|
||||
=
|
||||
let row = document.createElement "tr" :?> Browser.Types.HTMLTableRowElement
|
||||
|
||||
for heading in headings do
|
||||
@@ -22,7 +23,8 @@ module Table =
|
||||
(document : Browser.Types.Document)
|
||||
(elements : seq<#Browser.Types.Node option>)
|
||||
(table : Browser.Types.HTMLTableElement)
|
||||
: Browser.Types.HTMLTableRowElement =
|
||||
: Browser.Types.HTMLTableRowElement
|
||||
=
|
||||
let row = document.createElement "tr" :?> Browser.Types.HTMLTableRowElement
|
||||
|
||||
for col in elements do
|
||||
|
@@ -151,7 +151,8 @@ module Ui =
|
||||
(document : Browser.Types.Document)
|
||||
(ui : UiElements)
|
||||
(state : UiBackingState<'a>)
|
||||
: unit =
|
||||
: unit
|
||||
=
|
||||
let userPrefs = state.UserPreferences
|
||||
let state = state.ClusterState
|
||||
|
||||
|
Reference in New Issue
Block a user