[fpc-pascal] dynamic array and new/dispose
amitbueno at gmail.com
Wed Feb 2 10:18:34 CET 2011
I am compiling in a delphi mode.
Sorry for not posting a runnable source code,.
The code portion was taken from a huge source code, which is probably hard
to detach from the rest of the code.
It is reading a TStream object, which is an input 3ds file given to the app.
From: fpc-pascal-bounces at lists.freepascal.org
[mailto:fpc-pascal-bounces at lists.freepascal.org] On Behalf Of Jonas Maebe
Sent: Wednesday, February 02, 2011 11:17 AM
To: FPC-Pascal users discussions
Subject: Re: [fpc-pascal] dynamic array and new/dispose
On 02 Feb 2011, at 09:20, Amit Bueno wrote:
> // creating and reading more data
> // NewSubChunk function
> Function Chunk.NewSubchunk: integer;
> setlength(SubChunks, High(SubChunks)+2);
> New(subchunks[High(SubChunks)], create);
> SubChunks[High(SubChunks)]^.Data := Self.Data;
> Result := High(SubChunks);
> // ---------
> The procedure fails when running the:
> All the procedure works fine on Delphi, but on fpc under iMac it
Are you compiling in Delphi mode? Please *always* post compilable
source code that demonstrates the problem when asking for help, not
uncompilable snippets. Don't make people guess about what you might
have written or about how you are compiling it.
fpc-pascal maillist - fpc-pascal at lists.freepascal.org
More information about the fpc-pascal