В библиотеке binary есть функции для чтения различных примитивов. И

Question

В библиотеке binary есть функции для чтения различных примитивов. И

на каждый примитив есть три функции, которые читают данные в разном порядке (от старшего к младшему, от младшему к старшему)
Мне нужно распарсить бинарные данные, но проблема в том, что об порядке байтов можно узнать, прочитав первый байт. (Условно, если там ноль, то порядок байтов LE, иначе BE). Но тогда бы пришлось писать две функции для разного порядка байт. Тогда как быть?
Я лишь придумал что-то подобное
data Endianness = LE | BE

getWord32 :: Endianness -> Get Word32
getWord32 LE = getWord32le
getWord32 BE = getWord32be
похоже на костыль

#haskell #programming #russian

0

04.05.2021