It appears that the code generator (Stefan's) needs some laws that appear superfluous: {..n} = set ...
(* Title: Pure/ML-Systems/polyml-5.0.ML
ID: $Id$
Compatibility wrapper for Poly/ML 5.0.
*)
use "ML-Systems/polyml_common.ML";
use "ML-Systems/polyml_old_compiler5.ML";
val pointer_eq = PolyML.pointerEq;