class EL_SPLIT_ON_CHARACTER_8

(source code)

Client examples: GROUPED_ECF_LINES ;  SPLIT_STRING_TEST_SET ;  STRING_8_SPLIT_VS_SPLIT_ON_CHARACTER_8 ;  STRING_SPLIT_ITERATION_COMPARISON

description

Split target string conforming to READABLE_STRING_8 with separator of type CHARACTER_32

note
	description: "[
		Split `target' string conforming to ${READABLE_STRING_8} with
		`separator' of type ${CHARACTER_32}
	]"

	author: "Finnian Reilly"
	copyright: "Copyright (c) 2001-2022 Finnian Reilly"
	contact: "finnian at eiffel hyphen loop dot com"

	license: "MIT license (See: en.wikipedia.org/wiki/MIT_License)"
	date: "2025-05-02 8:40:43 GMT (Friday 2nd May 2025)"
	revision: "13"


class
	EL_SPLIT_ON_CHARACTER_8 [S -> READABLE_STRING_8]

inherit
	EL_SPLIT_ON_CHARACTER [S, CHARACTER_8]
		redefine
			new_cursor
		end

create
	make, make_adjusted

feature -- Access

	new_cursor: EL_SPLIT_ON_CHARACTER_8_CURSOR [S]
			-- Fresh cursor associated with current structure
		do
			create Result.make_adjusted (target, separator, adjustments)
		end

	count: INTEGER
		do
			if attached target as t then
				Result := t.occurrences (separator) + 1
				if t.count > 1 then
				-- empty strings at end are skipped
					Result := Result - (t [t.count] = separator).to_integer
					Result := Result - (t [1] = separator).to_integer
				end
			end
		end

feature {NONE} -- Implementation

	filled_item (a_item: STRING_8): like target
		do
		end

end