Lazzlo2096

f :: p -> p
f z = z

data MyT = O Int | T Char deriving(Show)
data MyT2 = O2 Int | T2 Char deriving(Show)

g :: MyT -> MyT
g z = z

-- f O 3

Lazzlo2096

-- Int : 1,2,3,..
data Qwe = Non1 | Non2 deriving( Show )

data As = AA Int | SS Qwe deriving( Show )

----data As2 a = AAA (Just Int) | SSS (Just Qwe)
data As2 = AAA (Maybe Int) | SSS (Maybe Qwe) deriving( Show )
----f :: Int of Qwe -> (Maybe Int or Maybe Qwe)
f :: As -> As2
f (AA a) = AAA (Just a)

Lazzlo2096

{-# LANGUAGE DeriveFunctor #-}

import Data.Functor

data SomeThingElse a = Some a | Thing
  deriving (Functor, Show)
  
-- 5 <$ Just () == Just 5
-- 5 <$ Some () == Some 5

Lazzlo2096

// https://github.com/libressl-portable/portable/blob/master/include/compat/sys/stat.h
// Dont forget place file "portable_endian.h" from https://gist.github.com/panzi/6856583 in /md5 directory
// This make fdupes compile, but it still dosen't work on windows (I think trouble in file API or something like)

// https://msdn.microsoft.com/en-us/library/14h5k7ff.aspx
// https://arrayfire.com/cross-compile-to-windows-from-linux/

diff --git a/Makefile b/Makefile
index bc5ff54..1cb3925 100644
--- a/Makefile