On 10 Nov 2001, at 1:45, John P.R. Archer wrote:
Sorry about this horrid use of gotos in the following nasty bit of code but it core dumps on Solaris 2.6...
As a point of reference, with:
Reading specs from E:\Programming\Pascal\i486-pc-mingw32msvc\2.95.3\specs gpc version 20010924, based on 2.95.3 20010315 (release)
I get:
level_1 level_2 level_3 goto 2 label 2 should not get here
Also:
[...]
begin (* level_2 code *) writeln( 'level_2' ) ; level_3 ; writeln( 'should not get here' ) ; return ;
2:
writeln( 'label 2' ) ;end ; (* level_2 code *)
begin (* level_1 code *) writeln( 'level_1' ) ; level_2 ; writeln( 'should not get here' ) ; end ; (* level_1 code *)
...I cannot see why the level 1 "should not get here" should not be executed.
-- Dave