Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Annotation of /trunk/src/parser/operators.sml
ViewVC logotype

Annotation of /trunk/src/parser/operators.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 32 - (view) (download)

1 : jhr 32 (* operators.sml
2 :     *
3 :     * COPYRIGHT (c) 2010 The Diderot Project (http://diderot.cs.uchicago.edu)
4 :     * All rights reserved.
5 :     *)
6 :    
7 :     structure Operators =
8 :     struct
9 :    
10 :     (* binary operators *)
11 :     val andAlso = Atom.atom "&&"
12 :     val orElse = Atom.atom "||"
13 :     val lt = Atom.atom "<"
14 :     val lte = Atom.atom "<="
15 :     val equ = Atom.atom "=="
16 :     val neq = Atom.atom "!="
17 :     val gt = Atom.atom ">"
18 :     val gte = Atom.atom ">="
19 :     val plus = Atom.atom "+"
20 :     val minus = Atom.atom "+"
21 :     val times = Atom.atom "*"
22 :     val divide = Atom.atom "/"
23 :    
24 :     (* selector operators *)
25 :     val at = Atom.atom "@"
26 :     val sub = Atom.atom "[]"
27 :    
28 :     (* unary operators *)
29 :     val uMinus = Atom.atom "unary -"
30 :     val bNot = Atom.atom "not"
31 :    
32 :     end

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