We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 8d016d0 + da09f98 commit 8fa0bdcCopy full SHA for 8fa0bdc
src/core/mainloop.rkt
@@ -267,6 +267,7 @@
267
(> (length alts) 1)
268
(equal? (representation-type repr) 'real)
269
(not (null? (context-vars ctx)))
270
+ (get-fpcore-impl 'if '() (list <bool> repr repr))
271
(get-fpcore-impl '<= '() (list repr repr)))
272
(define opts
273
(pareto-regimes (sort alts < #:key (curryr alt-cost repr)) start-prog ctx (*pcontext*)))
0 commit comments