; Classes for the classifier

(define class/literal       0)
(define class/name	    1)
(define class/application   2)

(define class/lambda	    3)
(define class/letrec	    4)
(define class/if	    5)
(define class/quote	    6)
(define class/begin	    7)
(define class/set!	    8)
(define class/let-syntax    9)
(define class/letrec-syntax 10)

(define class/define	    11)
(define class/define-syntax 12)

(define number-of-classes   13)