F# 에서 쓰레드 사용하기 예제

간단한 쓰레드 사용 방법에 대해서 알아보자.

단, 일반적인 코딩에서는 Async 계열 API를 사용하여

쓰레드와 동일한 동작을 구현 하므로 

이 예제는 참고만 하도록 한다.

open System

open System.IO

open System.Threading

let ThreadA() = 

    while(true) do

        printfn "[A] Timer tick %A" DateTime.Now

        Thread.Sleep(1000);

let ThreadB() =

    while(true) do

        printfn "[B] Timer tick %A" DateTime.Now

        Thread.Sleep(1000);

       

[<EntryPoint>]

let main argv = 

    let thread_a = new Thread(new ThreadStart(fun _ -> ThreadA() ))

    thread_a.Start()

    let thread_b = new Thread(new ThreadStart(fun _ -> ThreadB() ))

    thread_b.Start();

    while(true) do

       Thread.Sleep(1000);

    0 // 정수 종료 코드 반환