#include #include namespace odc { const std::string View::TYPENAME("Views.View^"); const TypeProxy View::PROXY; View::View(INTEGER id) : Store(id) {} const std::string &View::getType() { return TYPENAME; } const std::string *View::getSuper() { return &Store::getType(); } const std::string &View::getTypeName() const { return getType(); } void View::internalize(Reader &reader) { Store::internalize(reader); if (reader.isCancelled()) return; reader.readVersion(0, 0); } const std::string Fold::TYPENAME("StdFolds.Fold^"); const TypeProxy Fold::PROXY; Fold::Fold(INTEGER id) : View(id) {} const std::string &Fold::getType() { return TYPENAME; } const std::string *Fold::getSuper() { return &View::getType(); } const std::string &Fold::getTypeName() const { return getType(); } void Fold::internalize(Reader &reader) { View::internalize(reader); if (reader.isCancelled()) return; reader.readVersion(0, 0); if (reader.isCancelled()) return; // rd.ReadXInt(xint);fold.leftSide := xint = 0; reader.readSInt(); // rd.ReadXInt(xint); fold.collapsed := xint = 0; reader.readSInt(); // rd.ReadXString(fold.label); SHORTCHAR label[32]; reader.readSString(label); // the label // rd.ReadStore(store); reader.readStore(); // the hidden part // IF store # NIL THEN fold.hidden := store(TextModels.Model); Stores.Join(fold.hidden, fold) // ELSE fold.hidden := NIL // END; // fold.leftSide := store # NIL } } // namespace odc