!7

p {
  int processID = nempty(args) ? parseInt(first(args)) : processID_int();
  S text = loadTextFile("/proc/" + processID + "/smaps");
  
  S range = null;
  new TreeMap<S, Long> rssByRange;
  for (S s : lines(text)) {
    if (regexpFindIC("^[0-9a-f]{8}-", s))
      continue with range = takefirst(3, s);
    PairS p = parseColonProperty(s);
    if (eqic(pairA(p), "rss"))
      rssByRange.put(getOrCreate_long(rssByRange, range) + parseLong(p.b));
  }
  pnl(rssByRange);
}