Skip to content

Commit 64cf81e

Browse files
committed
small fix
1 parent 0b1769a commit 64cf81e

File tree

1 file changed

+2
-4
lines changed

1 file changed

+2
-4
lines changed

src/core/egg-herbie.rkt

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1208,9 +1208,7 @@
12081208
(if (hash-has-key? duplicatesHash expr)
12091209
(set! duplicates (cons expr duplicates))
12101210
(hash-set! duplicatesHash expr 0)))
1211-
;(displayln (format "duplicates:~a" duplicates))
12121211
(remove-duplicates exprs)
1213-
12141212
(define (run-rival pts)
12151213
(for ([pt pts])
12161214
;(displayln pt)
@@ -1271,11 +1269,11 @@
12711269
; Checks both status and val-points
12721270
(when (and (equal? (cdr val-point) (cdr val-point2))
12731271
(not (equal? (car val-point) (car val-point2))))
1274-
(displayln "__________________")
1272+
#| (displayln "__________________")
12751273
(display "prog:")
12761274
(displayln prog)
12771275
(display "diff:")
1278-
(displayln diff)
1276+
(displayln diff) |#
12791277
(when (not (equal? diff #f))
12801278
(if (equal? (first diff) -0.0)
12811279
(format "Expr 1: ~a Expr 2: ~a" (car val-point) (car val-point2));insert match statement to check for patterns ex- x+0 -> x

0 commit comments

Comments
 (0)