version	U12.1.00
uid	mailmisc.u1-1786033034-0
impl	local
global	4
	0,000001,mail__type_handlers,0
	1,000001,mail__encoding_handlers,0
	2,000005,mail__get_all_type_handlers,0
	3,000005,mail__get_all_encoding_handlers,0

proc mail__get_all_type_handlers
	local	0,000000,mail__type_handlers
	local	1,000000,mail__MultipartHandler
	local	2,000000,mail__TextHandler
	local	3,000000,mail__MessageHandler
	declend
	filen	mailmisc.icn
	line	9
	colm	12
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	pnull
	var	1
	line	11
	colm	51
	synt	any
	invoke	0
	var	2
	line	11
	colm	71
	synt	any
	invoke	0
	var	3
	line	11
	colm	94
	synt	any
	invoke	0
	line	11
	colm	28
	synt	any
	llist	3
	line	11
	colm	26
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L4
	mark	L5
	var	0
	line	13
	colm	4
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	14
	colm	2
	synt	any
	pfail
	end
proc mail__get_all_encoding_handlers
	local	0,000000,mail__encoding_handlers
	local	1,000000,mail__NoOpHandler
	local	2,000000,mail__Base64Handler
	local	3,000000,mail__QuotedPrintableHandler
	declend
	line	16
	colm	12
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	pnull
	var	1
	line	18
	colm	50
	synt	any
	invoke	0
	var	2
	line	18
	colm	72
	synt	any
	invoke	0
	var	3
	line	18
	colm	103
	synt	any
	invoke	0
	line	18
	colm	32
	synt	any
	llist	3
	line	18
	colm	30
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L4
	mark	L5
	var	0
	line	20
	colm	4
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	21
	colm	2
	synt	any
	pfail
	end
