#(define-markup-command (upcase paper props str) (string?)
"Upcase the string characters. Syntax: \\upcase #\"string\""
(interpret-markup paper props (make-simple-markup (string-upcase str))))
#(define-markup-command (upcase paper props str) (string?)
"Upcase the string characters. Syntax: \\upcase #\"string\""
(interpret-markup paper props (make-simple-markup (string-upcase str))))