История изменений
Исправление next_time, (текущая версия) :
виртуальные функции. а у вас — нечитабельная и нерасширяемая портянка. очень весело будет читать ваш код, когда начнётся юникод, или порядок поменяется. например, если надо будет сделать так:
dispatch 'a' = Just forB
dispatch 'b' = Just forC
dispatch 'с' = Just forC
dispatch 'd' = Just forD
dispatch 'e' = Just forA
dispatch 'f' = Just forF
dispatch 'ф' = Just forRF
dispatch 'a' = Just forRA
dispatch _ = Nothing
Исходная версия next_time, :
виртуальные функции. а у вас — нечитабельная и нерасширяемая портянка. очень весело будет читать ваш код, когда начнётся юникод, или порядок поменяется. например, если надо будет сделать так:
dispatch 'a' = Just forB
dispatch 'b' = Just forC
dispatch 'c' = Just forC
dispatch 'd' = Just forD
dispatch 'e' = Just forA
dispatch 'f' = Just forF
dispatch _ = Nothing