[comp.sys.sun] BUG, set-variables in pc, Sun UNIX 4.2 Release 3.4

djones@decwrl.dec.com (Dave Jones) (02/02/90)

Assigning from a small set-variable to a larger one copies random bits
from beyond the storage area allocated to the small set. I haven't tried
it on the SPARC machine yet.

program p(input, output);

  type
       t1 = set of 1..999;
       t2 = set of 1..2;

   var
       s1: t1;	
       s2: t2;	
       s3: t1;

begin	
       s3 := [1..999];
       s2 := [];
       s1 := s2;
       writeln( s1 = [] );
end.