Fix warning for unused function case.
Fix warning for unused function case.

Ignore-this: f4ac15fc2bbc57e83cfa7aea26ca5836

darcs-hash:20141112081605-4d2ae-1a80f1dbdc5f2f0f42e6a86c23ba0d4c4666982b

johntyree/HsQML,johntyree/HsQML