until -package:singletons -package:utility-ht package:hedgehog

until p f yields the result of applying f until p holds.