// // $Id$ // //******************************************************************* // creader.cls: Źltal nos 'streamb“l karaktert' olvas˘ oszt ly. // 1999, Csisz r Levente // Ebb“l ”r”k”l a fil‚ ‚s a string olvas˘ oszt ly. // A val˘di lesz rmazottaknak a readItem()-et kell implement lniuk. class CREADER READER attrib line attrib pos // 0, ha a pozˇci˘ ismeretlen. rmethod read() // A super:read()-al olvassa a stream-et. // Az egym s ut n k”vetkez“ CR ‚s LF karaktereket egy CR_LF (kett“ // hosszŁ) karakterr‚ alakˇtja. // Sz molja a sorokat ‚s nyilv ntartja a pozˇci˘t. rmethod unread(item) // Visszateszi az item-et az inputra. // Vissza sz molja a sorokat. —jsor eset‚n a pozˇci˘t null zza. nmethod getFile() nmethod getLine() nmethod getPos() rmethod oinit(name,errorStream) // Inicializ lja az objektumot. metaclass rmethod onew(name,errorStream)