Files
harbour-core/harbour/samples/cccppc/prtreepr.cls
1999-11-09 01:37:27 +00:00

42 lines
1.2 KiB
OpenEdge ABL
Raw Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
//
// $Id$
//
//*******************************************************************
// prtreepr.cls: Parser tree parser. Egy input folyamot egy elemz“
// f val elemz“ objektum
// 1999, Csisz r Levente
// Egy elemz“ f t lehet vele felpˇteni s kezelni.
class PRTREEPR OBJECT
attrib eprtree // A prtree objektum.
attrib subtree // Amit ppen elemz<6D>nk.
attrib result // Ha az elemzs sikeres, akkor a megtal lt
// <terminal>-ban lev“ result lesz itt.
attrib itemArray // A put()-al betett itemek.
// A wordLen ut ni itemek az el“reolvasott
// itemek.
attrib wordLen // Ha az elemzs meg ll, akkor itt a megtal lt
// sz˘ hossza van (sikeressg esetn), vagy 0,
// sikertelensg esetn.
// Ezekhez lp vissza, ha az elemzs elakad.
attrib lastStopWordLen // A legutols˘ illeszked“ sz˘ hossza.
// attrib lastStopResult // A legutols˘ illeszked“ sz˘hoz tartoz˘
// result.
nmethod start()
nmethod put(item)
rmethod oinit(eprtree)
metaclass
rmethod onew(eprtree)