[fa.info-mac] Instant Pascal bug

info-mac@uw-beaver (info-mac) (07/27/84)

From: mclure@Sri-Unix.arpa
Apparently the construction:

	var ok : boolean
	var valid : set of char;
	var ch : char;

	ch := 'A';
	valid := ['B','C','A'];
	ok := ch in valid;

does not correctly set ok to true. Instead it sets it to false.
If we expand with

	if (ch in valid) then
	    ok := true
	else
	    ok := false

then ok is set correctly.

Slight bug there...

	Stuart