misc-deps
/
lux
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Cleanup debug

This commit is contained in:
Jay McCarthy 2017-08-31 15:04:51 -04:00
parent 9812d00d3a
commit 7844e92817
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
chaos/gui/utils.rkt
View File

@ -1,6 +1,5 @@
#lang racket/gui #lang racket/gui
(require bazaar/debug (require racket/contract/base)
racket/contract/base)
(define nnint? nonnegative-integer?) (define nnint? nonnegative-integer?)
(provide (provide
@ -105,7 +104,7 @@
(module+ drracket (module+ drracket
(define n-displays (get-display-count)) (define n-displays (get-display-count))
(for/list ([d (in-range n-displays)]) #;(for/list ([d (in-range n-displays)])
(define-values (x y) (define-values (x y)
(get-display-left-top-inset #:monitor d)) (get-display-left-top-inset #:monitor d))
(define-values (w h) (define-values (w h)