Annotation of /sml/releases/release-110.36/ckit/src/parser/util/ascii.sml

Parent Directory | Revision Log

---

Revision 930 - (view) (download)

1 :	dbm	597	(* Copyright (c) 1998 by Lucent Technologies *)
2 :
3 :			(* Copyright 1989 by AT&T Bell Laboratories *)
4 :			(* ascii.sml *)
5 :
6 :			structure Ascii = struct
7 :			val caret = 94
8 :			and colon = 58
9 :			and comma = 44
10 :			and del = 127
11 :			and dollar = 36
12 :			and dot = 46
13 :			and dquote = 34
14 :			and equal = 61
15 :			and formfeed = 12
16 :			and greaterthan = 62
17 :			and lbrace = 123
18 :			and lbracket = 91
19 :			and lc_a = 97
20 :			and lc_n = 110
21 :			and lc_t = 116
22 :			and lc_z = 122
23 :			and lessthan = 60
24 :			and lparen = 40
25 :			and minus = 45
26 :			and newline = 10
27 :			and nine = 57
28 :			and percent = 37
29 :			and plus = 43
30 :			and query = 63
31 :			and rbrace = 125
32 :			and rbracket = 93
33 :			and return = 13
34 :			and rparen = 41
35 :			and SEMIcolon = 59
36 :			and sharp = 35
37 :			and slash = 47
38 :			and space = 32
39 :			and squote = 39
40 :			and star = 42
41 :			and tab = 9
42 :			and tilde = 126
43 :			and uc_a = 65
44 :			and uc_z = 90
45 :			and underscore = 95
46 :			and zero = 48
47 :
48 :			fun isDigit (char) = char >= zero andalso char <= nine;
49 :
50 :			end (* structure Ascii *)

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0