Wall police
Ignore-this: 8f341925aa3a1bc16dba78b8a9a1f28d
darcs-hash:20100112235631-f0a0d-294179f3f1677280d0ffb649f06bbf1908e72b4e.gz
commitf42f25940202df665247f212f41b392c651b8e06
authorcoreyoconnor <coreyoconnor@gmail.com>
dateTue 12 Jan 2010, 15:56 (17 years ago)
parent61e25b6
src/Data/Terminfo/Eval.hs+1−1
@@ -82,7 +82,7 @@ cap_op_required_bytes DecOut = do
8282 p <- pop
8383 return $ toEnum $ length $ show p
8484cap_op_required_bytes CharOut = do
85− pop
85+ _ <- pop
8686 return 1
8787cap_op_required_bytes (PushParam pn) = do
8888 read_param pn >>= push