Discriminant function should be public

[graydon]

We fairly often need to materialize a discriminant separate from switching on the type. In the case of rs-stellar-contract-host I'm actually reusing the discriminants as the type codes embedded in Object (handles).