Is self a UTF-16 high surrogate ?

Property definitions

core :: abstract_text $ Char :: is_hi_surrogate
	# Is `self` a UTF-16 high surrogate ?
	fun is_hi_surrogate: Bool do
		var cp = code_point
		return cp >= 0xD800 and cp <= 0xDBFF
	end
lib/core/text/abstract_text.nit:2168,2--2172,4