Mercurial > repos > icfp2014

comparison code/grid.lm @ 61:0eff4790249f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed typo
author William Morgan <billjunk@mrgn.org>
date Mon, 28 Jul 2014 01:46:08 -0700
parents d087d0b28039
children
comparison
equal deleted inserted replaced
60:863034106e02 61:0eff4790249f
50 maxX <- (grid gridMaxX) 50 maxX <- (grid gridMaxX)
51 ((x >= 0) + (y >= 0) + (x < maxX) + (y < maxY)) > 0 51 ((x >= 0) + (y >= 0) + (x < maxX) + (y < maxY)) > 0
52 } 52 }
53 53
54 grid:get:withDefault <- :grid pos default { 54 grid:get:withDefault <- :grid pos default {
55 if: (grid: grid inbounds?: pos) { 55 if: (grid: grid inBounds?: pos) {
56 grid: grid get: pos 56 grid: grid get: pos
57 } else: { 57 } else: {
58 default 58 default
59 } 59 }
60 } 60 }