Verified Commit bedbe096 authored by Camil Staps's avatar Camil Staps 🚀

Remove debug code

parent 075dc1c3
......@@ -143,10 +143,6 @@ where
< _ _
= False
import StdDebug
trace_id x = trace_n x x
instance toString (String,String) where toString (x,y) = "Trace: " +++ x +++ ": " +++ y
class match a :: !a !FilePath -> Bool
instance match PathPattern
......@@ -346,7 +342,7 @@ where
(Just l, Just m) -> isMember (l,m) appmods
_ -> False
where
appmods = [trace_id (fromJust $ 'CDB'.getLibrary me.me_loc, fromJust $ 'CDB'.getModule me.me_loc) \\ (me,_) <- tdb.temp_modules | me.me_is_app]
appmods = [(fromJust $ 'CDB'.getLibrary me.me_loc, fromJust $ 'CDB'.getModule me.me_loc) \\ (me,_) <- tdb.temp_modules | me.me_is_app]
libmap = 'M'.fromList
[(l,idxfilter \e -> case 'CDB'.getLocation e >>= 'CDB'.getLibrary of
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment