diff options
author | Erick Tryzelaar <idadesub@users.sourceforge.net> | 2010-03-08 19:32:27 +0000 |
---|---|---|
committer | Erick Tryzelaar <idadesub@users.sourceforge.net> | 2010-03-08 19:32:27 +0000 |
commit | 49457b81589c6a3ef384caa8fdf1463ad2ada7c7 (patch) | |
tree | 8500bcc1ba0067ff7816b083d8b5a535be6ee50d /examples/OCaml-Kaleidoscope/Chapter3/token.ml | |
parent | 9ef76b9985a0c408e126affa049698c413ad8664 (diff) | |
download | external_llvm-49457b81589c6a3ef384caa8fdf1463ad2ada7c7.zip external_llvm-49457b81589c6a3ef384caa8fdf1463ad2ada7c7.tar.gz external_llvm-49457b81589c6a3ef384caa8fdf1463ad2ada7c7.tar.bz2 |
Add OCaml tutorial to the examples.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@97966 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'examples/OCaml-Kaleidoscope/Chapter3/token.ml')
-rw-r--r-- | examples/OCaml-Kaleidoscope/Chapter3/token.ml | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/examples/OCaml-Kaleidoscope/Chapter3/token.ml b/examples/OCaml-Kaleidoscope/Chapter3/token.ml new file mode 100644 index 0000000..2ca782e --- /dev/null +++ b/examples/OCaml-Kaleidoscope/Chapter3/token.ml @@ -0,0 +1,15 @@ +(*===----------------------------------------------------------------------=== + * Lexer Tokens + *===----------------------------------------------------------------------===*) + +(* The lexer returns these 'Kwd' if it is an unknown character, otherwise one of + * these others for known things. *) +type token = + (* commands *) + | Def | Extern + + (* primary *) + | Ident of string | Number of float + + (* unknown *) + | Kwd of char |