Commit 57de0f97 authored by Bernd Brassel's avatar Bernd Brassel
Browse files

read instance process info

parent 7856d7b5
instance Read ProcessInfo where
readsPrec _ = [(RunTime,s)]
readsPrec _ ('R':'u':'n':'T':'i':'m':'e':s) = [(RunTime,s)]
readsPrec _ ('E':'l':'a':'p':'s':'e':'d':'T':'i':'m':'e':s) = [(ElapsedTime,s)]
readsPrec _ ('M':'e':'m':'o':'r':'y':s) = [(Memory,s)]
readsPrec _ ('C':'o':'d':'e':s) = [(Code,s)]
readsPrec _ ('S':'t':'a':'c':'k':s) = [(Stack,s)]
readsPrec _ ('H':'e':'a':'p':s) = [(Heap,s)]
readsPrec _ ('C':'h':'o':'i':'c':'e':'s':s) = [(Choices,s)]
readsPrec _ ('G':'a':'r':'b':'a':'g':'e':'C':'o':'l':'l':'e':'c':'t':'i':'o':'n':'s':s) = [(GarbageCollections,s)]
......
Supports Markdown
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