ฉันกำลังทำการทดลองกับการมองเห็นพร้อมกันและหน่วยความจำและพบพฤติกรรมแปลก ๆ นี้ (ดูความคิดเห็นในบรรทัด): module Main where import Data.IORef import Control.Concurrent import System.CPUTime import System.IO main = do hSetBuffering stdout...