equal
deleted
inserted
replaced
725 fun unenclose str = String.substring (str, 1, size str - 2); |
725 fun unenclose str = String.substring (str, 1, size str - 2); |
726 |
726 |
727 (*simple quoting (does not escape special chars)*) |
727 (*simple quoting (does not escape special chars)*) |
728 val quote = enclose "\"" "\""; |
728 val quote = enclose "\"" "\""; |
729 |
729 |
730 (*space_implode "..." (explode "hello") = "h...e...l...l...o"*) |
730 (*space_implode "..." (space_explode "hello") = "h...e...l...l...o"*) |
731 fun space_implode a bs = implode (separate a bs); |
731 fun space_implode a bs = implode (separate a bs); |
732 |
732 |
733 val commas = space_implode ", "; |
733 val commas = space_implode ", "; |
734 val commas_quote = commas o map quote; |
734 val commas_quote = commas o map quote; |
735 |
735 |