scm: Warning: X server does not offer backing store capability. Window cannot be redrawn if obscured. Sorry... SCM Turtlegraphics Copyright (C) 1992 sjm@cc.tut.fi, jtl@cc.tut.fi Type `(help-gr)' or `(help-turtlegr)' for a quick reference of the new primitives. > (format "%u4" 1294) FORMAT: error with call: (format #f "%u4<===" ===>1294 ) 1 superfluous argument ERROR: "error in format" > (printf "%u4" 1294) 129445 > (printf "%u" 1294) 12944 > (printf "%u.4" 1294) 1294.46 > (sprintf #f "%u.4" 1294) "1294.4" > (sprintf #f "%u" 1294) "1294" > (define o-str.0 (list->string (list #\a #\b #\c #\d))) # > o-str.0 "abcd" > (sprintf o-str.0 "%u" 1294) 4 > o-str.0 "1294" > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > (sprintf o-str.1 "%u" 1294) 4 > o-str.1 "1294e" > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > o-str.1 "abcde" > (sprintf o-str.1 "%" 1294) ERROR: printf "conversion specification incomplete" "%" > (sprintf o-str.1 "%-" 1294) ERROR: printf "conversion specification incomplete" "%-" > (sprintf o-str.1 "%5" 1294) ERROR: printf "conversion specification incomplete" "%5" > (sprintf o-str.1 "% 5" 1294) ERROR: printf "conversion specification incomplete" "% 5" > (sprintf o-str.1 "%.*" 4 1294) ERROR: printf "conversion specification incomplete" "%.*" > (sprintf o-str.1 "%.u*" 4 1294) 2 > o-str.1 "4*cde" > (sprintf o-str.1 "%.u*" 1294) 5 > o-str.1 "1294*" > (sprintf o-str.1 "%u.*" 1294) 5 > o-str.1 "1294." > (sprintf o-str.1 "%u.4" 1294) 5 > o-str.1 "1294." > (sprintf o-str.1 "%u.5" 1294) 5 > o-str.1 "1294." > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > o-str.1 "abcde" > (sprintf o-str.1 "%u 5" 1294) 5 > o-str.1 "1294 " > (sprintf o-str.1 "%u 4" 1294) 5 > o-str.1 "1294 " > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > (sprintf o-str.1 "%u 4" 1294) 5 > o-str.1 "1294 " > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > (sprintf o-str.1 "% 4u" 1294) 5 > o-str.1 " 1294" > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > (sprintf o-str.1 "% u" 1294) 5 > o-str.1 " 1294" scm: Warning: X server does not offer backing store capability. Window cannot be redrawn if obscured. Sorry... SCM Turtlegraphics Copyright (C) 1992 sjm@cc.tut.fi, jtl@cc.tut.fi Type `(help-gr)' or `(help-turtlegr)' for a quick reference of the new primitives. > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > (sprintf o-str.1 "% 5u" 1294) 5 > o-str.1 " 1294" > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > (sprintf o-str.1 "% 10u" 1294) 5 > o-str.1 " " > (define o-str.1 (list->string (list #\a #\b #\c #\d #\e))) # > (sprintf o-str.1 "% 6u" 1294) 5 > o-str.1 " 129" > (define o-str.2 (list->string (list #\a #\b #\c #\d #\e #\f #\g #\h))) # > o-str.2 "abcdefgh" > (sprintf o-str.2 "% 6u" 1294) 6 > o-str.2 " 1294gh" > (define o-str.2 (list->string (list #\a #\b #\c #\d #\e #\f #\g #\h))) # > (sprintf o-str.2 "% 7u" 1294) 7 > o-str.2 " 1294h" > (define o-str.2 (list->string (list #\a #\b #\c #\d #\e #\f #\g #\h))) # > (sprintf o-str.2 "% 8u" 1294) 8 > o-str.2 " 1294" > (define o-str.2 (list->string (list #\a #\b #\c #\d #\e #\f #\g #\h))) # > (sprintf o-str.2 "% 9u" 1294) 8 > o-str.2 " 129" > (define o-str.3 (make-string 10 #\ )) # > (sprintf o-str.3 "% u" 1294) 9 > o-str.3 " 1294 " > scm: Warning: X server does not offer backing store capability. Window cannot be redrawn if obscured. Sorry... SCM Turtlegraphics Copyright (C) 1992 sjm@cc.tut.fi, jtl@cc.tut.fi Type `(help-gr)' or `(help-turtlegr)' for a quick reference of the new primitives. > (define o-str.3 (make-string 10 #\ )) # > (sprintf o-str.3 "% u" 1294) 5 > o-str.3 " 1294 " > (define o-str.3 (make-string 10 #\ )) # > (sprintf o-str.3 "% u" 1294) 5 > o-str.3 " 1294 " > (define o-str.3 (make-string 10 #\ )) # > (sprintf o-str.3 "%u" 1294) 4 > o-str.3 "1294 " >