(defun main int)
	(let str:string* (String "hello_world"))
	(printstr str->_str)
	(printchar '\n')

	(let strs:string** (str->split str '_'))

	(printstr strs[0]->_str)
	(printchar '\n')
	(printstr strs[1]->_str)
	(printchar '\n')

	(str->free str)
(endfun)