summaryrefslogtreecommitdiff
path: root/chapter25/src/main/smp/sys/char.smp
blob: de37968ebf86ca61a952eb7323875d3680b17046 (plain)
1
2
3
4
5
6
7
8
9
// -*- mode: java;  -*-

val toupper = { u8 c ->
    return c >= 'a' && c <= 'z' ? c - ('a' - 'A') : c;
};

val tolower = { u8 c ->
    return c >= 'A' && c <= 'Z' ? c + ('a' - 'A') : c;
};