F# Async Task 예제

이번에는 Async task를 사용하는 예제이다.

Thread를 사용한 구문 보다는 이 방법을 추천한다.

open System

open System.IO

open System.Threading

open System.Threading.Tasks

let task1 = async {

    while(true) do

        Console.WriteLine("task1");

        Thread.Sleep(1000)

    }

let task2 = async {

    while(true) do

        Console.WriteLine("task2")

        Thread.Sleep(1000)    

    }

[<EntryPoint>]

let main argv = 

    

    let task1 = Async.StartAsTask(task1)

    let task2 = Async.StartAsTask(task2)

    //Async.AwaitTask(task1)

    //Async.AwaitTask(task2)

    while(true) do

        let v = Console.ReadLine()

        Console.WriteLine v

    0 // 정수 종료 코드 반환

Task1과 Task2 함수가 백그라운드로 동작하게 된다.