Re: Sequental IO and pointers

Snippet of my (current) Load procedure:

>
procedure Load(S: in out Storage; File: String) is
package StorageIO is new Sequential_IO(Node);
use StorageIO;
fh_storage:StorageIO.File_type;
import_node:Node;
begin
Open(fh_storage, Name=>file, Mode=>In_file);
Read(fh_storage, import_node);
S.next:=import_node;
Close(fh_storage);
end Load;
<

Would using Direct_IO be a better/other solution to use? What I
understand of that package is that you get indexing features to use.

> You don't need another type, just modify Save to not output the
> pointer.

How would I go about doing that, using a Node/Storage type for output?
Doesnt Write put the whole shebang into my binary file?

.