--- sml/trunk/src/compiler/FLINT/kernel/primop.sml 1999/04/21 00:34:12 255 +++ sml/trunk/src/compiler/FLINT/kernel/primop.sml 1999/04/21 01:28:39 256 @@ -242,8 +242,8 @@ | prPrimop (SUBSCRIPT_REC) = "subscriptrec" | prPrimop (SUBSCRIPT_RAW64) = "subscriptraw64" - (* These ones were strangely missing. Maybe they should never happen? *) - | prPrimop UNBOXEDASSIGN = "!**!!UNEXPECTED!!**!" + (* These ones were strangely missing *) + | prPrimop UNBOXEDASSIGN = "unboxedassign" val purePrimop =