Problem mit Zeigern

[Macci]

Würde statt

Delphi-Quellcode:

FUNCTION pop(VAR zkopf:tzeiger):char; 
VAR zhilf1,zhilf2:tzeiger; 
    z:char; 
BEGIN 
zhilf1:=zkopf; 
zhilf2:=zkopf^.next; 
WHILE NOT(zhilf2^.next = NIL) DO 
  BEGIN 
   zhilf1:=zhilf2; 
   zhilf2:=zhilf2^.next; 
  END; 
  zhilf1^.next:=NIL; 
  pop:=zhilf2^.inhalt; 
END;

nicht einfach nur

Delphi-Quellcode:

FUNCTION pop(VAR zkopf:tzeiger):char; 
BEGIN 
result:=zkopf^.inhalt;
zkopf := zkopf^.next
END;

genügen?