ORIGIN '~beta/basiclib/betaenv';
-- lib: Attributes --
(*Egyszeru oroklodes, ket inner*)
Gyumolcs:
  (#
     print:<
       (# 
       do
          INNER ;
          (*Itt le fog futni a gyerek kodja, dinamikus szarmaztatas eseten*)
          'Gyumolcs'->putline;
          INNER ;
          (*Itt is le fog futni a gyerek kodja...*)
          
       #);
     
  #);
Alma: Gyumolcs
  (#
     print:
     (*Erdemes ugyis kiprobalni, hogy :: helyett : van, vagyis
      nem virtualis oroklodessel. Kiterjesztes helyett 
      feluldefinialas lesz.*) (#  do 'Alma'->putline;  #);
     
  #);
  

-- program: Descriptor --
(# bigyo: @Alma;  do bigyo.print;  #)