diff --git a/README.md b/README.md
index 33370b6..d48abc7 100644
--- a/README.md
+++ b/README.md
@@ -9,6 +9,7 @@ uwu in every programming language in the world
 - [Bourne shell (sh)](uwu.sh)
 - [C](uwu.c)
 - [C++](uwu.cpp)
+- [Haskell](uwu.hs)
 - [Javascript](uwu.js)
 - [Nim](uwu.nim)
 - [Pascal](uwu.pas)
diff --git a/uwu.hs b/uwu.hs
new file mode 100644
index 0000000..dc7785f
--- /dev/null
+++ b/uwu.hs
@@ -0,0 +1 @@
+main = putStrLn "uwu"