Count sub-blocks.

Property definitions

markdown $ MDBlock :: count_blocks
	# Count sub-blocks.
	fun count_blocks: Int do
		var count = 0
		var block = first_block
		while block != null do
			count += 1
			block = block.next
		end
		return count
	end
lib/markdown/markdown.nit:976,2--985,4