diff options
Diffstat (limited to 'testsuite/tests/plugins/simple-plugin/Simple/RemovePlugin.hs')
| -rw-r--r-- | testsuite/tests/plugins/simple-plugin/Simple/RemovePlugin.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/plugins/simple-plugin/Simple/RemovePlugin.hs b/testsuite/tests/plugins/simple-plugin/Simple/RemovePlugin.hs index dfbed9e490..a56fc3cf4f 100644 --- a/testsuite/tests/plugins/simple-plugin/Simple/RemovePlugin.hs +++ b/testsuite/tests/plugins/simple-plugin/Simple/RemovePlugin.hs @@ -48,7 +48,7 @@ typecheckPlugin [name, "typecheck"] _ tc } where notNamedAs name (L _ FunBind { fun_id = L _ fid }) = occNameString (getOccName fid) /= name - notNamedAs name (L _ AbsBinds { abs_binds = bnds }) + notNamedAs name (L _ (XHsBindsLR (AbsBinds { abs_binds = bnds }))) = all (notNamedAs name) bnds notNamedAs _ (L _ b) = True typecheckPlugin _ _ tc = return tc |