SRL Archive - Help

PascalScript pointers?


Er1k

2012-03-26 08:04:34

I just want to make sure before going into a fruitless search. Are pointers supported by simba?

Frement

2012-03-26 08:07:18

From: Er1k
I just want to make sure before going into a fruitless search. Are pointers supported by simba?


As far as I know, if you use Lape, you can have pointers, but PascalScript does not support them.

Markus

2012-03-26 08:10:35

Only to procedures, and only in a limited fashion.

Er1k

2012-03-26 10:23:53

so I believe linked lists for now is out of the question for simba usage, right? :(

masterBB

2012-03-26 10:57:23

srl will go full lape in the near future. Just use lape for now.

edit:
I can't seem to get a linked list working in lape as you can't create a next or previous pointer of the type node within a record. But maybe I'm doing it wrong.

Markus

2012-03-26 11:27:02

Try it of type pointer then typecast the doodle out of it.

mixster

2012-03-26 13:08:32


type
PItem = ^TItem;
TItem = record
value: Integer;
next: PItem;
end;

masterBB

2012-03-26 13:28:14

You are a genius.

edit:
Markus typecast I used:
program new;

type
Node = record
value: String;
next: pointer;
end;


var
n1,n2:Node;

begin
n1.value := 'tada';
n2.value := 'hoi';
n1.next := @n2;

writeln(Node(n1.next^).value);
end.

Er1k

2012-03-27 09:36:13

From: masterBB
You are a genius.

edit:
Markus typecast I used:
program new;

type
Node = record
value: String;
next: pointer;
end;


var
n1,n2:Node;

begin
n1.value := 'tada';
n2.value := 'hoi';
n1.next := @n2;

writeln(Node(n1.next^).value);
end.


Thanks everyone. Code works like a charm!