Template:Define Really

Use this template to get a definition of this guard for use in E spec tests.

? /** Coercion-inhibiting guard wrapper. For example, Really[ConstList] will accept only ConstLists and not things which coerce to them. */ > def Really { >  to get(guard) { >    return def reallyGuard { >      to coerce(specimen, optEjector) { >        def coerced := guard.coerce(specimen, optEjector) >        if (coerced != specimen) { >          throw.eject(optEjector, E.toQuote(coerced) + " must be same as original specimen " + E.toQuote(specimen)) >        } >         return coerced >      } >     } >   } > }; null