Fix hlint

Author: harendra-kumar

src/Streamly/Internal/Data/Stream/Channel/Append.hs

@@ -143,6 +143,7 @@ workLoopLIFOLimited qref sv winfo = run
 
     run = do
         work <- dequeue qref
+        {- HLINT ignore "Use forM_" -}
         case work of
             Nothing -> return ()
             Just item -> process item