Expose field data, use class id, and merge all collections into "objects"

runtime/vm/class_table.cc

 // Copyright (c) 2012, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 #include "vm/class_table.h"
 #include "vm/flags.h"
 #include "vm/freelist.h"
 #include "vm/object.h"
 #include "vm/raw_object.h"
 #include "vm/visitor.h"
@@ skipping 77 matching lines @@
 
   for (intptr_t i = 1; i < top_; i++) {
     cls = At(i);
     if (cls.raw() != reinterpret_cast<RawClass*>(0)) {
       name = cls.Name();
       OS::Print("%" Pd ": %s\n", i, name.ToCString());
     }
   }
 }
 
+
+void ClassTable::PrintToJSONStream(JSONStream* stream) {
+  Class& cls = Class::Handle();
+  JSONObject jsobj(stream);
+  jsobj.AddProperty("type", "ClassList");
+  {
+    JSONArray members(&jsobj, "members");
+    for (intptr_t i = 1; i < top_; i++) {
+      if (HasValidClassAt(i)) {
+        cls = At(i);
+        members.AddValue(cls);
+      }
+    }
+  }
+}
+
 }  // namespace dart