b08718958d29407a94bdfe5cf11990f55121eaec
2 #include "reader/reader.ih"
6 Store
*Reader::readLinkStore() {
7 throw "Reader::readLinkStore() not implemented";
9 // ELSIF kind = link THEN
10 // rd.ReadInt(id); rd.ReadInt(comment); rd.ReadInt(next);
11 // rd.st.end := rd.Pos();
12 // IF (next > 0) OR ((next = 0) & ODD(comment)) THEN rd.st.next := rd.st.end + next ELSE rd.st.next := 0 END;
13 // x := ThisStore(rd.eDict, id)