- 1
- 2
- 3
ref <- newIORef 0
replicateM_ 1000000 $ modifyIORef ref (+1)
readIORef ref >>= print
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+121
ref <- newIORef 0
replicateM_ 1000000 $ modifyIORef ref (+1)
readIORef ref >>= print
Зачем вообще они реализуют настолько ленивую хрень, что она никогда не работает? Хоть кто-нибудь умеет этой функцией пользоваться не получая стек оверфлов на произвольных данных?
Похвально...
(_R_)
(_J_)