diff --git a/Data/Encoding/UTF8.hs b/Data/Encoding/UTF8.hs
index b9312c8..6679a7e 100644
--- a/Data/Encoding/UTF8.hs
+++ b/Data/Encoding/UTF8.hs
@@ -53,6 +53,7 @@ decodeUTF8 ~(w1:rest1)
 			.|. ((fromIntegral $ w2 .&. 0x3F) `shiftL` 12)
 			.|. ((fromIntegral $ w3 .&. 0x3F) `shiftL`  6)
 			.|. (fromIntegral $ w4 .&. 0x3F),rest4)
+		_ -> throwDyn UnexpectedEnd
 	| otherwise = throwDyn (IllegalCharacter w1)
 
 data UTF8AnalyzeState