Revision 2d1708e0 htools/hscan.hs

b/htools/hscan.hs
87 87 
-- | Generates serialized data from loader input.
88 88 
processData :: ClusterData -> Result ClusterData
89 89 
processData input_data = do
90 
  cdata@(ClusterData _ nl il _) <- mergeData [] [] [] input_data
90 
  cdata@(ClusterData _ nl il _) <- mergeData [] [] [] [] input_data
91 91 
  let (_, fix_nl) = checkData nl il
92 92 
  return cdata { cdNodes = fix_nl }
93 93 

  		












Also available in:
  Unified diff