Default "meet" operator is meet-error for intmap
authorAndy Wingo <wingo@pobox.com>
Thu, 26 Mar 2015 12:32:46 +0000 (13:32 +0100)
committerAndy Wingo <wingo@pobox.com>
Wed, 1 Apr 2015 08:28:19 +0000 (10:28 +0200)
commit33ab2838de874fe2b9dfae2008c93e550c7ab4af
treec7a82fdd3b314c61a5f936b7ab643c8a08cad11f
parent50fcdfece306a437ebad326679245e206cfbe6b2
Default "meet" operator is meet-error for intmap

* module/language/cps/intmap.scm (meet-error): New helper.
  (intmap-add, intmap-union, intmap-intersect): The "meet" argument is
  optional and defaults to meet-error.
module/language/cps/intmap.scm