Skip to content

Commit 039eb3b

Browse files
authored
Dispose the streams we create in HTTP generated code (#539)
Co-authored-by: Claude Opus 4.8
1 parent d8fe40c commit 039eb3b

7 files changed

Lines changed: 905 additions & 516 deletions

File tree

ConsumePlugin/Generated2SwaggerGitea.fs

Lines changed: 620 additions & 310 deletions
Large diffs are not rendered by default.

ConsumePlugin/GeneratedRestClient.fs

Lines changed: 75 additions & 45 deletions
Large diffs are not rendered by default.

ConsumePlugin/GeneratedVault.fs

Lines changed: 12 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -537,14 +537,15 @@ module VaultClient =
537537
)
538538
)
539539

540-
let httpMessage =
540+
use httpMessage =
541541
new System.Net.Http.HttpRequestMessage (
542542
Method = System.Net.Http.HttpMethod.Get,
543543
RequestUri = uri
544544
)
545545

546546
let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
547547
let response = response.EnsureSuccessStatusCode ()
548+
use response = response
548549
let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
549550

550551
let! jsonNode =
@@ -582,14 +583,15 @@ module VaultClient =
582583
System.Uri ("v1/auth/jwt/login", System.UriKind.Relative)
583584
)
584585

585-
let httpMessage =
586+
use httpMessage =
586587
new System.Net.Http.HttpRequestMessage (
587588
Method = System.Net.Http.HttpMethod.Get,
588589
RequestUri = uri
589590
)
590591

591592
let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
592593
let response = response.EnsureSuccessStatusCode ()
594+
use response = response
593595
let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
594596

595597
let! jsonNode =
@@ -649,14 +651,15 @@ module VaultClientNonExtensionMethod =
649651
)
650652
)
651653

652-
let httpMessage =
654+
use httpMessage =
653655
new System.Net.Http.HttpRequestMessage (
654656
Method = System.Net.Http.HttpMethod.Get,
655657
RequestUri = uri
656658
)
657659

658660
let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
659661
let response = response.EnsureSuccessStatusCode ()
662+
use response = response
660663
let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
661664

662665
let! jsonNode =
@@ -694,14 +697,15 @@ module VaultClientNonExtensionMethod =
694697
System.Uri ("v1/auth/jwt/login", System.UriKind.Relative)
695698
)
696699

697-
let httpMessage =
700+
use httpMessage =
698701
new System.Net.Http.HttpRequestMessage (
699702
Method = System.Net.Http.HttpMethod.Get,
700703
RequestUri = uri
701704
)
702705

703706
let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
704707
let response = response.EnsureSuccessStatusCode ()
708+
use response = response
705709
let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
706710

707711
let! jsonNode =
@@ -764,14 +768,15 @@ module VaultClientExtensionMethodHttpClientExtension =
764768
)
765769
)
766770

767-
let httpMessage =
771+
use httpMessage =
768772
new System.Net.Http.HttpRequestMessage (
769773
Method = System.Net.Http.HttpMethod.Get,
770774
RequestUri = uri
771775
)
772776

773777
let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
774778
let response = response.EnsureSuccessStatusCode ()
779+
use response = response
775780
let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
776781

777782
let! jsonNode =
@@ -809,14 +814,15 @@ module VaultClientExtensionMethodHttpClientExtension =
809814
System.Uri ("v1/auth/jwt/login", System.UriKind.Relative)
810815
)
811816

812-
let httpMessage =
817+
use httpMessage =
813818
new System.Net.Http.HttpRequestMessage (
814819
Method = System.Net.Http.HttpMethod.Get,
815820
RequestUri = uri
816821
)
817822

818823
let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
819824
let response = response.EnsureSuccessStatusCode ()
825+
use response = response
820826
let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
821827

822828
let! jsonNode =

0 commit comments

Comments
 (0)