(define poo (make-string 3 #\💩))
(print poo) ; doesn't print anything
(print (string-length poo)) ;=> 3
(print (string-ref poo 0)) ; doesn't print anything
(print (char->integer (string-ref poo 0))) ;=> 169
(print (char->integer #\💩)) ;=> 128169