add write-string/write-u8/write-bytevector
style clenaup
add write/write-shared/display, but incomplete