[Import `stringify' from scsh/utilities clinton@unknownlamer.org**20100402165620 Ignore-this: 5e0a21f19a0193156c264d3fd7186050 ] hunk ./module/scsh/utilities.scm 6 - #:export (check-arg)) + #:export (check-arg + stringify + loophole)) hunk ./module/scsh/utilities.scm 29 +;;; is there any reason for this to be restricted and just not an +;;; alias for object->string? -- clinton +(define (stringify thing) + (cond ((string? thing) thing) + ((symbol? thing) + (symbol->string thing)) + ((integer? thing) + (number->string thing)) + (else (error "Can only stringify strings, symbols, and integers." + thing))))