Moram priznati da do ovog tvog posta nisam cuo za tu mogucnost u Paskalu. Naravno to me je navelo da pokusam da izvedem nemoguce
.gif ":)")
Probao sam sledece:
Kod:
program proba;
var i:integer;
pi:^integer;
function f:integer;
begin
f:=i;
end;
BEGIN
read(i);
pi:=@f;
write(pi^);
end.
var i:integer;
pi:^integer;
function f:integer;
begin
f:=i;
end;
BEGIN
read(i);
pi:=@f;
write(pi^);
end.
e sad, dogadja se sledece:
On u stvari ovo iskompajlira uspesno, ali kada ga izvrsi ispise mi neki levi broj. Po mojoj logici ako imam pointer na f-ju to je u stvari pointer na povratnu vrednost f-je, pa bi pri ispisu trebala biti prikazana vrednost promenljive i.
Kada sam malo promenio kod, (f-ji dodao parametar) nisam mogao ni da iskompajliram program, javio mi je neku glupu gresku u liniji u kojoj pise pi:=@f(i);.
Kod je bio nesto nalik na ovo:
Kod:
program proba;
var i:integer;
pi:^integer;
function f(x:integer):integer;
begin
f:=x;
end;
BEGIN
read(i);
pi:=@f(i);
write(pi^);
end.
var i:integer;
pi:^integer;
function f(x:integer):integer;
begin
f:=x;
end;
BEGIN
read(i);
pi:=@f(i);
write(pi^);
end.
Znaci u Paskalu nije moguce pointeru kao vrednost dodeliti adresu f-je.
Naravno ako neko misli (ili zna) suprotno od ovoga neka to i dokaze.