cs/printer.cs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49

using System;
using System.Collections.Generic;
using System.Text.RegularExpressions;
using Mal;
using MalVal = Mal.types.MalVal;
using MalList = Mal.types.MalList;

namespace Mal {
    public class printer {
        public static string join(List<MalVal> value,
                                string delim, bool print_readably) {
            List<string> strs = new List<string>();
            foreach (MalVal mv in value) {
                strs.Add(mv.ToString(print_readably));
            }
            return String.Join(delim, strs.ToArray());
        }

        public static string join(Dictionary<string,MalVal> value,
                                string delim, bool print_readably) {
            List<string> strs = new List<string>();
            foreach (KeyValuePair<string, MalVal> entry in value) {
                if (entry.Key.Length > 0 && entry.Key[0] == '\u029e') {
                    strs.Add(":" + entry.Key.Substring(1));
                } else if (print_readably) {
                    strs.Add("\"" + entry.Key.ToString() + "\"");
                } else {
                    strs.Add(entry.Key.ToString());
                }
                strs.Add(entry.Value.ToString(print_readably));
            }
            return String.Join(delim, strs.ToArray());
        }

        public static string _pr_str(MalVal mv, bool print_readably) {
            return mv.ToString(print_readably);
        }

        public static string _pr_str_args(MalList args, String sep,
                                          bool print_readably) {
            return join(args.getValue(), sep, print_readably);
        }

        public static string escapeString(string str) {
            return Regex.Escape(str);
        }

    }
}