gm2
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Gm2] bug report, w/ source


From: Dragiša Durić
Subject: Re: [Gm2] bug report, w/ source
Date: Wed, 28 Jul 2010 08:02:07 +0200

This one went off when I added Free to EXPORT QUALIFIED in MakeArgs.def

On Wed, 2010-07-28 at 01:06 +0200, Dragiša Durić wrote:
> ===
> DEFINITION MODULE FOR "C" MakeArgs;
> 
> FROM
>   SYSTEM
> IMPORT
>   ADDRESS;
> 
> EXPORT QUALIFIED Do;
> 
> TYPE
>   Args = POINTER TO RECORD
>     format: POINTER TO ARRAY [0..2047] OF CHAR;
>     params: ARRAY [0..127] OF ADDRESS;
>   END;
> 
> PROCEDURE Do (format: ARRAY OF CHAR; ...): Args;
> 
> PROCEDURE Free (args: Args);
> 
> END MakeArgs.
> ===
> MODULE TestCase4;
> 
> IMPORT
>   MakeArgs;
> 
> PROCEDURE PrintF(VAR res: ARRAY OF CHAR; args: MakeArgs.Args);
>   BEGIN
>     MakeArgs.Free(args);
>   END PrintF;
> 
> END TestCase4.
> ===
> dragisha/pts/9: ~/m2/gm2.lib0% gm2 -I. -fiso -c TestCase4.mod
> Internal error: Segmentation fault
> Please report this crash to the GNU Modula-2 mailing list
> <address@hidden>
> 

-- 
Dragiša Durić <address@hidden>




reply via email to

[Prev in Thread] Current Thread [Next in Thread]