diff --git a/dev-lang/epic/epic-0.9.3.3-r1.ebuild b/dev-lang/epic/epic-0.9.3.3-r1.ebuild
index a1022b072aaed..6480a23b545c7 100644
--- a/dev-lang/epic/epic-0.9.3.3-r1.ebuild
+++ b/dev-lang/epic/epic-0.9.3.3-r1.ebuild
@@ -28,7 +28,10 @@ DEPEND="${RDEPEND}
 	dev-haskell/happy
 "
 # Bug #438422, upstream at https://github.com/edwinb/EpiVM/issues/5.
-PATCHES=("${FILESDIR}"/${PN}-0.9.3.3-respect-user-cflags.patch)
+PATCHES=(
+	"${FILESDIR}"/${PN}-0.9.3.3-respect-user-cflags.patch
+	"${FILESDIR}"/${PN}-0.9.3.3-ghc84.patch
+)
 
 src_prepare() {
 	default
diff --git a/dev-lang/epic/files/epic-0.9.3.3-ghc84.patch b/dev-lang/epic/files/epic-0.9.3.3-ghc84.patch
new file mode 100644
index 0000000000000..978cb8b88ce5f
--- /dev/null
+++ b/dev-lang/epic/files/epic-0.9.3.3-ghc84.patch
@@ -0,0 +1,15 @@
+--- a/Main.lhs
++++ b/Main.lhs
+@@ -10,11 +10,7 @@
+ > import Epic.Compiler
+ > import Paths_epic
+ 
+-> versionString = showV (versionBranch version)
+->   where
+->     showV [] = ""
+->     showV [a] = show a
+->     showV (x:xs) = show x ++ "." ++ showV xs
++> versionString = show version
+ 
+ > main = do args <- getArgs
+ >           (fns, opts) <- getInput args