Zásobník - unit – Pascal – Fórum – Programujte.com

Zdravím,

nemůžu pořád přijít na to co je špatně, háže mi to chybu v hlavním programu na "var Z: Zasobnik;" že místo ";" očekává ".", díky za pomoc.

hlavni program:

program zasobnik; 
uses modulzasobnik;   

var Z: Zasobnik; { teď máme k dispozici zásobník řetězců }
    R: string;
begin 
	Init(Z); { zásobník je připraven }
end.

modul:

unit modulzasobnik;

interface
type TypData=string;
     UkPrvek = ^Prvek;
     Prvek = record
       Data: TypData;
       Dalsi: UkPrvek
     end;

     Zasobnik = UkPrvek;
procedure Init(var Z: Zasobnik);

implementation
procedure Init(var Z: Zasobnik);
begin Z:=nil; end;

end.

#1 Ed
No to bude asi proto, že názvem "zasobnik" jsi pojmenoval prohram, tak už nemůžeš mít proměnnou pod stejným názvem.

Pojmenuj program jinak...

#2 JoDiK
opravuji, zasobnik je jak název typu, tak programu, přejmenuj program.

Super, díky