Skip to content

Bigboybamo patch 7 #43626

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.

Sign up for GitHub

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

Merged
merged 9 commits into from
Nov 19, 2024
Merged

Bigboybamo patch 7 #43626

Changes from all commits
Commits
Show all changes
9 commits
Select commit Hold shift + click to select a range
69f41a8
Update access-modifiers.md
bigboybamo Jun 11, 2024
b0e8850
Merge branch 'dotnet:main' into main
bigboybamo Jul 2, 2024
9afec84
Merge branch 'dotnet:main' into main
bigboybamo Aug 14, 2024
52abccd
Merge branch 'dotnet:main' into main
bigboybamo Aug 14, 2024
1706ff9
Merge branch 'dotnet:main' into main
bigboybamo Oct 1, 2024
8f859cb
Merge branch 'dotnet:main' into main
bigboybamo Oct 7, 2024
b638380
Merge branch 'dotnet:main' into main
bigboybamo Oct 10, 2024
f2a5570
Merge branch 'dotnet:main' into main
bigboybamo Nov 18, 2024
cdfca23
Update snippet8003.fs
bigboybamo Nov 18, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
7 changes: 4 additions & 3 deletions samples/snippets/fsharp/lang-ref-2/snippet8003.fs
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,5 +1,6 @@
open System.Net
open Microsoft.FSharp.Control.WebExtensions
open System.Net.Http

let urlList = [ "Microsoft.com", "http://www.microsoft.com/"
"MSDN", "http://msdn.microsoft.com/"
Expand All @@ -10,8 +11,8 @@ let fetchAsync(name, url:string) =
async {
try
let uri = new System.Uri(url)
let webClient = new WebClient()
let! html = webClient.AsyncDownloadString(uri)
let httpClient = new HttpClient()
let! html = httpClient.GetStringAsync(uri) |> Async.AwaitTask
printfn "Read %d characters for %s" html.Length name
with
| ex -> printfn "%s" (ex.Message);
Expand All @@ -24,4 +25,4 @@ let runAll() =
|> Async.RunSynchronously
|> ignore

runAll()
runAll()
Loading