handleJResult :: JResult ([String], [PreClassInfo]) -> ([String], [PreClassInfo])
handleJResult (JDone x) = x
handleJResult :: JResult ([String], [PreClassInfo]) -> ([String], [PreClassInfo])
handleJResult (JDone x) = x
handleJResult (JDone x) = x