removed old code for subtraction

jsiek · jsiek · commit a2c49b2e154c · 2016-06-01T14:25:08.000-04:00
diff --git a/int_exp.rkt b/int_exp.rkt
@@ -68,7 +68,6 @@
     (define/public (binary-op->inst op)
       (match op
          ['+ 'addq]
-	 ['- 'subq]
 	 [else (error "in binary-op->inst unmatched" op)]
 	 ))
 
diff --git a/tests/s3_18.rkt b/tests/s3_18.rkt
@@ -3,7 +3,7 @@
       (vector v)
       (let ([junk (vector (vector 1) (vector 2)(vector 1) (vector 2)
                           (vector 1))])
-        (o (- i 1) v))))
+        (o (+ i (- 1)) v))))
 
 (define (t [v : (Vector (Vector Integer))])
   : (Vector (Vector (Vector Integer)))
