initial commit

.gitignore

@@ -0,0 +1,4 @@
+**.o
+**.hi
+/.tup
+/Main

IRC/Connection.hs

@@ -0,0 +1,13 @@
+module IRC.Connection where
+
+import Data.Word (Word16)
+
+--import qualified Network.Socket as S
+
+-- The host to connect to.
+type Host = String
+
+-- The port to connect to.
+type Port = Word16
+
+--connect :: S.Socket

IRC/Tupfile

@@ -0,0 +1,3 @@
+include_rules
+
+: foreach *.hs |> ghc $(GHCFLAGS) -c %f |> %B.o %B.hi

Main.hs

@@ -0,0 +1,7 @@
+module Main where
+
+main :: IO ()
+main = cena
+
+cena :: IO ()
+cena = putStrLn "ganda cena mano"

Tupfile

@@ -0,0 +1,4 @@
+include_rules
+
+: foreach *.hs |> ghc $(GHCFLAGS) -c %f |> %B.o %B.hi
+: *.o IRC/Connection.o |> ghc -o Main %f |> Main

Tuprules.tup

@@ -0,0 +1 @@
+GHCFLAGS += -Wall -O3