freepascal.compiler/bugs/bug0168.pp

var bset: set of 0..31;
    b: byte;

Begin
  bset := bset + b;
End.