From ca444e49eeea7366000d47a96e9842c165208abb Mon Sep 17 00:00:00 2001
From: Danny Yoo <dyoo@cs.wpi.edu>
Date: Mon, 27 Feb 2012 18:46:41 -0500
Subject: [PATCH] some cleanup

---
 compiler/compiler.rkt   | 5 ++---
 compiler/il-structs.rkt | 1 -
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/compiler/compiler.rkt b/compiler/compiler.rkt
index 1e07611..dbd7152 100644
--- a/compiler/compiler.rkt
+++ b/compiler/compiler.rkt
@@ -1286,13 +1286,12 @@
 (define (ensure-simple-expression e)
   (if (or (Constant? e)
           (LocalRef? e)
-          (ToplevelRef? e)
-          )
+          (ToplevelRef? e))
       e
       (error 'ensure-simple-expression)))
 
 
-(: simple-operands->opargs ((Listof Expression) (Listof CompileTimeEnvironmentEntry) -> (Listof (U OpArg ModuleVariable))))
+(: simple-operands->opargs ((Listof Expression) (Listof CompileTimeEnvironmentEntry) -> (Listof OpArg)))
 ;; Produces a list of OpArgs if all the operands are particularly simple, and false otherwise.
 (define (simple-operands->opargs rands knowledge)
   (map (lambda: ([e : Expression]
diff --git a/compiler/il-structs.rkt b/compiler/il-structs.rkt
index c53fef8..edc2a75 100644
--- a/compiler/il-structs.rkt
+++ b/compiler/il-structs.rkt
@@ -48,7 +48,6 @@
                        PrimitivesReference                   
                        ControlFrameTemporary
                        ModulePrefixTarget
-                       ModuleVariable
                        ))
 
 (define-struct: ModuleVariableThing () #:transparent)