-
Notifications
You must be signed in to change notification settings - Fork 9
Various small bugfixes #539
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
Conversation
| Some name, _ when name.Contains "_" -> | ||
let lastUnderScoreIndex = name.LastIndexOf '_' | ||
name.Remove lastUnderScoreIndex | ||
//| Some name, _ when name.Contains "_" -> |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
maybe a comment why and a reference to the related issue?
@@ -78,7 +78,7 @@ let tests_gitContracts = testList "gitContracts" [ | |||
testCase "init_basic" <| fun _ -> | |||
let arc = ARC("MyARC") | |||
let contracts = arc.GetGitInitContracts() | |||
Expect.equal contracts.Length 2 "Should be two contracts" | |||
Expect.equal contracts.Length 1 "Should be two contracts" |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
"Should be two contracts"
must be updated
@@ -113,19 +113,31 @@ let tests_gitContracts = testList "gitContracts" [ | |||
let arc = ARC("MyARC") | |||
let remote = @"www.fantasyGit.net/MyAccount/MyRepo" | |||
let contracts = arc.GetGitInitContracts(repositoryAddress = remote) | |||
Expect.equal contracts.Length 3 "Should be three contracts" | |||
let dto = Expect.wantSome contracts.[2].DTO "Should have a DTO" | |||
Expect.equal contracts.Length 2 "Should be three contracts" |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
contracts.Length 2 "Should be three contracts"
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
this issue arises in multiple cases
@@ -534,6 +533,35 @@ let private tests_ArcTablesProcessSeq = | |||
Expect.arcTableEqual resultTables.Tables.[0] expectedTables.[0] "Table 1 should be equal" | |||
Expect.arcTableEqual resultTables.Tables.[1] expectedTables.[1] "Table 2 should be equal" | |||
) | |||
testCase "TableNameUndescore" (fun () -> |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
love that you added issue references to the other tests, here you missed it!
Thanks for your nitpicks, @Freymaurer. I made the changes accordingly and will merge now! |
Various small bugfixes
closes #512
closes #515
closes #534
closes #538