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

note

This commit is contained in:
Jay McCarthy 2018-01-10 13:46:02 -05:00
parent 4aba3c335f
commit 3d765975a0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
buffer.rkt
View File

@ -107,7 +107,7 @@
(struct cells (rows cols vec) #:mutable) (struct cells (rows cols vec) #:mutable)
(define (maybe-make-cells old new-rows new-cols) (define (maybe-make-cells old new-rows new-cols)
(match-define (cells old-rows old-cols vec) old) (match-define (cells old-rows old-cols vec) old)
;; XXX support shrinking/growing ;; XXX support shrinking/growing while preserving information
(if (and (= old-rows new-rows) (if (and (= old-rows new-rows)
(= old-cols new-cols)) (= old-cols new-cols))
old old