Bug#161995: gpc segfaults on <number> in <integer, etc..> constructions

[Bas van Sisseren <tsd@tsd.student.utwente.nl>]

Package: gpc
Version: 2:2.95.4-14
Severity: normal


see subject. Sample code:

program gpc_in_bug;

var
  i: integer;
  r: record end;

begin
  if 0 in i then begin end; { i is not a set -> gpc segfaults }
  if 0 in r then begin end; { r is not a set -> gpc segfaults }
end.


-- System Information
Debian Release: 3.0
Architecture: i386
Kernel: Linux firx.student.utwente.nl 2.4.18-586tsc #1 Sun Apr 14 10:57:57 EST 2002 i586
Locale: LANG=C, LC_CTYPE=C

Versions of packages gpc depends on:
ii  cpp                          2:2.95.4-14 The GNU C preprocessor.
ii  gcc-2.95                     1:2.95.4-7  The GNU C compiler.
ii  gpc-2.95                     1:2.95.4-7  The GNU Pascal compiler.