//
// $Id$
//

class PACKAGE OBJECT

   attrib parentPkg             
   // A csomag szl“je. Ha nincs, akkor nil.

   attrib name
   // A csomag neve.

   attrib nAttribs
   // H ny attributum van.

   attrib attribs
   // Egy t”mb az attribŁtumok sorsz m val,nev‚vel,tĄpus val

   attrib methods
   // Egy t”mb a m–veletek sorsz m val, nev‚vel, 
   // param‚tereivel, implSpec-‚vel.

   attrib pkgId
   // A csomag azonosĄt˘ja, minden csomagnak van.
   // Ha egy csomagnak van “se, akkor ez megegyezik az “s‚nek
   // az id-j‚vel. Ha nincs “se, akkor pedig kl”nb”zik b rmelyik
   // olyan csomag pkgId-j‚t“l, aminek szint‚n nincs “se.

   attrib amBlock
   // Egy blokk, aminek a v‚grehajt sa beĄrja
   // egy t”mbbe a csomag  ltal defini lt
   // attribŁtumokat ‚s egy m sik t”mbbe pedig
   // a csomag  ltal defini lt m–veleteket.

   attrib methodsBlock
   // Egy blokk, aminek a v‚grehajt sa
   // beĄrja egy t”mbbe a csomag  ltal defini lt
   // m–veletek blokkjait.
   // (Ezt a t”mb”t adja a pkgMethodsImplement.)

   attrib pkgMethodsImplement
   // Egy blokkot tartalmaz, amit ki‚rt‚kelve
   // megkapjuk azt a t”mb”t, aminek az els“
   // eleme a csomag, a tov bbi elemei pedig
   // a csomagban haszn lhat˘ m–veletek
   // blokkjai, ‚s m s implement ci˘s elemek.

   rmethod oinit(parent,name,nAttribs,nMethods,amBlock,methodsBlock,pkgId)

   nmethod connectTo(obj)

metaclass

   attrib numId

   rmethod onew(parent,name,nAttribs,nMethods,amBlock,methodsBlock,pkgId)

   nmethod nextId()