aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--licentia/source/program/licentia.lux2
-rw-r--r--licentia/source/program/licentia/document.lux2
-rw-r--r--licentia/source/program/licentia/license/black_list.lux4
-rw-r--r--licentia/source/program/licentia/license/distribution.lux2
-rw-r--r--licentia/source/program/licentia/license/notice.lux2
-rw-r--r--licentia/source/program/licentia/output.lux4
-rw-r--r--licentia/source/test/licentia.lux8
-rw-r--r--lux-cl/source/program.lux2
-rw-r--r--lux-js/source/program.lux2
-rw-r--r--lux-lua/source/program.lux4
-rw-r--r--lux-php/source/program.lux2
-rw-r--r--lux-python/source/program.lux8
-rw-r--r--lux-r/source/program.lux2
-rw-r--r--lux-ruby/source/program.lux6
-rw-r--r--lux-scheme/source/program.lux2
-rw-r--r--stdlib/source/documentation/lux.lux4
-rw-r--r--stdlib/source/documentation/lux/math/logic.lux2
-rw-r--r--stdlib/source/documentation/lux/world.lux2
-rw-r--r--stdlib/source/library/lux.lux411
-rw-r--r--stdlib/source/library/lux/abstract/comonad.lux2
-rw-r--r--stdlib/source/library/lux/abstract/monad/indexed.lux2
-rw-r--r--stdlib/source/library/lux/control/concatenative.lux6
-rw-r--r--stdlib/source/library/lux/control/concurrency/actor.lux6
-rw-r--r--stdlib/source/library/lux/control/concurrency/async.lux2
-rw-r--r--stdlib/source/library/lux/control/concurrency/atom.lux2
-rw-r--r--stdlib/source/library/lux/control/concurrency/frp.lux4
-rw-r--r--stdlib/source/library/lux/control/exception.lux8
-rw-r--r--stdlib/source/library/lux/control/function/inline.lux2
-rw-r--r--stdlib/source/library/lux/control/function/mutual.lux4
-rw-r--r--stdlib/source/library/lux/control/parser.lux2
-rw-r--r--stdlib/source/library/lux/control/parser/analysis.lux2
-rw-r--r--stdlib/source/library/lux/control/parser/binary.lux2
-rw-r--r--stdlib/source/library/lux/control/parser/cli.lux2
-rw-r--r--stdlib/source/library/lux/control/parser/code.lux6
-rw-r--r--stdlib/source/library/lux/control/parser/json.lux6
-rw-r--r--stdlib/source/library/lux/control/parser/text.lux6
-rw-r--r--stdlib/source/library/lux/control/parser/type.lux8
-rw-r--r--stdlib/source/library/lux/control/parser/xml.lux4
-rw-r--r--stdlib/source/library/lux/control/pipe.lux2
-rw-r--r--stdlib/source/library/lux/control/region.lux2
-rw-r--r--stdlib/source/library/lux/control/remember.lux4
-rw-r--r--stdlib/source/library/lux/control/security/capability.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/bits.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/dictionary.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/dictionary/ordered.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/dictionary/plist.lux6
-rw-r--r--stdlib/source/library/lux/data/collection/queue.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/queue/priority.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/sequence.lux4
-rw-r--r--stdlib/source/library/lux/data/collection/set.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/set/multi.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/set/ordered.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/stream.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/tree.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/tree/finger.lux2
-rw-r--r--stdlib/source/library/lux/data/collection/tree/zipper.lux6
-rw-r--r--stdlib/source/library/lux/data/color.lux4
-rw-r--r--stdlib/source/library/lux/data/format/binary.lux4
-rw-r--r--stdlib/source/library/lux/data/format/css.lux2
-rw-r--r--stdlib/source/library/lux/data/format/css/class.lux2
-rw-r--r--stdlib/source/library/lux/data/format/css/id.lux2
-rw-r--r--stdlib/source/library/lux/data/format/css/style.lux2
-rw-r--r--stdlib/source/library/lux/data/format/css/value.lux2
-rw-r--r--stdlib/source/library/lux/data/format/html.lux4
-rw-r--r--stdlib/source/library/lux/data/format/json.lux10
-rw-r--r--stdlib/source/library/lux/data/format/markdown.lux2
-rw-r--r--stdlib/source/library/lux/data/format/tar.lux6
-rw-r--r--stdlib/source/library/lux/data/format/xml.lux8
-rw-r--r--stdlib/source/library/lux/data/text.lux2
-rw-r--r--stdlib/source/library/lux/data/text/buffer.lux2
-rw-r--r--stdlib/source/library/lux/data/text/format.lux2
-rw-r--r--stdlib/source/library/lux/data/text/regex.lux6
-rw-r--r--stdlib/source/library/lux/data/text/unicode/block.lux2
-rw-r--r--stdlib/source/library/lux/data/text/unicode/set.lux4
-rw-r--r--stdlib/source/library/lux/debug.lux2
-rw-r--r--stdlib/source/library/lux/documentation.lux10
-rw-r--r--stdlib/source/library/lux/extension.lux4
-rw-r--r--stdlib/source/library/lux/ffi.jvm.lux8
-rw-r--r--stdlib/source/library/lux/ffi.lux8
-rw-r--r--stdlib/source/library/lux/ffi.old.lux8
-rw-r--r--stdlib/source/library/lux/ffi.php.lux4
-rw-r--r--stdlib/source/library/lux/ffi.scm.lux4
-rw-r--r--stdlib/source/library/lux/ffi/export.js.lux2
-rw-r--r--stdlib/source/library/lux/ffi/export.jvm.lux2
-rw-r--r--stdlib/source/library/lux/ffi/export.lua.lux2
-rw-r--r--stdlib/source/library/lux/ffi/export.py.lux2
-rw-r--r--stdlib/source/library/lux/ffi/export.rb.lux2
-rw-r--r--stdlib/source/library/lux/ffi/node_js.js.lux2
-rw-r--r--stdlib/source/library/lux/locale.lux2
-rw-r--r--stdlib/source/library/lux/macro.lux6
-rw-r--r--stdlib/source/library/lux/macro/code.lux4
-rw-r--r--stdlib/source/library/lux/macro/local.lux2
-rw-r--r--stdlib/source/library/lux/macro/syntax.lux2
-rw-r--r--stdlib/source/library/lux/macro/syntax/declaration.lux4
-rw-r--r--stdlib/source/library/lux/macro/syntax/input.lux2
-rw-r--r--stdlib/source/library/lux/macro/template.lux14
-rw-r--r--stdlib/source/library/lux/math.lux4
-rw-r--r--stdlib/source/library/lux/math/infix.lux4
-rw-r--r--stdlib/source/library/lux/math/logic/continuous.lux2
-rw-r--r--stdlib/source/library/lux/math/modular.lux4
-rw-r--r--stdlib/source/library/lux/math/number/complex.lux2
-rw-r--r--stdlib/source/library/lux/math/number/ratio.lux4
-rw-r--r--stdlib/source/library/lux/math/random.lux4
-rw-r--r--stdlib/source/library/lux/meta.lux6
-rw-r--r--stdlib/source/library/lux/meta/configuration.lux6
-rw-r--r--stdlib/source/library/lux/meta/symbol.lux2
-rw-r--r--stdlib/source/library/lux/meta/version.lux4
-rw-r--r--stdlib/source/library/lux/static.lux4
-rw-r--r--stdlib/source/library/lux/target/common_lisp.lux2
-rw-r--r--stdlib/source/library/lux/target/js.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/attribute.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/attribute/code.lux4
-rw-r--r--stdlib/source/library/lux/target/jvm/bytecode.lux6
-rw-r--r--stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux4
-rw-r--r--stdlib/source/library/lux/target/jvm/class.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/constant.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/constant/pool.lux4
-rw-r--r--stdlib/source/library/lux/target/jvm/constant/tag.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/field.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/method.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/reflection.lux6
-rw-r--r--stdlib/source/library/lux/target/jvm/type.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/type/descriptor.lux4
-rw-r--r--stdlib/source/library/lux/target/jvm/type/lux.lux6
-rw-r--r--stdlib/source/library/lux/target/jvm/type/parser.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/type/reflection.lux2
-rw-r--r--stdlib/source/library/lux/target/jvm/type/signature.lux4
-rw-r--r--stdlib/source/library/lux/target/lua.lux2
-rw-r--r--stdlib/source/library/lux/target/php.lux2
-rw-r--r--stdlib/source/library/lux/target/python.lux2
-rw-r--r--stdlib/source/library/lux/target/r.lux4
-rw-r--r--stdlib/source/library/lux/target/ruby.lux2
-rw-r--r--stdlib/source/library/lux/target/scheme.lux2
-rw-r--r--stdlib/source/library/lux/test.lux6
-rw-r--r--stdlib/source/library/lux/time.lux4
-rw-r--r--stdlib/source/library/lux/time/date.lux6
-rw-r--r--stdlib/source/library/lux/time/day.lux2
-rw-r--r--stdlib/source/library/lux/time/duration.lux4
-rw-r--r--stdlib/source/library/lux/time/instant.lux2
-rw-r--r--stdlib/source/library/lux/time/month.lux2
-rw-r--r--stdlib/source/library/lux/time/year.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/default/init.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/default/platform.lux10
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux10
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/directive.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/generation.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux18
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux10
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux10
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux8
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/program.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/archive.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/cache/module.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/cli.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/export.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/io/archive.lux6
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/io/context.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/packager.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux4
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/meta/packager/script.lux2
-rw-r--r--stdlib/source/library/lux/tool/compiler/phase.lux2
-rw-r--r--stdlib/source/library/lux/tool/interpreter.lux2
-rw-r--r--stdlib/source/library/lux/type.lux8
-rw-r--r--stdlib/source/library/lux/type/check.lux8
-rw-r--r--stdlib/source/library/lux/type/implicit.lux6
-rw-r--r--stdlib/source/library/lux/type/poly.lux4
-rw-r--r--stdlib/source/library/lux/type/primitive.lux8
-rw-r--r--stdlib/source/library/lux/type/resource.lux2
-rw-r--r--stdlib/source/library/lux/type/unit.lux2
-rw-r--r--stdlib/source/library/lux/world/console.lux6
-rw-r--r--stdlib/source/library/lux/world/db/jdbc.lux2
-rw-r--r--stdlib/source/library/lux/world/db/sql.lux4
-rw-r--r--stdlib/source/library/lux/world/file.lux12
-rw-r--r--stdlib/source/library/lux/world/file/watch.lux4
-rw-r--r--stdlib/source/library/lux/world/net/http/client.lux2
-rw-r--r--stdlib/source/library/lux/world/net/http/cookie.lux2
-rw-r--r--stdlib/source/library/lux/world/net/http/request.lux2
-rw-r--r--stdlib/source/library/lux/world/net/http/response.lux4
-rw-r--r--stdlib/source/library/lux/world/program.lux6
-rw-r--r--stdlib/source/library/lux/world/shell.lux2
-rw-r--r--stdlib/source/poly/lux/abstract/equivalence.lux6
-rw-r--r--stdlib/source/poly/lux/abstract/functor.lux2
-rw-r--r--stdlib/source/poly/lux/data/format/json.lux4
-rw-r--r--stdlib/source/program/aedifex.lux6
-rw-r--r--stdlib/source/program/aedifex/artifact.lux4
-rw-r--r--stdlib/source/program/aedifex/artifact/time/date.lux2
-rw-r--r--stdlib/source/program/aedifex/artifact/versioning.lux2
-rw-r--r--stdlib/source/program/aedifex/command/build.lux8
-rw-r--r--stdlib/source/program/aedifex/command/deps.lux2
-rw-r--r--stdlib/source/program/aedifex/command/pom.lux4
-rw-r--r--stdlib/source/program/aedifex/command/test.lux2
-rw-r--r--stdlib/source/program/aedifex/dependency.lux4
-rw-r--r--stdlib/source/program/aedifex/dependency/deployment.lux2
-rw-r--r--stdlib/source/program/aedifex/dependency/resolution.lux4
-rw-r--r--stdlib/source/program/aedifex/format.lux4
-rw-r--r--stdlib/source/program/aedifex/metadata/artifact.lux2
-rw-r--r--stdlib/source/program/aedifex/metadata/snapshot.lux2
-rw-r--r--stdlib/source/program/aedifex/package.lux2
-rw-r--r--stdlib/source/program/aedifex/parser.lux2
-rw-r--r--stdlib/source/program/aedifex/pom.lux4
-rw-r--r--stdlib/source/program/aedifex/profile.lux12
-rw-r--r--stdlib/source/program/aedifex/project.lux2
-rw-r--r--stdlib/source/program/aedifex/runtime.lux2
-rw-r--r--stdlib/source/program/compositor.lux2
-rw-r--r--stdlib/source/specification/compositor/generation/case.lux4
-rw-r--r--stdlib/source/specification/compositor/generation/common.lux4
-rw-r--r--stdlib/source/specification/compositor/generation/function.lux4
-rw-r--r--stdlib/source/specification/compositor/generation/primitive.lux4
-rw-r--r--stdlib/source/specification/compositor/generation/structure.lux4
-rw-r--r--stdlib/source/specification/lux/abstract/equivalence.lux2
-rw-r--r--stdlib/source/specification/lux/world/file.lux12
-rw-r--r--stdlib/source/specification/lux/world/shell.lux6
-rw-r--r--stdlib/source/test/aedifex/artifact.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/extension.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot.lux4
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot/build.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot/stamp.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot/time.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot/version.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot/version/value.lux6
-rw-r--r--stdlib/source/test/aedifex/artifact/time.lux4
-rw-r--r--stdlib/source/test/aedifex/artifact/time/date.lux4
-rw-r--r--stdlib/source/test/aedifex/artifact/time/time.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/type.lux2
-rw-r--r--stdlib/source/test/aedifex/artifact/versioning.lux2
-rw-r--r--stdlib/source/test/aedifex/cache.lux2
-rw-r--r--stdlib/source/test/aedifex/cli.lux2
-rw-r--r--stdlib/source/test/aedifex/command/build.lux2
-rw-r--r--stdlib/source/test/aedifex/command/clean.lux4
-rw-r--r--stdlib/source/test/aedifex/command/deploy.lux4
-rw-r--r--stdlib/source/test/aedifex/command/deps.lux2
-rw-r--r--stdlib/source/test/aedifex/command/install.lux4
-rw-r--r--stdlib/source/test/aedifex/command/pom.lux6
-rw-r--r--stdlib/source/test/aedifex/command/test.lux2
-rw-r--r--stdlib/source/test/aedifex/command/version.lux2
-rw-r--r--stdlib/source/test/aedifex/dependency/deployment.lux10
-rw-r--r--stdlib/source/test/aedifex/dependency/resolution.lux2
-rw-r--r--stdlib/source/test/aedifex/dependency/status.lux2
-rw-r--r--stdlib/source/test/aedifex/metadata.lux2
-rw-r--r--stdlib/source/test/aedifex/metadata/artifact.lux4
-rw-r--r--stdlib/source/test/aedifex/metadata/snapshot.lux6
-rw-r--r--stdlib/source/test/aedifex/package.lux2
-rw-r--r--stdlib/source/test/aedifex/parser.lux2
-rw-r--r--stdlib/source/test/aedifex/pom.lux2
-rw-r--r--stdlib/source/test/aedifex/profile.lux4
-rw-r--r--stdlib/source/test/aedifex/project.lux6
-rw-r--r--stdlib/source/test/aedifex/repository/local.lux4
-rw-r--r--stdlib/source/test/aedifex/repository/remote.lux8
-rw-r--r--stdlib/source/test/aedifex/runtime.lux8
-rw-r--r--stdlib/source/test/lux.lux20
-rw-r--r--stdlib/source/test/lux/abstract/codec.lux2
-rw-r--r--stdlib/source/test/lux/abstract/comonad/cofree.lux2
-rw-r--r--stdlib/source/test/lux/abstract/enum.lux4
-rw-r--r--stdlib/source/test/lux/abstract/equivalence.lux2
-rw-r--r--stdlib/source/test/lux/abstract/hash.lux2
-rw-r--r--stdlib/source/test/lux/abstract/interval.lux8
-rw-r--r--stdlib/source/test/lux/abstract/monad.lux2
-rw-r--r--stdlib/source/test/lux/abstract/monad/free.lux2
-rw-r--r--stdlib/source/test/lux/abstract/order.lux2
-rw-r--r--stdlib/source/test/lux/abstract/predicate.lux2
-rw-r--r--stdlib/source/test/lux/control/concatenative.lux2
-rw-r--r--stdlib/source/test/lux/control/concurrency/actor.lux2
-rw-r--r--stdlib/source/test/lux/control/concurrency/frp.lux4
-rw-r--r--stdlib/source/test/lux/control/concurrency/semaphore.lux4
-rw-r--r--stdlib/source/test/lux/control/concurrency/stm.lux2
-rw-r--r--stdlib/source/test/lux/control/exception.lux2
-rw-r--r--stdlib/source/test/lux/control/function/memo.lux4
-rw-r--r--stdlib/source/test/lux/control/function/mixin.lux2
-rw-r--r--stdlib/source/test/lux/control/function/mutual.lux2
-rw-r--r--stdlib/source/test/lux/control/maybe.lux4
-rw-r--r--stdlib/source/test/lux/control/parser.lux4
-rw-r--r--stdlib/source/test/lux/control/parser/analysis.lux6
-rw-r--r--stdlib/source/test/lux/control/parser/binary.lux2
-rw-r--r--stdlib/source/test/lux/control/parser/cli.lux4
-rw-r--r--stdlib/source/test/lux/control/parser/code.lux2
-rw-r--r--stdlib/source/test/lux/control/parser/environment.lux4
-rw-r--r--stdlib/source/test/lux/control/parser/json.lux4
-rw-r--r--stdlib/source/test/lux/control/parser/synthesis.lux2
-rw-r--r--stdlib/source/test/lux/control/parser/text.lux4
-rw-r--r--stdlib/source/test/lux/control/parser/type.lux4
-rw-r--r--stdlib/source/test/lux/control/parser/xml.lux12
-rw-r--r--stdlib/source/test/lux/control/pipe.lux2
-rw-r--r--stdlib/source/test/lux/control/remember.lux2
-rw-r--r--stdlib/source/test/lux/control/security/policy.lux2
-rw-r--r--stdlib/source/test/lux/control/try.lux2
-rw-r--r--stdlib/source/test/lux/control/writer.lux2
-rw-r--r--stdlib/source/test/lux/data/binary.lux2
-rw-r--r--stdlib/source/test/lux/data/collection/array.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/dictionary.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/dictionary/ordered.lux8
-rw-r--r--stdlib/source/test/lux/data/collection/dictionary/plist.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/list.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/queue.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/queue/priority.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/sequence.lux8
-rw-r--r--stdlib/source/test/lux/data/collection/set.lux12
-rw-r--r--stdlib/source/test/lux/data/collection/set/multi.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/set/ordered.lux4
-rw-r--r--stdlib/source/test/lux/data/collection/stack.lux2
-rw-r--r--stdlib/source/test/lux/data/collection/stream.lux2
-rw-r--r--stdlib/source/test/lux/data/collection/tree.lux2
-rw-r--r--stdlib/source/test/lux/data/collection/tree/finger.lux6
-rw-r--r--stdlib/source/test/lux/data/collection/tree/zipper.lux2
-rw-r--r--stdlib/source/test/lux/data/format/binary.lux2
-rw-r--r--stdlib/source/test/lux/data/format/json.lux30
-rw-r--r--stdlib/source/test/lux/data/format/tar.lux6
-rw-r--r--stdlib/source/test/lux/data/format/xml.lux6
-rw-r--r--stdlib/source/test/lux/data/sum.lux2
-rw-r--r--stdlib/source/test/lux/data/text/buffer.lux2
-rw-r--r--stdlib/source/test/lux/data/text/encoding.lux4
-rw-r--r--stdlib/source/test/lux/data/text/escape.lux4
-rw-r--r--stdlib/source/test/lux/data/text/format.lux6
-rw-r--r--stdlib/source/test/lux/data/text/regex.lux2
-rw-r--r--stdlib/source/test/lux/data/text/unicode/set.lux4
-rw-r--r--stdlib/source/test/lux/debug.lux6
-rw-r--r--stdlib/source/test/lux/documentation.lux2
-rw-r--r--stdlib/source/test/lux/extension.lux6
-rw-r--r--stdlib/source/test/lux/ffi.js.lux4
-rw-r--r--stdlib/source/test/lux/ffi.jvm.lux16
-rw-r--r--stdlib/source/test/lux/ffi.old.lux4
-rw-r--r--stdlib/source/test/lux/ffi.php.lux2
-rw-r--r--stdlib/source/test/lux/ffi.scm.lux2
-rw-r--r--stdlib/source/test/lux/ffi/export.jvm.lux10
-rw-r--r--stdlib/source/test/lux/locale.lux4
-rw-r--r--stdlib/source/test/lux/locale/language.lux2
-rw-r--r--stdlib/source/test/lux/locale/territory.lux2
-rw-r--r--stdlib/source/test/lux/macro.lux8
-rw-r--r--stdlib/source/test/lux/macro/code.lux4
-rw-r--r--stdlib/source/test/lux/macro/pattern.lux2
-rw-r--r--stdlib/source/test/lux/macro/syntax/check.lux2
-rw-r--r--stdlib/source/test/lux/macro/syntax/definition.lux2
-rw-r--r--stdlib/source/test/lux/macro/syntax/export.lux4
-rw-r--r--stdlib/source/test/lux/macro/syntax/type/variable.lux2
-rw-r--r--stdlib/source/test/lux/math.lux2
-rw-r--r--stdlib/source/test/lux/math/infix.lux2
-rw-r--r--stdlib/source/test/lux/math/logic/fuzzy.lux2
-rw-r--r--stdlib/source/test/lux/math/modular.lux4
-rw-r--r--stdlib/source/test/lux/math/number/complex.lux2
-rw-r--r--stdlib/source/test/lux/math/number/frac.lux2
-rw-r--r--stdlib/source/test/lux/math/number/i64.lux138
-rw-r--r--stdlib/source/test/lux/math/number/int.lux2
-rw-r--r--stdlib/source/test/lux/math/number/nat.lux2
-rw-r--r--stdlib/source/test/lux/math/number/ratio.lux6
-rw-r--r--stdlib/source/test/lux/math/number/rev.lux4
-rw-r--r--stdlib/source/test/lux/meta.lux12
-rw-r--r--stdlib/source/test/lux/meta/configuration.lux4
-rw-r--r--stdlib/source/test/lux/static.lux6
-rw-r--r--stdlib/source/test/lux/target/js.lux12
-rw-r--r--stdlib/source/test/lux/target/jvm.lux10
-rw-r--r--stdlib/source/test/lux/target/lua.lux12
-rw-r--r--stdlib/source/test/lux/target/python.lux14
-rw-r--r--stdlib/source/test/lux/target/ruby.lux14
-rw-r--r--stdlib/source/test/lux/test.lux2
-rw-r--r--stdlib/source/test/lux/time.lux2
-rw-r--r--stdlib/source/test/lux/time/date.lux2
-rw-r--r--stdlib/source/test/lux/time/day.lux4
-rw-r--r--stdlib/source/test/lux/time/duration.lux2
-rw-r--r--stdlib/source/test/lux/time/instant.lux4
-rw-r--r--stdlib/source/test/lux/time/month.lux4
-rw-r--r--stdlib/source/test/lux/time/year.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/arity.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux8
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux12
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux14
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux14
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux14
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/archive.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/cache/module.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/cli.lux6
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/context.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/export.lux8
-rw-r--r--stdlib/source/test/lux/tool/compiler/meta/import.lux10
-rw-r--r--stdlib/source/test/lux/tool/compiler/phase.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/reference.lux4
-rw-r--r--stdlib/source/test/lux/tool/compiler/reference/variable.lux2
-rw-r--r--stdlib/source/test/lux/tool/compiler/version.lux4
-rw-r--r--stdlib/source/test/lux/type.lux10
-rw-r--r--stdlib/source/test/lux/type/check.lux10
-rw-r--r--stdlib/source/test/lux/type/dynamic.lux2
-rw-r--r--stdlib/source/test/lux/type/implicit.lux2
-rw-r--r--stdlib/source/test/lux/type/primitive.lux2
-rw-r--r--stdlib/source/test/lux/type/quotient.lux4
-rw-r--r--stdlib/source/test/lux/type/refinement.lux4
-rw-r--r--stdlib/source/test/lux/type/resource.lux2
-rw-r--r--stdlib/source/test/lux/type/unit.lux2
-rw-r--r--stdlib/source/test/lux/world/console.lux2
-rw-r--r--stdlib/source/test/lux/world/file.lux4
-rw-r--r--stdlib/source/test/lux/world/file/watch.lux6
-rw-r--r--stdlib/source/test/lux/world/input/keyboard.lux2
-rw-r--r--stdlib/source/test/lux/world/net/http/client.lux2
-rw-r--r--stdlib/source/test/lux/world/program.lux4
-rw-r--r--stdlib/source/test/lux/world/shell.lux2
530 files changed, 1355 insertions, 1286 deletions
diff --git a/licentia/source/program/licentia.lux b/licentia/source/program/licentia.lux
index f8c08a55c..aaa392ec3 100644
--- a/licentia/source/program/licentia.lux
+++ b/licentia/source/program/licentia.lux
@@ -21,7 +21,7 @@
[monad (.only do)]]
[control
[remember (.only to_do)]
- ["[0]" io (.only IO) ("[1]#[0]" monad)]
+ ["[0]" io (.only IO) (.open: "[1]#[0]" monad)]
["[0]" maybe]
["[0]" try (.only Try)]
["[0]" parser
diff --git a/licentia/source/program/licentia/document.lux b/licentia/source/program/licentia/document.lux
index 61fd75cbe..3d5f41dc3 100644
--- a/licentia/source/program/licentia/document.lux
+++ b/licentia/source/program/licentia/document.lux
@@ -5,7 +5,7 @@
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]]])
+ ["[0]" list (.open: "[1]#[0]" functor)]]]]])
(def: .public (quote text)
(-> Text Text)
diff --git a/licentia/source/program/licentia/license/black_list.lux b/licentia/source/program/licentia/license/black_list.lux
index 85338d15b..a7442b368 100644
--- a/licentia/source/program/licentia/license/black_list.lux
+++ b/licentia/source/program/licentia/license/black_list.lux
@@ -2,12 +2,12 @@
[library
[lux (.except)
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]]]
["[0]" // (.only Entity Black_List)
["_" term]
[//
diff --git a/licentia/source/program/licentia/license/distribution.lux b/licentia/source/program/licentia/license/distribution.lux
index 396bdd4ec..5628e96f5 100644
--- a/licentia/source/program/licentia/license/distribution.lux
+++ b/licentia/source/program/licentia/license/distribution.lux
@@ -5,7 +5,7 @@
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monoid)]]]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]]]
["[0]" // (.only Distribution)
["_" term]
[//
diff --git a/licentia/source/program/licentia/license/notice.lux b/licentia/source/program/licentia/license/notice.lux
index 009401794..61a661df3 100644
--- a/licentia/source/program/licentia/license/notice.lux
+++ b/licentia/source/program/licentia/license/notice.lux
@@ -5,7 +5,7 @@
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]]]
diff --git a/licentia/source/program/licentia/output.lux b/licentia/source/program/licentia/output.lux
index fb0b655ec..43599e39b 100644
--- a/licentia/source/program/licentia/output.lux
+++ b/licentia/source/program/licentia/output.lux
@@ -2,13 +2,13 @@
[library
[lux (.except Definition)
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" bit]
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]]]]]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]]]
[//
["[0]" license (.only Identification
Termination
diff --git a/licentia/source/test/licentia.lux b/licentia/source/test/licentia.lux
index 86da654d9..0e40d75bb 100644
--- a/licentia/source/test/licentia.lux
+++ b/licentia/source/test/licentia.lux
@@ -7,16 +7,16 @@
[monad (.only do)]]
[control
["[0]" io]
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random (.only Random)]
[number
- ["n" nat ("[1]#[0]" interval)]]]]]
+ ["n" nat (.open: "[1]#[0]" interval)]]]]]
[\\program
["[0]" output]
["[0]" license (.only Identification
diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index 7604cdf29..83d5af3d9 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -14,7 +14,7 @@
[concurrency
["[0]" promise (.only Promise)]]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
["[0]" encoding]]
[collection
diff --git a/lux-js/source/program.lux b/lux-js/source/program.lux
index bfa3d61ec..c0c3cf99e 100644
--- a/lux-js/source/program.lux
+++ b/lux-js/source/program.lux
@@ -7,7 +7,7 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
["[0]" io (.only IO io)]
diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux
index 3a77e7017..23fac65c1 100644
--- a/lux-lua/source/program.lux
+++ b/lux-lua/source/program.lux
@@ -15,13 +15,13 @@
[concurrency
["[0]" async (.only Async)]]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
["[0]" array (.only Array)]
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
[macro
["^" pattern]
["[0]" template]
diff --git a/lux-php/source/program.lux b/lux-php/source/program.lux
index 0509d8b36..d3316e1c4 100644
--- a/lux-php/source/program.lux
+++ b/lux-php/source/program.lux
@@ -14,7 +14,7 @@
[concurrency
["[0]" promise (.only Promise)]]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux
index 9bf158197..9669f3fc9 100644
--- a/lux-python/source/program.lux
+++ b/lux-python/source/program.lux
@@ -10,20 +10,20 @@
[control
["[0]" pipe]
["[0]" maybe]
- ["[0]" try (.only Try) ("[1]#[0]" monad)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
["[0]" exception (.only exception:)]
["[0]" io (.only IO io)]
["[0]" function]
[concurrency
["[0]" async (.only Async)]]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
["[0]" array (.only Array)]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
["[0]" macro
["^" pattern]
["[0]" template]
@@ -39,7 +39,7 @@
["_" python]]
[tool
["[0]" compiler
- ["[0]" phase (.only Operation Phase) ("[1]#[0]" monad)]
+ ["[0]" phase (.only Operation Phase) (.open: "[1]#[0]" monad)]
[reference
[variable (.only Register)]]
[language
diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux
index 66bf37030..71d8a6677 100644
--- a/lux-r/source/program.lux
+++ b/lux-r/source/program.lux
@@ -16,7 +16,7 @@
[parser
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux
index 3a596932b..69109108b 100644
--- a/lux-ruby/source/program.lux
+++ b/lux-ruby/source/program.lux
@@ -18,13 +18,13 @@
["<>" parser
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
["[0]" array (.only Array)]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
["[0]" macro
[syntax (.only syntax:)]
["^" pattern]
@@ -41,7 +41,7 @@
["_" ruby]]
[tool
["[0]" compiler
- ["[0]" phase (.only Operation Phase) ("[1]#[0]" monad)]
+ ["[0]" phase (.only Operation Phase) (.open: "[1]#[0]" monad)]
[reference
[variable (.only Register)]]
[language
diff --git a/lux-scheme/source/program.lux b/lux-scheme/source/program.lux
index c38d9085c..b35fd049f 100644
--- a/lux-scheme/source/program.lux
+++ b/lux-scheme/source/program.lux
@@ -14,7 +14,7 @@
[concurrency
["[0]" promise (.only Promise)]]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
["[0]" encoding]]
[collection
diff --git a/stdlib/source/documentation/lux.lux b/stdlib/source/documentation/lux.lux
index 861c20087..8969f1dcd 100644
--- a/stdlib/source/documentation/lux.lux
+++ b/stdlib/source/documentation/lux.lux
@@ -599,11 +599,11 @@
["M" monad (.except)]]
[data
maybe
- ["[0]" name ("[1]#[0]" codec)]]
+ ["[0]" name (.open: "[1]#[0]" codec)]]
[macro
code]]
[//
- [type ("[0]" equivalence)]])])
+ [type (.open: "[0]" equivalence)]])])
(documentation: /.#
"Allows accessing the value of a implementation's member."
diff --git a/stdlib/source/documentation/lux/math/logic.lux b/stdlib/source/documentation/lux/math/logic.lux
index ea6a28f65..5b26c20b7 100644
--- a/stdlib/source/documentation/lux/math/logic.lux
+++ b/stdlib/source/documentation/lux/math/logic.lux
@@ -6,7 +6,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monoid)]]]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]]]
["[0]" /
["[1][0]" continuous]
["[1][0]" fuzzy]])
diff --git a/stdlib/source/documentation/lux/world.lux b/stdlib/source/documentation/lux/world.lux
index 051f8efff..afbd6447b 100644
--- a/stdlib/source/documentation/lux/world.lux
+++ b/stdlib/source/documentation/lux/world.lux
@@ -8,7 +8,7 @@
["[0]" io]]
[data
[collection
- ["[0]" list ("[1]#[0]" monoid)]]]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]]]
["[0]" /
["[1][0]" console]
["[1][0]" file]
diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux
index 633ec16ce..13ff44b45 100644
--- a/stdlib/source/library/lux.lux
+++ b/stdlib/source/library/lux.lux
@@ -2027,7 +2027,7 @@
(-> Symbol ($' Meta Symbol))
({["" name]
(do meta_monad
- [module_name current_module_name]
+ [module_name ..current_module_name]
(in [module_name name]))
_
@@ -2559,6 +2559,40 @@
_
{#None}))
+(def:' .private (inP it tokens)
+ (All (_ a)
+ (-> a (Parser a)))
+ {#Some [tokens it]})
+
+(def:' .private (orP leftP rightP tokens)
+ (All (_ l r)
+ (-> (Parser l)
+ (Parser r)
+ (Parser (Or l r))))
+ (case (leftP tokens)
+ {#Some [tokens left]}
+ {#Some [tokens {#Left left}]}
+
+ _
+ (case (rightP tokens)
+ {#Some [tokens right]}
+ {#Some [tokens {#Right right}]}
+
+ _
+ {#None})))
+
+(def:' .private (eitherP leftP rightP tokens)
+ (All (_ a)
+ (-> (Parser a)
+ (Parser a)
+ (Parser a)))
+ (case (leftP tokens)
+ {#None}
+ (rightP tokens)
+
+ it
+ it))
+
(def:' .private (andP leftP rightP tokens)
(All (_ l r)
(-> (Parser l)
@@ -2571,6 +2605,16 @@
.let [[tokens right] right]]
(in [tokens [left right]])))
+(def:' .private (afterP leftP rightP tokens)
+ (All (_ l r)
+ (-> (Parser l)
+ (Parser r)
+ (Parser r)))
+ (do maybe_monad
+ [left (leftP tokens)
+ .let [[tokens left] left]]
+ (rightP tokens)))
+
(def:' .private (someP itP tokens)
(All (_ a)
(-> (Parser a)
@@ -2585,6 +2629,17 @@
{#None}
{#Some [tokens (list)]}))
+(def:' .private (manyP itP tokens)
+ (All (_ a)
+ (-> (Parser a)
+ (Parser (List a))))
+ (do maybe_monad
+ [it (itP tokens)
+ .let [[tokens head] it]
+ it (someP itP tokens)
+ .let [[tokens tail] it]]
+ (in [tokens (partial_list head tail)])))
+
(def:' .private (maybeP itP tokens)
(All (_ a)
(-> (Parser a)
@@ -2600,9 +2655,21 @@
(All (_ a)
(-> (Parser a) (Parser a)))
(case tokens
- (pattern (partial_list [_ {#Tuple tuple}] tokens'))
+ (pattern (partial_list [_ {#Tuple input}] tokens'))
(do maybe_monad
- [it (parsed itP tuple)]
+ [it (parsed itP input)]
+ (in [tokens' it]))
+
+ _
+ {#None}))
+
+(def:' .private (formP itP tokens)
+ (All (_ a)
+ (-> (Parser a) (Parser a)))
+ (case tokens
+ (pattern (partial_list [_ {#Form input}] tokens'))
+ (do maybe_monad
+ [it (parsed itP input)]
(in [tokens' it]))
_
@@ -2618,10 +2685,10 @@
{#None}))
(def:' .private (endP tokens)
- (-> (List Code) (Maybe Any))
+ (Parser Any)
(case tokens
(pattern (list))
- {#Some []}
+ {#Some [tokens []]}
_
{#None}))
@@ -2644,6 +2711,15 @@
_
{#None}))
+(def:' .private (globalP tokens)
+ (-> (List Code) (Maybe [(List Code) Symbol]))
+ (case tokens
+ (pattern (partial_list [_ {#Symbol it}] tokens'))
+ {#Some [tokens' it]}
+
+ _
+ {#None}))
+
(template [<parser> <item_type> <item_parser>]
[(def:' .private (<parser> tokens)
(-> (List Code) (Maybe (List <item_type>)))
@@ -3375,24 +3451,14 @@
{#None}
(failure "Wrong syntax for type:")))
-(type: Referrals
- (Variant
- {#Nothing}
- {#Referral [Symbol (List Code)]}))
-
-(type: Openings
- [Text (List Text)])
-
-(type: Refer
- (Record
- [#refer_defs Referrals
- #refer_open (List Openings)]))
+(type: Referral
+ [Symbol (List Code)])
(type: Importation
(Record
[#import_name Text
#import_alias (Maybe Text)
- #import_refer Refer]))
+ #import_referrals (List Referral)]))
... TODO: Allow asking the compiler for the name of the definition
... currently being defined. That name can then be fed into
@@ -3411,47 +3477,19 @@
_
(failure (..wrong_syntax_error [..prelude_module "symbol"]))))
-(def: (referrals_parser aliased? tokens)
- (-> Bit (List Code) (Meta [Referrals (List Code)]))
- (case tokens
- (pattern (partial_list [_ {#Form (partial_list [_ {#Symbol macro}] defs)}] tokens'))
- (meta#in [{#Referral [macro defs]}
- tokens'])
-
- (pattern (list))
- (meta#in [(if aliased?
- {#Referral [(symbol ..only) (list)]}
- {#Nothing})
- (list)])
-
- _
- (meta#in [{#Nothing}
- tokens])))
+(def: referral_parser
+ (Parser Referral)
+ (formP (andP globalP (someP anyP))))
-(def: (openings_parser parts)
- (-> (List Code) (Meta [(List Openings) (List Code)]))
- (case parts
- {#End}
- (meta#in [{#End} {#End}])
-
- (pattern (partial_list [_ {#Form (partial_list [_ {#Text prefix}] structs)}] parts'))
- (do meta_monad
- [structs' (monad#each meta_monad
- (function (_ struct)
- (case struct
- [_ {#Symbol ["" struct_name]}]
- (meta#in struct_name)
-
- _
- (failure "Expected all implementations of opening form to be symbols.")))
- structs)
- next+remainder (openings_parser parts')]
- (let [[next remainder] next+remainder]
- (meta#in [{#Item [prefix structs'] next}
- remainder])))
-
- _
- (meta#in [{#End} parts])))
+(def: (referrals_parser aliased?)
+ (-> Bit (Parser (List Referral)))
+ (all eitherP
+ (manyP referral_parser)
+ (afterP endP
+ (inP (if aliased?
+ (list [(symbol ..only) (list)])
+ (list))))
+ (inP (list))))
(def: (text#split_at' at x)
(-> Nat Text [Text Text])
@@ -3582,20 +3620,22 @@
{#None}
(..absolute_module_name nested? relative_root module_name))
- referral+extra (referrals_parser #0 extra)
- .let [[referral extra] referral+extra]
- openings+extra (openings_parser extra)
- .let [[openings extra] openings+extra]
+ extra,referral (case (referrals_parser #0 extra)
+ {#Some extra,referral}
+ (in extra,referral)
+
+ {#None}
+ (failure ""))
+ .let [[extra referral] extra,referral]
sub_imports (imports_parser #1 absolute_module_name context extra)]
- (in (case [referral openings]
- [{#Nothing} {#End}]
+ (in (case referral
+ {#End}
sub_imports
_
(partial_list [#import_name absolute_module_name
#import_alias {#None}
- #import_refer [#refer_defs referral
- #refer_open openings]]
+ #import_referrals referral]
sub_imports))))
(pattern [_ {#Tuple (partial_list [_ {#Text alias}] [_ {#Symbol ["" module_name]}] extra)}])
@@ -3606,21 +3646,23 @@
{#None}
(..absolute_module_name nested? relative_root module_name))
- referral+extra (referrals_parser #1 extra)
- .let [[referral extra] referral+extra]
- openings+extra (openings_parser extra)
- .let [[openings extra] openings+extra
- module_alias (..module_alias {#Item module_name context} alias)]
+ extra,referral (case (referrals_parser #1 extra)
+ {#Some extra,referral}
+ (in extra,referral)
+
+ {#None}
+ (failure ""))
+ .let [[extra referral] extra,referral]
+ .let [module_alias (..module_alias {#Item module_name context} alias)]
sub_imports (imports_parser #1 absolute_module_name {#Item module_alias context} extra)]
- (in (case [referral openings]
- [{#Nothing} {#End}]
+ (in (case referral
+ {#End}
sub_imports
_
(partial_list [#import_name absolute_module_name
#import_alias {#Some module_alias}
- #import_refer [#refer_defs referral
- #refer_open openings]]
+ #import_referrals referral]
sub_imports))))
... Unrecognized syntax.
@@ -3724,9 +3766,10 @@
(case (..parsed (all ..andP
..textP
..textP
+ ..textP
(..someP ..localP))
tokens)
- {.#Some [current_module imported_module actual]}
+ {.#Some [current_module imported_module import_alias actual]}
(do meta_monad
[expected (exported_definitions imported_module)
_ (test_referrals current_module imported_module expected actual)]
@@ -3751,9 +3794,10 @@
(case (..parsed (all ..andP
..textP
..textP
+ ..textP
(..someP ..localP))
tokens)
- {.#Some [current_module imported_module actual]}
+ {.#Some [current_module imported_module import_alias actual]}
(do meta_monad
[expected (exported_definitions imported_module)
_ (test_referrals current_module imported_module expected actual)]
@@ -4059,8 +4103,8 @@
_
(failure "Wrong syntax for the")))
-(def: (open_declaration alias tags my_tag_index [module short] source type)
- (-> Text (List Symbol) Nat Symbol Code Type (Meta (List Code)))
+(def: (open_declaration imported_module alias tags my_tag_index [module short] source type)
+ (-> Text Text (List Symbol) Nat Symbol Code Type (Meta (List Code)))
(do meta_monad
[output (record_slots type)
g!_ (..generated_symbol "g!_")
@@ -4079,44 +4123,100 @@
[decls' (monad#each meta_monad
(is (-> [Nat Symbol Type] (Meta (List Code)))
(function (_ [sub_tag_index sname stype])
- (open_declaration alias tags' sub_tag_index sname source+ stype)))
+ (open_declaration imported_module alias tags' sub_tag_index sname source+ stype)))
(enumeration (zipped_2 tags' members')))]
- (meta#in (list#conjoint decls')))
+ (in (list#conjoint decls')))
_
- (meta#in (list (` ("lux def" (~ (local$ (..module_alias (list short) alias)))
- (~ source+)
- #0)))))))
+ (in (list (` ("lux def" (~ (local$ (..module_alias (list short imported_module) alias)))
+ (~ source+)
+ #0)))))))
-(macro: .public (open: tokens)
- (case tokens
- (pattern (list [_ {#Text alias}] struct))
- (case struct
- [_ {#Symbol struct_name}]
+(def: (implementation_declarations imported_module alias implementation)
+ (-> Text Text Symbol (Meta (List Code)))
+ (do meta_monad
+ [interface (type_definition implementation)
+ output (record_slots interface)]
+ (case output
+ {#Some [slots terms]}
(do meta_monad
- [struct_type (type_definition struct_name)
- output (record_slots struct_type)
- .let [source (symbol$ struct_name)]]
- (case output
- {#Some [tags members]}
- (do meta_monad
- [decls' (monad#each meta_monad (is (-> [Nat Symbol Type] (Meta (List Code)))
- (function (_ [tag_index sname stype])
- (open_declaration alias tags tag_index sname source stype)))
- (enumeration (zipped_2 tags members)))]
- (meta#in (list#conjoint decls')))
-
- _
- (failure (text#composite "Can only 'open:' structs: " (type#encoded struct_type)))))
+ [.let [g!implementation (symbol$ implementation)]
+ declarations (monad#each meta_monad (is (-> [Nat Symbol Type] (Meta (List Code)))
+ (function (_ [index slot_label slot_type])
+ (open_declaration imported_module alias slots index slot_label g!implementation slot_type)))
+ (enumeration (zipped_2 slots terms)))]
+ (in (list#conjoint declarations)))
_
- (do meta_monad
- [g!struct (..generated_symbol "struct")]
- (meta#in (list (` ("lux def" (~ g!struct) (~ struct) #0))
- (` (..open: (~ (text$ alias)) (~ g!struct)))))))
+ (failure (all text#composite
+ "Can only 'open:' structs: " (symbol#encoded implementation)
+ " : " (type#encoded interface))))))
+
+(def: (localized module global)
+ (-> Text Symbol Symbol)
+ (case global
+ ["" local]
+ [module local]
_
- (failure "Wrong syntax for open:")))
+ global))
+
+(macro: .public (open: tokens)
+ (case (..parsed (all ..andP
+ (..maybeP (all ..andP
+ ..textP
+ ..textP
+ ..textP))
+ ..textP
+ (..orP (..manyP ..globalP)
+ (..manyP ..anyP)))
+ tokens)
+ {.#Some [current_module,imported_module,import_alias alias implementations]}
+ (let [[current_module imported_module import_alias]
+ (case current_module,imported_module,import_alias
+ {#Some [current_module imported_module import_alias]}
+ [current_module imported_module import_alias]
+
+ {#None}
+ ["" "" ""])]
+ (case implementations
+ {#Left implementations}
+ (do meta_monad
+ [declarations (|> implementations
+ (list#each (localized imported_module))
+ (monad#each meta_monad (implementation_declarations import_alias alias)))]
+ (in (list#conjoint declarations)))
+
+ {#Right implementations}
+ (do meta_monad
+ [pre_defs,implementations (is (Meta [(List Code) (List Code)])
+ (monad#mix meta_monad
+ (function (_ it [pre_defs implementations])
+ (case it
+ [_ {#Symbol _}]
+ (in [pre_defs
+ {#Item it implementations}])
+
+ _
+ (do meta_monad
+ [g!implementation (..generated_symbol "implementation")]
+ (in [{#Item (` ("lux def" (~ g!implementation) (~ it) #0)) pre_defs}
+ {#Item g!implementation implementations}]))))
+ [(list) (list)]
+ implementations))
+ .let [[pre_defs implementations] pre_defs,implementations]]
+ (in (|> pre_defs
+ {#Item (` (..open:
+ (~ (text$ current_module))
+ (~ (text$ imported_module))
+ (~ (text$ import_alias))
+ (~ (text$ alias))
+ (~+ implementations)))}
+ list#reversed)))))
+
+
+ {.#None}
+ (failure (..wrong_syntax_error (symbol ..open:)))))
(def: (imported_by? import_name module_name)
(-> Text Text (Meta Bit))
@@ -4125,85 +4225,45 @@
.let [[..#module_hash _ ..#module_aliases _ ..#definitions _ ..#imports imports ..#module_state _] module]]
(in (is_member? imports import_name))))
-(def: (referrals module_name options)
- (-> Text (List Code) (Meta Refer))
+(def: (referrals module_name extra)
+ (-> Text (List Code) (Meta (List Referral)))
(do meta_monad
- [referral+options (referrals_parser #0 options)
- .let [[referral options] referral+options]
- openings+options (openings_parser options)
- .let [[openings options] openings+options]
+ [extra,referral (case (referrals_parser #0 extra)
+ {#Some extra,referral}
+ (in extra,referral)
+
+ {#None}
+ (failure ""))
+ .let [[extra referral] extra,referral]
current_module current_module_name]
- (case options
+ (case extra
{#End}
- (in [#refer_defs referral
- #refer_open openings])
+ (in referral)
_
(failure (all text#composite "Wrong syntax for refer @ " current_module
- \n (|> options
+ \n (|> extra
(list#each code#encoded)
(list#interposed " ")
(list#mix text#composite "")))))))
-(def: (referral_definitions module_name [r_defs r_opens])
- (-> Text Refer (Meta (List Code)))
- (do meta_monad
- [current_module ..current_module_name
- .let [test_referrals (is (-> Text (List Text) (List Text) (Meta (List Any)))
- (function (_ module_name all_defs referred_defs)
- (monad#each meta_monad
- (is (-> Text (Meta Any))
- (function (_ _def)
- (if (is_member? all_defs _def)
- (meta#in [])
- (failure (all text#composite _def " is not defined in module " module_name " @ " current_module)))))
- referred_defs)))]
- defs (case r_defs
- {#Nothing}
- (in (list))
-
- {#Referral [macro parameters]}
- (single_expansion (` ((~ (symbol$ macro))
- (~ (text$ current_module))
- (~ (text$ module_name))
- (~+ parameters)))))
- .let [openings (|> r_opens
- (list#each (is (-> Openings (List Code))
- (function (_ [alias structs])
- (list#each (function (_ name)
- (` (open: (~ (text$ alias)) (~ (symbol$ [module_name name])))))
- structs))))
- list#conjoint)]]
- (in (list#composite defs openings))))
-
(macro: (refer tokens)
(case tokens
- (pattern (partial_list [_ {#Text module_name}] options))
+ (pattern (partial_list [_ {#Text imported_module}] [_ {#Text alias}] options))
(do meta_monad
- [=refer (referrals module_name options)]
- (referral_definitions module_name =refer))
+ [referrals (..referrals imported_module options)
+ current_module ..current_module_name]
+ (in (list#each (function (_ [macro parameters])
+ (` ((~ (symbol$ macro))
+ (~ (text$ current_module))
+ (~ (text$ imported_module))
+ (~ (text$ alias))
+ (~+ parameters))))
+ referrals)))
_
(failure "Wrong syntax for refer")))
-(def: (refer_code module_name module_alias' [r_defs r_opens])
- (-> Text (Maybe Text) Refer Code)
- (let [module_alias (..maybe#else module_name module_alias')
- localizations (is (List Code)
- (case r_defs
- {#Nothing}
- (list)
-
- {#Referral [macro parameters]}
- (list (` ((~ (symbol$ macro)) (~+ parameters))))))
- openings (list#each (function (_ [alias structs])
- (form$ (partial_list (text$ (..module_alias (list (alias_stand_in 0) module_alias) alias))
- (list#each local$ structs))))
- r_opens)]
- (` ((~! ..refer) (~ (text$ module_name))
- (~+ localizations)
- (~+ openings)))))
-
(macro: .public (# tokens)
(case tokens
(pattern (list struct [_ {#Symbol member}]))
@@ -4891,6 +4951,15 @@
(failure (..wrong_syntax_error (symbol ..$))))))
(these (def: .public parameter "")))
+(def: (refer_code imported_module alias referrals)
+ (-> Text Text (List Referral) Code)
+ (` ((~! ..refer)
+ (~ (text$ imported_module))
+ (~ (text$ alias))
+ (~+ (list#each (function (_ [macro parameters])
+ (` ((~ (symbol$ macro)) (~+ parameters))))
+ referrals)))))
+
(macro: .public (using _imports)
(do meta_monad
[current_module ..current_module_name
@@ -4902,7 +4971,7 @@
tuple$)
=refers (list#each (is (-> Importation Code)
(function (_ [module_name m_alias =refer])
- (refer_code module_name m_alias =refer)))
+ (refer_code module_name (..maybe#else "" m_alias) =refer)))
imports)
=module (` ("lux def module" (~ =imports)))]
g!_ (..generated_symbol "")]
diff --git a/stdlib/source/library/lux/abstract/comonad.lux b/stdlib/source/library/lux/abstract/comonad.lux
index 2660ba081..5bb928e6a 100644
--- a/stdlib/source/library/lux/abstract/comonad.lux
+++ b/stdlib/source/library/lux/abstract/comonad.lux
@@ -3,7 +3,7 @@
[lux (.except)
[data
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/abstract/monad/indexed.lux b/stdlib/source/library/lux/abstract/monad/indexed.lux
index ad28a2649..0894b4021 100644
--- a/stdlib/source/library/lux/abstract/monad/indexed.lux
+++ b/stdlib/source/library/lux/abstract/monad/indexed.lux
@@ -6,7 +6,7 @@
["<[0]>" code (.only Parser)]]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
["[0]" code]]]]
diff --git a/stdlib/source/library/lux/control/concatenative.lux b/stdlib/source/library/lux/control/concatenative.lux
index e53790026..a10e6e906 100644
--- a/stdlib/source/library/lux/control/concatenative.lux
+++ b/stdlib/source/library/lux/control/concatenative.lux
@@ -5,12 +5,12 @@
[abstract
["[0]" monad]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]]
[data
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix functor)]]]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]]]
["[0]" macro (.only with_symbols)
["[0]" code]
["[0]" template]
@@ -23,7 +23,7 @@
["r" rev]
["f" frac]]]]]
[//
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]])
(type: Alias
diff --git a/stdlib/source/library/lux/control/concurrency/actor.lux b/stdlib/source/library/lux/control/concurrency/actor.lux
index 17d986c44..b1d80473c 100644
--- a/stdlib/source/library/lux/control/concurrency/actor.lux
+++ b/stdlib/source/library/lux/control/concurrency/actor.lux
@@ -10,7 +10,7 @@
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
["[0]" io (.only IO io)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" bit]
@@ -18,7 +18,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monoid monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
["[0]" macro (.only with_symbols)
["[0]" code]
[syntax (.only syntax:)
@@ -32,7 +32,7 @@
["[0]" primitive (.only primitive: representation abstraction)]]]]
[//
["[0]" atom (.only Atom atom)]
- ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)]
+ ["[0]" async (.only Async Resolver) (.open: "[1]#[0]" monad)]
["[0]" frp (.only Channel Channel')]])
(exception: .public poisoned)
diff --git a/stdlib/source/library/lux/control/concurrency/async.lux b/stdlib/source/library/lux/control/concurrency/async.lux
index 430637d8b..6fff72d48 100644
--- a/stdlib/source/library/lux/control/concurrency/async.lux
+++ b/stdlib/source/library/lux/control/concurrency/async.lux
@@ -9,7 +9,7 @@
["[0]" pipe]
["[0]" function]
["[0]" io (.only IO io)]
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" product]]
[macro
diff --git a/stdlib/source/library/lux/control/concurrency/atom.lux b/stdlib/source/library/lux/control/concurrency/atom.lux
index da13c860d..ba861725f 100644
--- a/stdlib/source/library/lux/control/concurrency/atom.lux
+++ b/stdlib/source/library/lux/control/concurrency/atom.lux
@@ -7,7 +7,7 @@
[monad (.only do)]]
[control
["[0]" function]
- ["[0]" io (.only IO) ("[1]#[0]" functor)]]
+ ["[0]" io (.only IO) (.open: "[1]#[0]" functor)]]
[data
["[0]" product]
[collection
diff --git a/stdlib/source/library/lux/control/concurrency/frp.lux b/stdlib/source/library/lux/control/concurrency/frp.lux
index a4b99b6f4..252b8f0ce 100644
--- a/stdlib/source/library/lux/control/concurrency/frp.lux
+++ b/stdlib/source/library/lux/control/concurrency/frp.lux
@@ -7,7 +7,7 @@
[apply (.only Apply)]
["[0]" monad (.only Monad do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
["[0]" io (.only IO io)]]
@@ -15,7 +15,7 @@
["[0]" variance (.only Mutable)]]]]
[//
["[0]" atom (.only Atom)]
- ["[0]" async (.only Async Async') ("[1]#[0]" monad)]])
+ ["[0]" async (.only Async Async') (.open: "[1]#[0]" monad)]])
(type: .public (Channel'' a)
(Async (Maybe [a (Channel'' a)])))
diff --git a/stdlib/source/library/lux/control/exception.lux b/stdlib/source/library/lux/control/exception.lux
index 34bdd22c2..7aed1de63 100644
--- a/stdlib/source/library/lux/control/exception.lux
+++ b/stdlib/source/library/lux/control/exception.lux
@@ -7,13 +7,13 @@
[monad (.only do)]]
[control
["[0]" maybe]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" monoid)]
+ ["[0]" text (.open: "[1]#[0]" monoid)]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["[0]" code]
[syntax (.only syntax:)
@@ -22,7 +22,7 @@
["|[1]_[0]|" variable]]]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]]]]]
+ ["n" nat (.open: "[1]#[0]" decimal)]]]]]
[//
["//" try (.only Try)]])
diff --git a/stdlib/source/library/lux/control/function/inline.lux b/stdlib/source/library/lux/control/function/inline.lux
index 38e1c795f..ac13d65df 100644
--- a/stdlib/source/library/lux/control/function/inline.lux
+++ b/stdlib/source/library/lux/control/function/inline.lux
@@ -9,7 +9,7 @@
["<[0]>" code (.only Parser)]]]
[data
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
["[0]" macro (.only)
["[0]" code]
[syntax (.only syntax:)
diff --git a/stdlib/source/library/lux/control/function/mutual.lux b/stdlib/source/library/lux/control/function/mutual.lux
index 65b8b9a6b..03ea12a04 100644
--- a/stdlib/source/library/lux/control/function/mutual.lux
+++ b/stdlib/source/library/lux/control/function/mutual.lux
@@ -7,14 +7,14 @@
[control
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
[dictionary
["[0]" plist (.only PList)]]]]
["[0]" macro (.only)
diff --git a/stdlib/source/library/lux/control/parser.lux b/stdlib/source/library/lux/control/parser.lux
index 052f89a98..c842910c7 100644
--- a/stdlib/source/library/lux/control/parser.lux
+++ b/stdlib/source/library/lux/control/parser.lux
@@ -11,7 +11,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
[math
[number
["n" nat]]]]])
diff --git a/stdlib/source/library/lux/control/parser/analysis.lux b/stdlib/source/library/lux/control/parser/analysis.lux
index d6fb20e2b..60b8edb63 100644
--- a/stdlib/source/library/lux/control/parser/analysis.lux
+++ b/stdlib/source/library/lux/control/parser/analysis.lux
@@ -11,7 +11,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/library/lux/control/parser/binary.lux b/stdlib/source/library/lux/control/parser/binary.lux
index e566a58a5..f9871b53b 100644
--- a/stdlib/source/library/lux/control/parser/binary.lux
+++ b/stdlib/source/library/lux/control/parser/binary.lux
@@ -29,7 +29,7 @@
[number
["n" nat]
["[0]" frac]]]]]
- ["[0]" // ("[1]#[0]" monad)])
+ ["[0]" // (.open: "[1]#[0]" monad)])
(type: .public Offset
Nat)
diff --git a/stdlib/source/library/lux/control/parser/cli.lux b/stdlib/source/library/lux/control/parser/cli.lux
index 31ff5bef0..74b184d05 100644
--- a/stdlib/source/library/lux/control/parser/cli.lux
+++ b/stdlib/source/library/lux/control/parser/cli.lux
@@ -6,7 +6,7 @@
[control
["[0]" try (.only Try)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]]]
["[0]" //])
diff --git a/stdlib/source/library/lux/control/parser/code.lux b/stdlib/source/library/lux/control/parser/code.lux
index 4ab009d74..8ac364a2a 100644
--- a/stdlib/source/library/lux/control/parser/code.lux
+++ b/stdlib/source/library/lux/control/parser/code.lux
@@ -7,11 +7,11 @@
["[0]" try (.only Try)]]
[data
["[0]" bit]
- ["[0]" text ("[1]#[0]" monoid)]
+ ["[0]" text (.open: "[1]#[0]" monoid)]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
- ["[0]" code ("[1]#[0]" equivalence)]]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]]
[math
[number
["[0]" nat]
diff --git a/stdlib/source/library/lux/control/parser/json.lux b/stdlib/source/library/lux/control/parser/json.lux
index 874833004..61bad3146 100644
--- a/stdlib/source/library/lux/control/parser/json.lux
+++ b/stdlib/source/library/lux/control/parser/json.lux
@@ -8,9 +8,9 @@
["[0]" exception (.only exception:)]]
[data
["[0]" bit]
- ["[0]" text ("[1]#[0]" equivalence monoid)]
+ ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]
["[0]" dictionary (.only Dictionary)]]
[format
@@ -20,7 +20,7 @@
[math
[number
["[0]" frac]]]]]
- ["[0]" // ("[1]#[0]" functor)])
+ ["[0]" // (.open: "[1]#[0]" functor)])
(type: .public (Parser a)
(//.Parser (List JSON) a))
diff --git a/stdlib/source/library/lux/control/parser/text.lux b/stdlib/source/library/lux/control/parser/text.lux
index 7cc34c955..4b8ab6e24 100644
--- a/stdlib/source/library/lux/control/parser/text.lux
+++ b/stdlib/source/library/lux/control/parser/text.lux
@@ -8,17 +8,17 @@
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]]
[data
- ["/" text (.only Char) ("[1]#[0]" monoid)]
+ ["/" text (.only Char) (.open: "[1]#[0]" monoid)]
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[macro
["^" pattern]
["[0]" code]
["[0]" template]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]]]]]
+ ["n" nat (.open: "[1]#[0]" decimal)]]]]]
["[0]" //])
(type: .public Offset
diff --git a/stdlib/source/library/lux/control/parser/type.lux b/stdlib/source/library/lux/control/parser/type.lux
index cbb4884b9..944e687c7 100644
--- a/stdlib/source/library/lux/control/parser/type.lux
+++ b/stdlib/source/library/lux/control/parser/type.lux
@@ -8,18 +8,18 @@
["[0]" exception (.only exception:)]
["[0]" function]]
[data
- ["[0]" text ("[1]#[0]" monoid)
+ ["[0]" text (.open: "[1]#[0]" monoid)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["^" pattern]
["[0]" code]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["n" nat (.open: "[1]#[0]" decimal)]]]
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check]]]]
["[0]" //])
diff --git a/stdlib/source/library/lux/control/parser/xml.lux b/stdlib/source/library/lux/control/parser/xml.lux
index 36b62f782..6853965af 100644
--- a/stdlib/source/library/lux/control/parser/xml.lux
+++ b/stdlib/source/library/lux/control/parser/xml.lux
@@ -4,7 +4,7 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]]
[data
["[0]" text
@@ -15,7 +15,7 @@
[format
["/" xml (.only Attribute Attrs Tag XML)]]]
[meta
- ["[0]" symbol ("[1]#[0]" equivalence codec)]]]]
+ ["[0]" symbol (.open: "[1]#[0]" equivalence codec)]]]]
["[0]" //])
(type: .public (Parser a)
diff --git a/stdlib/source/library/lux/control/pipe.lux b/stdlib/source/library/lux/control/pipe.lux
index 4e352584c..4f5e3298c 100644
--- a/stdlib/source/library/lux/control/pipe.lux
+++ b/stdlib/source/library/lux/control/pipe.lux
@@ -10,7 +10,7 @@
[data
["[0]" identity]
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
[macro (.only with_symbols)
[syntax (.only syntax:)]
["[0]" code]]
diff --git a/stdlib/source/library/lux/control/region.lux b/stdlib/source/library/lux/control/region.lux
index 86bddcfac..f744c5cef 100644
--- a/stdlib/source/library/lux/control/region.lux
+++ b/stdlib/source/library/lux/control/region.lux
@@ -11,7 +11,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]]]
[//
["[0]" exception (.only Exception exception:)]])
diff --git a/stdlib/source/library/lux/control/remember.lux b/stdlib/source/library/lux/control/remember.lux
index e19b39036..4f4bd74f2 100644
--- a/stdlib/source/library/lux/control/remember.lux
+++ b/stdlib/source/library/lux/control/remember.lux
@@ -7,14 +7,14 @@
["[0]" io]
["[0]" try]
["[0]" exception (.only exception:)]
- ["<>" parser ("[1]#[0]" functor)
+ ["<>" parser (.open: "[1]#[0]" functor)
["<c>" code (.only Parser)]]]
[data
["[0]" text
["%" format (.only format)]]]
[time
["[0]" instant]
- ["[0]" date (.only Date) ("[1]#[0]" order)]]
+ ["[0]" date (.only Date) (.open: "[1]#[0]" order)]]
["[0]" meta]
[macro
["[0]" code]
diff --git a/stdlib/source/library/lux/control/security/capability.lux b/stdlib/source/library/lux/control/security/capability.lux
index 3317a8f15..82b7a9a86 100644
--- a/stdlib/source/library/lux/control/security/capability.lux
+++ b/stdlib/source/library/lux/control/security/capability.lux
@@ -13,7 +13,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[type
[primitive (.except)]]
["[0]" meta]
diff --git a/stdlib/source/library/lux/data/collection/bits.lux b/stdlib/source/library/lux/data/collection/bits.lux
index b2ef8d6f2..e9b659d3a 100644
--- a/stdlib/source/library/lux/data/collection/bits.lux
+++ b/stdlib/source/library/lux/data/collection/bits.lux
@@ -8,7 +8,7 @@
["[0]" maybe]]
[data
[collection
- ["[0]" array (.only Array) ("[1]#[0]" mix)]]]
+ ["[0]" array (.only Array) (.open: "[1]#[0]" mix)]]]
[math
[number
["n" nat]
diff --git a/stdlib/source/library/lux/data/collection/dictionary.lux b/stdlib/source/library/lux/data/collection/dictionary.lux
index 7f30db024..5fc1d3ebb 100644
--- a/stdlib/source/library/lux/data/collection/dictionary.lux
+++ b/stdlib/source/library/lux/data/collection/dictionary.lux
@@ -13,7 +13,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" mix functor monoid)]
+ ["[0]" list (.open: "[1]#[0]" mix functor monoid)]
["[0]" array
["[1]" \\unsafe (.only Array)]]]]
[macro
diff --git a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux
index 16361edf6..46889f723 100644
--- a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux
+++ b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux
@@ -10,7 +10,7 @@
[data
["p" product]
[collection
- ["[0]" list ("[1]#[0]" monoid mix)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid mix)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/library/lux/data/collection/dictionary/plist.lux b/stdlib/source/library/lux/data/collection/dictionary/plist.lux
index 1c5528026..1d7c385c2 100644
--- a/stdlib/source/library/lux/data/collection/dictionary/plist.lux
+++ b/stdlib/source/library/lux/data/collection/dictionary/plist.lux
@@ -5,12 +5,12 @@
[equivalence (.only Equivalence)]
[monoid (.only Monoid)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
[number
["n" nat]]]]])
diff --git a/stdlib/source/library/lux/data/collection/queue.lux b/stdlib/source/library/lux/data/collection/queue.lux
index bde5d6525..103e38506 100644
--- a/stdlib/source/library/lux/data/collection/queue.lux
+++ b/stdlib/source/library/lux/data/collection/queue.lux
@@ -6,7 +6,7 @@
[functor (.only Functor)]]
[data
[collection
- ["[0]" list ("[1]#[0]" monoid functor)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid functor)]]]
[math
[number
["n" nat]]]]])
diff --git a/stdlib/source/library/lux/data/collection/queue/priority.lux b/stdlib/source/library/lux/data/collection/queue/priority.lux
index 98c9734fb..7ff7d3195 100644
--- a/stdlib/source/library/lux/data/collection/queue/priority.lux
+++ b/stdlib/source/library/lux/data/collection/queue/priority.lux
@@ -12,7 +12,7 @@
["[1]" finger (.only Tree)]]]]
[math
[number
- ["n" nat ("[1]#[0]" interval)]]]
+ ["n" nat (.open: "[1]#[0]" interval)]]]
[type (.only by_example)
[primitive (.only primitive: abstraction representation)]]]])
diff --git a/stdlib/source/library/lux/data/collection/sequence.lux b/stdlib/source/library/lux/data/collection/sequence.lux
index 065bb8941..2c8fdadaa 100644
--- a/stdlib/source/library/lux/data/collection/sequence.lux
+++ b/stdlib/source/library/lux/data/collection/sequence.lux
@@ -14,7 +14,7 @@
[mix (.only Mix)]
[predicate (.only Predicate)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
["<>" parser (.only)
@@ -22,7 +22,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" mix functor monoid)]
+ ["[0]" list (.open: "[1]#[0]" mix functor monoid)]
["[0]" array
["[1]" \\unsafe (.only Array)]]]]
[macro
diff --git a/stdlib/source/library/lux/data/collection/set.lux b/stdlib/source/library/lux/data/collection/set.lux
index 4d9e696d9..bd82175ab 100644
--- a/stdlib/source/library/lux/data/collection/set.lux
+++ b/stdlib/source/library/lux/data/collection/set.lux
@@ -8,7 +8,7 @@
[monoid (.only Monoid)]]
[data
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/library/lux/data/collection/set/multi.lux b/stdlib/source/library/lux/data/collection/set/multi.lux
index 377ee54fd..30ca10e23 100644
--- a/stdlib/source/library/lux/data/collection/set/multi.lux
+++ b/stdlib/source/library/lux/data/collection/set/multi.lux
@@ -17,7 +17,7 @@
["[0]" primitive (.only primitive: abstraction representation)]]]]
["[0]" // (.only)
[//
- ["[0]" list ("[1]#[0]" mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" mix monoid)]
["[0]" dictionary (.only Dictionary)]]])
(primitive: .public (Set a)
diff --git a/stdlib/source/library/lux/data/collection/set/ordered.lux b/stdlib/source/library/lux/data/collection/set/ordered.lux
index 45ab47ef6..f55418053 100644
--- a/stdlib/source/library/lux/data/collection/set/ordered.lux
+++ b/stdlib/source/library/lux/data/collection/set/ordered.lux
@@ -6,7 +6,7 @@
[order (.only Order)]]
[data
[collection
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
[dictionary
["/" ordered]]]]
[type
diff --git a/stdlib/source/library/lux/data/collection/stream.lux b/stdlib/source/library/lux/data/collection/stream.lux
index d62f1f23c..ac6a8c50e 100644
--- a/stdlib/source/library/lux/data/collection/stream.lux
+++ b/stdlib/source/library/lux/data/collection/stream.lux
@@ -11,7 +11,7 @@
[data
["[0]" bit]
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
[macro (.only with_symbols)
[syntax (.only syntax:)]
["[0]" code]]
diff --git a/stdlib/source/library/lux/data/collection/tree.lux b/stdlib/source/library/lux/data/collection/tree.lux
index 28d6f283b..f7dfcf617 100644
--- a/stdlib/source/library/lux/data/collection/tree.lux
+++ b/stdlib/source/library/lux/data/collection/tree.lux
@@ -11,7 +11,7 @@
["<[0]>" code (.only Parser)]]]
[data
[collection
- ["[0]" list ("[1]#[0]" monad mix)]]]
+ ["[0]" list (.open: "[1]#[0]" monad mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" code]]]])
diff --git a/stdlib/source/library/lux/data/collection/tree/finger.lux b/stdlib/source/library/lux/data/collection/tree/finger.lux
index a147973fe..1e2b87d25 100644
--- a/stdlib/source/library/lux/data/collection/tree/finger.lux
+++ b/stdlib/source/library/lux/data/collection/tree/finger.lux
@@ -6,7 +6,7 @@
["[0]" monoid (.only Monoid)]]
[data
[collection
- ["[0]" list ("[1]#[0]" monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]
[type
[primitive (.only primitive: abstraction representation)]]]])
diff --git a/stdlib/source/library/lux/data/collection/tree/zipper.lux b/stdlib/source/library/lux/data/collection/tree/zipper.lux
index 713fa19c6..33bc9b1b6 100644
--- a/stdlib/source/library/lux/data/collection/tree/zipper.lux
+++ b/stdlib/source/library/lux/data/collection/tree/zipper.lux
@@ -8,14 +8,14 @@
[monad (.only do)]
[equivalence (.only Equivalence)]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]]
[data
["[0]" product]
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]]]]]
- ["[0]" // (.only Tree) ("[1]#[0]" functor)])
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]]]
+ ["[0]" // (.only Tree) (.open: "[1]#[0]" functor)])
(type: (Family Zipper a)
(Record
diff --git a/stdlib/source/library/lux/data/color.lux b/stdlib/source/library/lux/data/color.lux
index e18ee549c..ebc8f8371 100644
--- a/stdlib/source/library/lux/data/color.lux
+++ b/stdlib/source/library/lux/data/color.lux
@@ -7,13 +7,13 @@
["[0]" hash (.only Hash)]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]
["f" frac]
["[0]" int]
- ["[0]" rev ("[1]#[0]" interval)]
+ ["[0]" rev (.open: "[1]#[0]" interval)]
["[0]" i64]]]
[type
[primitive (.except)]]]])
diff --git a/stdlib/source/library/lux/data/format/binary.lux b/stdlib/source/library/lux/data/format/binary.lux
index 860448136..c1c4707cc 100644
--- a/stdlib/source/library/lux/data/format/binary.lux
+++ b/stdlib/source/library/lux/data/format/binary.lux
@@ -9,7 +9,7 @@
[control
["[0]" pipe]
["[0]" function]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["</>" binary (.only Offset Size Parser)]]]
[data
["/" binary
@@ -21,7 +21,7 @@
["[0]" utf8]]]
[collection
["[0]" list]
- ["[0]" sequence (.only Sequence) ("[1]#[0]" functor)]
+ ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" functor)]
["[0]" set (.only Set)]
[array
[\\unsafe (.only)]]]]
diff --git a/stdlib/source/library/lux/data/format/css.lux b/stdlib/source/library/lux/data/format/css.lux
index ee8b19f0c..093cc785f 100644
--- a/stdlib/source/library/lux/data/format/css.lux
+++ b/stdlib/source/library/lux/data/format/css.lux
@@ -8,7 +8,7 @@
["%" format (.only format)]
["[0]" encoding (.only Encoding)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["[0]" nat]]]
diff --git a/stdlib/source/library/lux/data/format/css/class.lux b/stdlib/source/library/lux/data/format/css/class.lux
index 5bb68fb2e..6a9ab5e90 100644
--- a/stdlib/source/library/lux/data/format/css/class.lux
+++ b/stdlib/source/library/lux/data/format/css/class.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]]]
[macro
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/data/format/css/id.lux b/stdlib/source/library/lux/data/format/css/id.lux
index bc11c304d..5de67ed56 100644
--- a/stdlib/source/library/lux/data/format/css/id.lux
+++ b/stdlib/source/library/lux/data/format/css/id.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]]]
[macro
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/data/format/css/style.lux b/stdlib/source/library/lux/data/format/css/style.lux
index 291d13dd8..4b1f26590 100644
--- a/stdlib/source/library/lux/data/format/css/style.lux
+++ b/stdlib/source/library/lux/data/format/css/style.lux
@@ -5,7 +5,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[type
[primitive (.except)]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/data/format/css/value.lux b/stdlib/source/library/lux/data/format/css/value.lux
index 36ee8de22..07369e1dc 100644
--- a/stdlib/source/library/lux/data/format/css/value.lux
+++ b/stdlib/source/library/lux/data/format/css/value.lux
@@ -11,7 +11,7 @@
["[0]" text
["%" format (.only Format format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
[syntax (.only syntax:)]
["[0]" template]
diff --git a/stdlib/source/library/lux/data/format/html.lux b/stdlib/source/library/lux/data/format/html.lux
index d42afc3c4..44ff23595 100644
--- a/stdlib/source/library/lux/data/format/html.lux
+++ b/stdlib/source/library/lux/data/format/html.lux
@@ -3,13 +3,13 @@
[lux (.except Meta Source comment and template)
[control
["[0]" function]
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" product]
["[0]" text
["%" format (.only Format format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["[0]" template]]
[target
diff --git a/stdlib/source/library/lux/data/format/json.lux b/stdlib/source/library/lux/data/format/json.lux
index c2f8d2ef1..14127b8ef 100644
--- a/stdlib/source/library/lux/data/format/json.lux
+++ b/stdlib/source/library/lux/data/format/json.lux
@@ -11,16 +11,16 @@
["[0]" pipe]
["[0]" maybe]
["[0]" try (.only Try)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" text (.only Parser)]
["<[0]>" code]]]
[data
["[0]" bit]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence monoid)]
+ ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
[collection
- ["[0]" list ("[1]#[0]" mix functor)]
- ["[0]" sequence (.only Sequence sequence) ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]
+ ["[0]" sequence (.only Sequence sequence) (.open: "[1]#[0]" monad)]
["[0]" dictionary (.only Dictionary)]]]
[macro
[syntax (.only syntax:)]
@@ -29,7 +29,7 @@
[math
[number
["n" nat]
- ["f" frac ("[1]#[0]" decimal)]]]]])
+ ["f" frac (.open: "[1]#[0]" decimal)]]]]])
(template [<name> <type>]
[(type: .public <name>
diff --git a/stdlib/source/library/lux/data/format/markdown.lux b/stdlib/source/library/lux/data/format/markdown.lux
index db33dd5ab..4982a2b63 100644
--- a/stdlib/source/library/lux/data/format/markdown.lux
+++ b/stdlib/source/library/lux/data/format/markdown.lux
@@ -5,7 +5,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[type
[primitive (.except)]]
[world
diff --git a/stdlib/source/library/lux/data/format/tar.lux b/stdlib/source/library/lux/data/format/tar.lux
index e671de780..9dd84b4e8 100644
--- a/stdlib/source/library/lux/data/format/tar.lux
+++ b/stdlib/source/library/lux/data/format/tar.lux
@@ -19,10 +19,10 @@
[encoding
["[0]" utf8]]]
["[0]" format
- ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]]
+ ["[1]" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
[collection
- ["[0]" list ("[1]#[0]" mix)]
- ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
+ ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]
[array
[\\unsafe (.only)]]]]
[macro
diff --git a/stdlib/source/library/lux/data/format/xml.lux b/stdlib/source/library/lux/data/format/xml.lux
index b7877bdbe..89a8eccad 100644
--- a/stdlib/source/library/lux/data/format/xml.lux
+++ b/stdlib/source/library/lux/data/format/xml.lux
@@ -7,20 +7,20 @@
[codec (.only Codec)]]
[control
[try (.only Try)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" text (.only Parser Slice)]]]
[data
["[0]" product]
- ["[0]" text (.only \n) ("[1]#[0]" equivalence monoid)]
+ ["[0]" text (.only \n) (.open: "[1]#[0]" equivalence monoid)]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]
[math
[number
["n" nat]
["[0]" int]]]
[meta
- ["[0]" symbol ("[1]#[0]" equivalence codec)]]]])
+ ["[0]" symbol (.open: "[1]#[0]" equivalence codec)]]]])
(type: .public Tag
Symbol)
diff --git a/stdlib/source/library/lux/data/text.lux b/stdlib/source/library/lux/data/text.lux
index fde7cd9f8..ecc17837e 100644
--- a/stdlib/source/library/lux/data/text.lux
+++ b/stdlib/source/library/lux/data/text.lux
@@ -13,7 +13,7 @@
["[0]" maybe]]
[data
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/library/lux/data/text/buffer.lux b/stdlib/source/library/lux/data/text/buffer.lux
index a53e60f77..5658dcddb 100644
--- a/stdlib/source/library/lux/data/text/buffer.lux
+++ b/stdlib/source/library/lux/data/text/buffer.lux
@@ -11,7 +11,7 @@
["%" format (.only format)]]
[collection
["[0]" array]
- ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]]]
+ ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/data/text/format.lux b/stdlib/source/library/lux/data/text/format.lux
index 87e258477..c6dac322e 100644
--- a/stdlib/source/library/lux/data/text/format.lux
+++ b/stdlib/source/library/lux/data/text/format.lux
@@ -15,7 +15,7 @@
["[0]" xml]
["[0]" json]]
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
["[0]" time (.only)
["[0]" instant]
["[0]" duration]
diff --git a/stdlib/source/library/lux/data/text/regex.lux b/stdlib/source/library/lux/data/text/regex.lux
index f9e57e97f..af653dbdf 100644
--- a/stdlib/source/library/lux/data/text/regex.lux
+++ b/stdlib/source/library/lux/data/text/regex.lux
@@ -8,20 +8,20 @@
["[0]" maybe]
["[0]" try]
["[0]" exception (.only exception:)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" text (.only Parser)]
["<[0]>" code]]]
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" mix monad)]]]
+ ["[0]" list (.open: "[1]#[0]" mix monad)]]]
[macro (.only with_symbols)
[syntax (.only syntax:)]
["^" pattern]
["[0]" code]]
[math
[number (.only hex)
- ["n" nat ("[1]#[0]" decimal)]]]]]
+ ["n" nat (.open: "[1]#[0]" decimal)]]]]]
["[0]" // (.only)
["%" format (.only format)]])
diff --git a/stdlib/source/library/lux/data/text/unicode/block.lux b/stdlib/source/library/lux/data/text/unicode/block.lux
index f2c315dfa..45729b8ba 100644
--- a/stdlib/source/library/lux/data/text/unicode/block.lux
+++ b/stdlib/source/library/lux/data/text/unicode/block.lux
@@ -8,7 +8,7 @@
["[0]" interval (.only Interval)]]
[math
[number (.only hex)
- ["n" nat ("[1]#[0]" interval)]
+ ["n" nat (.open: "[1]#[0]" interval)]
["[0]" i64]]]
[type
[primitive (.except)]]]]
diff --git a/stdlib/source/library/lux/data/text/unicode/set.lux b/stdlib/source/library/lux/data/text/unicode/set.lux
index aa166bb5b..58730c36f 100644
--- a/stdlib/source/library/lux/data/text/unicode/set.lux
+++ b/stdlib/source/library/lux/data/text/unicode/set.lux
@@ -5,8 +5,8 @@
[equivalence (.only Equivalence)]]
[data
[collection
- ["[0]" list ("[1]#[0]" mix functor)]
- ["[0]" set ("[1]#[0]" equivalence)]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]
+ ["[0]" set (.open: "[1]#[0]" equivalence)]
["[0]" tree
["[1]" finger (.only Tree)]]]]
[type (.only by_example)
diff --git a/stdlib/source/library/lux/debug.lux b/stdlib/source/library/lux/debug.lux
index 3ec9155fa..765cb6079 100644
--- a/stdlib/source/library/lux/debug.lux
+++ b/stdlib/source/library/lux/debug.lux
@@ -23,7 +23,7 @@
["[0]" json]]
[collection
["[0]" array]
- ["[0]" list ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" monad)]
["[0]" dictionary]]]
[macro
["^" pattern]
diff --git a/stdlib/source/library/lux/documentation.lux b/stdlib/source/library/lux/documentation.lux
index f39019bfd..f71f812df 100644
--- a/stdlib/source/library/lux/documentation.lux
+++ b/stdlib/source/library/lux/documentation.lux
@@ -2,21 +2,21 @@
[library
[lux (.except Definition Module type)
["[0]" meta]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
[monad (.only do)]
["[0]" enum]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text (.only \n) ("[1]#[0]" order)
+ ["[0]" text (.only \n) (.open: "[1]#[0]" order)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" monad mix monoid)]
["[0]" set (.only Set)]
["[0]" stream (.only Stream)]]
[format
diff --git a/stdlib/source/library/lux/extension.lux b/stdlib/source/library/lux/extension.lux
index 5a61520e6..4ad6c5592 100644
--- a/stdlib/source/library/lux/extension.lux
+++ b/stdlib/source/library/lux/extension.lux
@@ -4,14 +4,14 @@
[abstract
["[0]" monad]]
[control
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<c>" code (.only Parser)]
["<a>" analysis]
["<s>" synthesis]]]
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro (.only with_symbols)
[syntax (.only syntax:)]
["[0]" code]]
diff --git a/stdlib/source/library/lux/ffi.jvm.lux b/stdlib/source/library/lux/ffi.jvm.lux
index 5d53095cf..6f22bfb29 100644
--- a/stdlib/source/library/lux/ffi.jvm.lux
+++ b/stdlib/source/library/lux/ffi.jvm.lux
@@ -9,15 +9,15 @@
["[0]" maybe]
["[0]" try (.only Try)]
["[0]" exception (.only Exception exception:)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" array]
- ["[0]" list ("[1]#[0]" monad mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" monad mix monoid)]
["[0]" dictionary (.only Dictionary)]]]
[macro (.only with_symbols)
[syntax (.only syntax:)]
@@ -35,7 +35,7 @@
["[0]" signature]
["[0]" reflection]
["[0]" parser]]]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check]]]])
(def: internal
diff --git a/stdlib/source/library/lux/ffi.lux b/stdlib/source/library/lux/ffi.lux
index ca7616417..2ad70d784 100644
--- a/stdlib/source/library/lux/ffi.lux
+++ b/stdlib/source/library/lux/ffi.lux
@@ -7,15 +7,15 @@
[monad (.only do)]]
[control
["[0]" io]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["<>" parser ("[1]#[0]" monad)
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" monad mix)]]]
+ ["[0]" list (.open: "[1]#[0]" monad mix)]]]
["[0]" macro (.only with_symbols)
[syntax (.only syntax:)]
["[0]" code]
diff --git a/stdlib/source/library/lux/ffi.old.lux b/stdlib/source/library/lux/ffi.old.lux
index 19f5b8a9f..596d588e2 100644
--- a/stdlib/source/library/lux/ffi.old.lux
+++ b/stdlib/source/library/lux/ffi.old.lux
@@ -1,7 +1,7 @@
(.using
[library
[lux (.except is as type)
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
["[0]" monad (.only Monad do)]
["[0]" enum]]
@@ -14,12 +14,12 @@
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" codec)]
- ["[0]" text ("[1]#[0]" equivalence monoid)
+ ["[0]" bit (.open: "[1]#[0]" codec)]
+ ["[0]" text (.open: "[1]#[0]" equivalence monoid)
["%" format (.only format)]]
[collection
["[0]" array (.only Array)]
- ["[0]" list ("[1]#[0]" monad mix monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" monad mix monoid)]]]
["[0]" macro (.only with_symbols)
[syntax (.only syntax:)]
["^" pattern]
diff --git a/stdlib/source/library/lux/ffi.php.lux b/stdlib/source/library/lux/ffi.php.lux
index 2bfb31b5d..2f7350849 100644
--- a/stdlib/source/library/lux/ffi.php.lux
+++ b/stdlib/source/library/lux/ffi.php.lux
@@ -8,14 +8,14 @@
[control
["[0]" io]
["[0]" maybe]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
["[0]" text
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[type
abstract]
[macro (.only with_symbols)
diff --git a/stdlib/source/library/lux/ffi.scm.lux b/stdlib/source/library/lux/ffi.scm.lux
index 0cf11daab..6903adb4c 100644
--- a/stdlib/source/library/lux/ffi.scm.lux
+++ b/stdlib/source/library/lux/ffi.scm.lux
@@ -8,14 +8,14 @@
[control
["[0]" io]
["[0]" maybe]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[type
abstract]
[macro (.only with_symbols)
diff --git a/stdlib/source/library/lux/ffi/export.js.lux b/stdlib/source/library/lux/ffi/export.js.lux
index e93309e39..ac23e6b6b 100644
--- a/stdlib/source/library/lux/ffi/export.js.lux
+++ b/stdlib/source/library/lux/ffi/export.js.lux
@@ -13,7 +13,7 @@
[text
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" monad mix)]
+ ["[0]" list (.open: "[1]#[0]" monad mix)]
["[0]" set]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/export.jvm.lux b/stdlib/source/library/lux/ffi/export.jvm.lux
index 17750a864..fea7a2239 100644
--- a/stdlib/source/library/lux/ffi/export.jvm.lux
+++ b/stdlib/source/library/lux/ffi/export.jvm.lux
@@ -6,7 +6,7 @@
["<[0]>" code (.only Parser)]]]
[data
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
[macro
[syntax (.only syntax:)]
["[0]" code]]]]
diff --git a/stdlib/source/library/lux/ffi/export.lua.lux b/stdlib/source/library/lux/ffi/export.lua.lux
index f4c6fc8d8..adcb632ab 100644
--- a/stdlib/source/library/lux/ffi/export.lua.lux
+++ b/stdlib/source/library/lux/ffi/export.lua.lux
@@ -13,7 +13,7 @@
[text
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" monad mix)]
+ ["[0]" list (.open: "[1]#[0]" monad mix)]
["[0]" set]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/export.py.lux b/stdlib/source/library/lux/ffi/export.py.lux
index 98399e34b..b9abc8a7a 100644
--- a/stdlib/source/library/lux/ffi/export.py.lux
+++ b/stdlib/source/library/lux/ffi/export.py.lux
@@ -13,7 +13,7 @@
[text
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" monad mix)]
+ ["[0]" list (.open: "[1]#[0]" monad mix)]
["[0]" set]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/export.rb.lux b/stdlib/source/library/lux/ffi/export.rb.lux
index e82fcbdb2..b23a85dc7 100644
--- a/stdlib/source/library/lux/ffi/export.rb.lux
+++ b/stdlib/source/library/lux/ffi/export.rb.lux
@@ -15,7 +15,7 @@
[text
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" monad mix)]
+ ["[0]" list (.open: "[1]#[0]" monad mix)]
["[0]" set]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/ffi/node_js.js.lux b/stdlib/source/library/lux/ffi/node_js.js.lux
index 60186306a..a31054f74 100644
--- a/stdlib/source/library/lux/ffi/node_js.js.lux
+++ b/stdlib/source/library/lux/ffi/node_js.js.lux
@@ -4,7 +4,7 @@
["[0]" ffi]
[control
["[0]" function]
- ["[0]" maybe ("[1]#[0]" monoid functor)]]]])
+ ["[0]" maybe (.open: "[1]#[0]" monoid functor)]]]])
(template [<name> <path>]
[(def: <name>
diff --git a/stdlib/source/library/lux/locale.lux b/stdlib/source/library/lux/locale.lux
index 63fc6f06f..0d5117c48 100644
--- a/stdlib/source/library/lux/locale.lux
+++ b/stdlib/source/library/lux/locale.lux
@@ -5,7 +5,7 @@
[equivalence (.only Equivalence)]
["[0]" hash (.only Hash)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" text (.only)
["%" format (.only format)]
diff --git a/stdlib/source/library/lux/macro.lux b/stdlib/source/library/lux/macro.lux
index d9a68d76e..e455b55f4 100644
--- a/stdlib/source/library/lux/macro.lux
+++ b/stdlib/source/library/lux/macro.lux
@@ -4,9 +4,9 @@
[abstract
["[0]" monad (.only do)]]
[data
- ["[0]" text ("[1]#[0]" monoid)]
+ ["[0]" text (.open: "[1]#[0]" monoid)]
[collection
- ["[0]" list ("[1]#[0]" monoid monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
[math
[number
["[0]" nat]
@@ -16,7 +16,7 @@
["[0]" //
["[1]" meta (.only)
["[0]" location]
- ["[0]" symbol ("[1]#[0]" codec)]]]])
+ ["[0]" symbol (.open: "[1]#[0]" codec)]]]])
(def: .public (single_expansion syntax)
(-> Code (Meta (List Code)))
diff --git a/stdlib/source/library/lux/macro/code.lux b/stdlib/source/library/lux/macro/code.lux
index 2d670c70c..74cab5a40 100644
--- a/stdlib/source/library/lux/macro/code.lux
+++ b/stdlib/source/library/lux/macro/code.lux
@@ -6,9 +6,9 @@
[data
["[0]" product]
["[0]" bit]
- ["[0]" text ("[1]#[0]" monoid equivalence)]
+ ["[0]" text (.open: "[1]#[0]" monoid equivalence)]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/library/lux/macro/local.lux b/stdlib/source/library/lux/macro/local.lux
index 9a317fc6f..b564df336 100644
--- a/stdlib/source/library/lux/macro/local.lux
+++ b/stdlib/source/library/lux/macro/local.lux
@@ -11,7 +11,7 @@
["[0]" product]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
[dictionary
["[0]" plist (.only PList)]]]]]]
["[0]" // (.only)
diff --git a/stdlib/source/library/lux/macro/syntax.lux b/stdlib/source/library/lux/macro/syntax.lux
index 5945290d8..baec61e09 100644
--- a/stdlib/source/library/lux/macro/syntax.lux
+++ b/stdlib/source/library/lux/macro/syntax.lux
@@ -10,7 +10,7 @@
["<>" parser (.only)
["</>" code (.only Parser)]]]
[data
- ["[0]" text ("[1]#[0]" monoid)]
+ ["[0]" text (.open: "[1]#[0]" monoid)]
[collection
["[0]" list]]]
[math
diff --git a/stdlib/source/library/lux/macro/syntax/declaration.lux b/stdlib/source/library/lux/macro/syntax/declaration.lux
index aef62c056..b0c23e135 100644
--- a/stdlib/source/library/lux/macro/syntax/declaration.lux
+++ b/stdlib/source/library/lux/macro/syntax/declaration.lux
@@ -4,13 +4,13 @@
[abstract
[equivalence (.only Equivalence)]]
[control
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["[0]" code]]]])
diff --git a/stdlib/source/library/lux/macro/syntax/input.lux b/stdlib/source/library/lux/macro/syntax/input.lux
index 25d3db6fc..bdac8cad3 100644
--- a/stdlib/source/library/lux/macro/syntax/input.lux
+++ b/stdlib/source/library/lux/macro/syntax/input.lux
@@ -9,7 +9,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
[macro
["[0]" code]]]])
diff --git a/stdlib/source/library/lux/macro/template.lux b/stdlib/source/library/lux/macro/template.lux
index dc3ef5884..6f4124596 100644
--- a/stdlib/source/library/lux/macro/template.lux
+++ b/stdlib/source/library/lux/macro/template.lux
@@ -7,22 +7,22 @@
[control
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
- ["<>" parser ("[1]#[0]" functor)
+ ["<>" parser (.open: "[1]#[0]" functor)
["<[0]>" code (.only Parser)]]]
[data
- ["[0]" bit ("[1]#[0]" codec)]
+ ["[0]" bit (.open: "[1]#[0]" codec)]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" monad)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["^" pattern]]
[math
[number
- ["[0]" nat ("[1]#[0]" decimal)]
- ["[0]" int ("[1]#[0]" decimal)]
- ["[0]" rev ("[1]#[0]" decimal)]
- ["[0]" frac ("[1]#[0]" decimal)]]]]]
+ ["[0]" nat (.open: "[1]#[0]" decimal)]
+ ["[0]" int (.open: "[1]#[0]" decimal)]
+ ["[0]" rev (.open: "[1]#[0]" decimal)]
+ ["[0]" frac (.open: "[1]#[0]" decimal)]]]]]
["[0]" // (.only)
[syntax (.only syntax:)]
["[0]" code]
diff --git a/stdlib/source/library/lux/math.lux b/stdlib/source/library/lux/math.lux
index eaffa1d8a..0a32f20b8 100644
--- a/stdlib/source/library/lux/math.lux
+++ b/stdlib/source/library/lux/math.lux
@@ -15,13 +15,13 @@
[text
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" template]]
[tool
[compiler
- ["[0]" phase ("[1]#[0]" monad)]
+ ["[0]" phase (.open: "[1]#[0]" monad)]
[language
[lux
["[0]" analysis (.only Analysis Operation Phase)
diff --git a/stdlib/source/library/lux/math/infix.lux b/stdlib/source/library/lux/math/infix.lux
index 207d38d54..8a37aa0f7 100644
--- a/stdlib/source/library/lux/math/infix.lux
+++ b/stdlib/source/library/lux/math/infix.lux
@@ -4,12 +4,12 @@
[abstract
[monad (.only do)]]
[control
- ["<>" parser ("[1]#[0]" functor)
+ ["<>" parser (.open: "[1]#[0]" functor)
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" code]]
diff --git a/stdlib/source/library/lux/math/logic/continuous.lux b/stdlib/source/library/lux/math/logic/continuous.lux
index 6640d1668..eec2d573f 100644
--- a/stdlib/source/library/lux/math/logic/continuous.lux
+++ b/stdlib/source/library/lux/math/logic/continuous.lux
@@ -6,7 +6,7 @@
[monoid (.only Monoid)]]
[math
[number
- ["/" rev ("[1]#[0]" interval)]]]]])
+ ["/" rev (.open: "[1]#[0]" interval)]]]]])
(def: .public false Rev /#bottom)
(def: .public true Rev /#top)
diff --git a/stdlib/source/library/lux/math/modular.lux b/stdlib/source/library/lux/math/modular.lux
index e0886c02d..77f611732 100644
--- a/stdlib/source/library/lux/math/modular.lux
+++ b/stdlib/source/library/lux/math/modular.lux
@@ -15,13 +15,13 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[macro
[syntax (.only syntax:)]
["[0]" code]]
[math
[number
- ["i" int ("[1]#[0]" decimal)]]]
+ ["i" int (.open: "[1]#[0]" decimal)]]]
[type
[primitive (.except)]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/math/number/complex.lux b/stdlib/source/library/lux/math/number/complex.lux
index 7b341edf3..5e320c560 100644
--- a/stdlib/source/library/lux/math/number/complex.lux
+++ b/stdlib/source/library/lux/math/number/complex.lux
@@ -9,7 +9,7 @@
["<[0]>" code]]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
[syntax (.only syntax:)]]
[math
diff --git a/stdlib/source/library/lux/math/number/ratio.lux b/stdlib/source/library/lux/math/number/ratio.lux
index b7072395b..a7c1c4762 100644
--- a/stdlib/source/library/lux/math/number/ratio.lux
+++ b/stdlib/source/library/lux/math/number/ratio.lux
@@ -15,12 +15,12 @@
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[macro
[syntax (.only syntax:)]
["[0]" code]]]]
[//
- ["n" nat ("[1]#[0]" decimal)]])
+ ["n" nat (.open: "[1]#[0]" decimal)]])
(type: .public Ratio
(Record
diff --git a/stdlib/source/library/lux/math/random.lux b/stdlib/source/library/lux/math/random.lux
index 13762f8ec..d60ba29bc 100644
--- a/stdlib/source/library/lux/math/random.lux
+++ b/stdlib/source/library/lux/math/random.lux
@@ -7,11 +7,11 @@
[apply (.only Apply)]
["[0]" monad (.only Monad do)]]
[data
- ["[0]" text (.only Char) ("[1]#[0]" monoid)
+ ["[0]" text (.only Char) (.open: "[1]#[0]" monoid)
["[0]" unicode
["[1]" set]]]
[collection
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
["[0]" array (.only Array)]
["[0]" dictionary (.only Dictionary)]
["[0]" queue (.only Queue)]
diff --git a/stdlib/source/library/lux/meta.lux b/stdlib/source/library/lux/meta.lux
index ef6b283f0..7ceec5bcd 100644
--- a/stdlib/source/library/lux/meta.lux
+++ b/stdlib/source/library/lux/meta.lux
@@ -10,9 +10,9 @@
["[0]" try (.only Try)]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" monoid order)]
+ ["[0]" text (.open: "[1]#[0]" monoid order)]
[collection
- ["[0]" list ("[1]#[0]" monoid monad)]
+ ["[0]" list (.open: "[1]#[0]" monoid monad)]
[dictionary
["[0]" plist]]]]
[macro
@@ -23,7 +23,7 @@
["n" nat]
["i" int]]]
[meta
- ["[0]" symbol ("[1]#[0]" codec equivalence)]]]]
+ ["[0]" symbol (.open: "[1]#[0]" codec equivalence)]]]]
[/
["[0]" location]])
diff --git a/stdlib/source/library/lux/meta/configuration.lux b/stdlib/source/library/lux/meta/configuration.lux
index 7271f5430..be16a5110 100644
--- a/stdlib/source/library/lux/meta/configuration.lux
+++ b/stdlib/source/library/lux/meta/configuration.lux
@@ -7,16 +7,16 @@
[monoid (.only Monoid)]
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
["<>" parser (.only)
["<[0]>" text (.only Parser)]
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
[dictionary
["/" plist]]]]
[macro
diff --git a/stdlib/source/library/lux/meta/symbol.lux b/stdlib/source/library/lux/meta/symbol.lux
index 885db4402..b5819f76a 100644
--- a/stdlib/source/library/lux/meta/symbol.lux
+++ b/stdlib/source/library/lux/meta/symbol.lux
@@ -7,7 +7,7 @@
[order (.only Order)]
[codec (.only Codec)]]
[data
- ["[0]" text ("[1]#[0]" equivalence monoid)]
+ ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
["[0]" product]]]])
... (type: Symbol
diff --git a/stdlib/source/library/lux/meta/version.lux b/stdlib/source/library/lux/meta/version.lux
index 9987d55c1..47bc430b4 100644
--- a/stdlib/source/library/lux/meta/version.lux
+++ b/stdlib/source/library/lux/meta/version.lux
@@ -9,9 +9,9 @@
["<>" parser (.only)
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" code]]
diff --git a/stdlib/source/library/lux/static.lux b/stdlib/source/library/lux/static.lux
index 0aec3e8c2..c9d94bd35 100644
--- a/stdlib/source/library/lux/static.lux
+++ b/stdlib/source/library/lux/static.lux
@@ -1,7 +1,7 @@
(.using
[library
[lux (.except nat int rev if cond)
- ["[0]" meta ("[1]#[0]" functor)]
+ ["[0]" meta (.open: "[1]#[0]" functor)]
[abstract
[monad (.only do)]]
[control
@@ -9,7 +9,7 @@
["<[0]>" code]]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" code]]
diff --git a/stdlib/source/library/lux/target/common_lisp.lux b/stdlib/source/library/lux/target/common_lisp.lux
index e2094f53c..ce523f4d4 100644
--- a/stdlib/source/library/lux/target/common_lisp.lux
+++ b/stdlib/source/library/lux/target/common_lisp.lux
@@ -7,7 +7,7 @@
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" monad monoid)]]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/library/lux/target/js.lux b/stdlib/source/library/lux/target/js.lux
index ecae74ab2..708ba4abe 100644
--- a/stdlib/source/library/lux/target/js.lux
+++ b/stdlib/source/library/lux/target/js.lux
@@ -7,7 +7,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/library/lux/target/jvm/attribute.lux b/stdlib/source/library/lux/target/jvm/attribute.lux
index 522cb9028..4819f19ea 100644
--- a/stdlib/source/library/lux/target/jvm/attribute.lux
+++ b/stdlib/source/library/lux/target/jvm/attribute.lux
@@ -24,7 +24,7 @@
[encoding
["[1][0]" unsigned (.only U2 U4)]]
["[1][0]" constant (.only UTF8 Class Value)
- ["[2][0]" pool (.only Pool Resource) ("[1]#[0]" monad)]]]
+ ["[2][0]" pool (.only Pool Resource) (.open: "[1]#[0]" monad)]]]
["[0]" /
["[1][0]" constant (.only Constant)]
["[1][0]" code]])
diff --git a/stdlib/source/library/lux/target/jvm/attribute/code.lux b/stdlib/source/library/lux/target/jvm/attribute/code.lux
index 10d2bb92d..629fbfad6 100644
--- a/stdlib/source/library/lux/target/jvm/attribute/code.lux
+++ b/stdlib/source/library/lux/target/jvm/attribute/code.lux
@@ -7,9 +7,9 @@
["[0]" product]
["[0]" binary (.only Binary)]
[format
- ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]
+ ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
[collection
- ["[0]" sequence (.only Sequence) ("[1]#[0]" functor mix)]]]
+ ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" functor mix)]]]
[math
[number
["n" nat]]]]]
diff --git a/stdlib/source/library/lux/target/jvm/bytecode.lux b/stdlib/source/library/lux/target/jvm/bytecode.lux
index 1f00b97c7..4963f5151 100644
--- a/stdlib/source/library/lux/target/jvm/bytecode.lux
+++ b/stdlib/source/library/lux/target/jvm/bytecode.lux
@@ -10,14 +10,14 @@
["[0]" writer (.only Writer)]
["[0]" state (.only +State)]
["[0]" maybe]
- ["[0]" try (.only Try) ("[1]#[0]" monad)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
["[0]" exception (.only exception:)]]
[data
["[0]" product]
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]
["[0]" sequence (.only Sequence)]]]
[macro
@@ -31,7 +31,7 @@
["[0]" /
["[1][0]" address (.only Address)]
["[1][0]" jump (.only Jump Big_Jump)]
- ["_" instruction (.only Primitive_Array_Type Instruction Estimator) ("[1]#[0]" monoid)]
+ ["_" instruction (.only Primitive_Array_Type Instruction Estimator) (.open: "[1]#[0]" monoid)]
["[1][0]" environment (.only Environment)
[limit
["/[0]" registry (.only Register Registry)]
diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux
index 05772986f..a1c60d8d2 100644
--- a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux
+++ b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux
@@ -9,7 +9,7 @@
[data
["[0]" product]
["[0]" format
- ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]]]
+ ["[1]" binary (.only Writer) (.open: "[1]#[0]" monoid)]]]
[math
[number
["n" nat]]]]]
diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux
index 950735dbb..b8ae7a3c3 100644
--- a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux
+++ b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux
@@ -4,12 +4,12 @@
[abstract
["[0]" equivalence (.only Equivalence)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
[data
[format
[binary (.only Writer)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/target/jvm/class.lux b/stdlib/source/library/lux/target/jvm/class.lux
index 3af3c5c7c..6c4531ed5 100644
--- a/stdlib/source/library/lux/target/jvm/class.lux
+++ b/stdlib/source/library/lux/target/jvm/class.lux
@@ -10,7 +10,7 @@
[data
["[0]" product]
[format
- ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]
+ ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
[collection
["[0]" sequence (.only Sequence)]]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/target/jvm/constant.lux b/stdlib/source/library/lux/target/jvm/constant.lux
index 3e50f9758..98fb0ba60 100644
--- a/stdlib/source/library/lux/target/jvm/constant.lux
+++ b/stdlib/source/library/lux/target/jvm/constant.lux
@@ -11,7 +11,7 @@
["[0]" product]
["[0]" text]
[format
- ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]]
+ ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]]
[macro
["^" pattern]
["[0]" template]]
diff --git a/stdlib/source/library/lux/target/jvm/constant/pool.lux b/stdlib/source/library/lux/target/jvm/constant/pool.lux
index e459f5eec..2d6c1e4e5 100644
--- a/stdlib/source/library/lux/target/jvm/constant/pool.lux
+++ b/stdlib/source/library/lux/target/jvm/constant/pool.lux
@@ -14,9 +14,9 @@
["[0]" product]
["[0]" text]
["[0]" format
- ["[1]" binary (.only Writer) ("specification#[0]" monoid)]]
+ ["[1]" binary (.only Writer) (.open: "specification#[0]" monoid)]]
[collection
- ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]]]
+ ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]]]
[math
[number
["[0]" int]
diff --git a/stdlib/source/library/lux/target/jvm/constant/tag.lux b/stdlib/source/library/lux/target/jvm/constant/tag.lux
index e9a0569e0..7a859d75b 100644
--- a/stdlib/source/library/lux/target/jvm/constant/tag.lux
+++ b/stdlib/source/library/lux/target/jvm/constant/tag.lux
@@ -12,7 +12,7 @@
[primitive (.except)]]]]
["[0]" ///
[encoding
- ["[1][0]" unsigned (.only U1) ("u1//[0]" equivalence)]]])
+ ["[1][0]" unsigned (.only U1) (.open: "u1//[0]" equivalence)]]])
(primitive: .public Tag
U1
diff --git a/stdlib/source/library/lux/target/jvm/field.lux b/stdlib/source/library/lux/target/jvm/field.lux
index ade45a2f0..1b8407723 100644
--- a/stdlib/source/library/lux/target/jvm/field.lux
+++ b/stdlib/source/library/lux/target/jvm/field.lux
@@ -7,7 +7,7 @@
[data
["[0]" product]
[format
- ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]
+ ["[0]F" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
[collection
["[0]" sequence (.only Sequence)]]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/target/jvm/method.lux b/stdlib/source/library/lux/target/jvm/method.lux
index 5fcb74c45..bf2b73cdb 100644
--- a/stdlib/source/library/lux/target/jvm/method.lux
+++ b/stdlib/source/library/lux/target/jvm/method.lux
@@ -9,7 +9,7 @@
[data
["[0]" product]
["[0]" format
- ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]]
+ ["[1]" binary (.only Writer) (.open: "[1]#[0]" monoid)]]
[collection
["[0]" sequence (.only Sequence)]]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/target/jvm/reflection.lux b/stdlib/source/library/lux/target/jvm/reflection.lux
index cdfe9e9a0..0941e09b1 100644
--- a/stdlib/source/library/lux/target/jvm/reflection.lux
+++ b/stdlib/source/library/lux/target/jvm/reflection.lux
@@ -6,15 +6,15 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
[parser
["<t>" text]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix functor)]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]
["[0]" array]
["[0]" dictionary]]]
[macro
diff --git a/stdlib/source/library/lux/target/jvm/type.lux b/stdlib/source/library/lux/target/jvm/type.lux
index cfb14dfa9..21528b3a3 100644
--- a/stdlib/source/library/lux/target/jvm/type.lux
+++ b/stdlib/source/library/lux/target/jvm/type.lux
@@ -10,7 +10,7 @@
["[0]" text (.only)
["%" format (.only Format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/target/jvm/type/descriptor.lux b/stdlib/source/library/lux/target/jvm/type/descriptor.lux
index e8cf0ba6b..7ded981d8 100644
--- a/stdlib/source/library/lux/target/jvm/type/descriptor.lux
+++ b/stdlib/source/library/lux/target/jvm/type/descriptor.lux
@@ -6,10 +6,10 @@
[control
["[0]" maybe]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/target/jvm/type/lux.lux b/stdlib/source/library/lux/target/jvm/type/lux.lux
index 60ca730d2..b63cafeab 100644
--- a/stdlib/source/library/lux/target/jvm/type/lux.lux
+++ b/stdlib/source/library/lux/target/jvm/type/lux.lux
@@ -6,18 +6,18 @@
[control
["[0]" try]
["[0]" exception (.only exception:)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" text (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" array]
["[0]" dictionary (.only Dictionary)]]]
[type
[primitive (.except)]
- ["[0]" check (.only Check) ("[1]#[0]" monad)]]]]
+ ["[0]" check (.only Check) (.open: "[1]#[0]" monad)]]]]
["[0]" // (.only)
[category (.only Void Value Return Method Primitive Object Class Array Var Parameter)]
["[1][0]" descriptor]
diff --git a/stdlib/source/library/lux/target/jvm/type/parser.lux b/stdlib/source/library/lux/target/jvm/type/parser.lux
index 4a0aa756c..a58a6d8d7 100644
--- a/stdlib/source/library/lux/target/jvm/type/parser.lux
+++ b/stdlib/source/library/lux/target/jvm/type/parser.lux
@@ -6,7 +6,7 @@
[control
["[0]" try]
["[0]" function]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" text (.only Parser)]]]
[data
["[0]" product]
diff --git a/stdlib/source/library/lux/target/jvm/type/reflection.lux b/stdlib/source/library/lux/target/jvm/type/reflection.lux
index e6f51e411..47c5d7d73 100644
--- a/stdlib/source/library/lux/target/jvm/type/reflection.lux
+++ b/stdlib/source/library/lux/target/jvm/type/reflection.lux
@@ -4,7 +4,7 @@
[abstract
[equivalence (.only Equivalence)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[type
[primitive (.except)]]]]
diff --git a/stdlib/source/library/lux/target/jvm/type/signature.lux b/stdlib/source/library/lux/target/jvm/type/signature.lux
index ef9d139ea..f66989972 100644
--- a/stdlib/source/library/lux/target/jvm/type/signature.lux
+++ b/stdlib/source/library/lux/target/jvm/type/signature.lux
@@ -7,10 +7,10 @@
[control
["[0]" pipe]]
[data
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[type
[primitive (.except)]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/target/lua.lux b/stdlib/source/library/lux/target/lua.lux
index e0bed2c3c..f334dbc83 100644
--- a/stdlib/source/library/lux/target/lua.lux
+++ b/stdlib/source/library/lux/target/lua.lux
@@ -14,7 +14,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" template]
diff --git a/stdlib/source/library/lux/target/php.lux b/stdlib/source/library/lux/target/php.lux
index 7b9cec65a..52f872a04 100644
--- a/stdlib/source/library/lux/target/php.lux
+++ b/stdlib/source/library/lux/target/php.lux
@@ -14,7 +14,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" template]
diff --git a/stdlib/source/library/lux/target/python.lux b/stdlib/source/library/lux/target/python.lux
index ae3904333..ae5014d34 100644
--- a/stdlib/source/library/lux/target/python.lux
+++ b/stdlib/source/library/lux/target/python.lux
@@ -15,7 +15,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" template]
diff --git a/stdlib/source/library/lux/target/r.lux b/stdlib/source/library/lux/target/r.lux
index c16e07eac..0d4e813dc 100644
--- a/stdlib/source/library/lux/target/r.lux
+++ b/stdlib/source/library/lux/target/r.lux
@@ -4,14 +4,14 @@
[control
["[0]" pipe]
["[0]" function]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
[parser
["<[0]>" code]]]
[data
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" template]
diff --git a/stdlib/source/library/lux/target/ruby.lux b/stdlib/source/library/lux/target/ruby.lux
index a157e513b..356906d27 100644
--- a/stdlib/source/library/lux/target/ruby.lux
+++ b/stdlib/source/library/lux/target/ruby.lux
@@ -14,7 +14,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
[syntax (.only syntax:)]
["[0]" template]
diff --git a/stdlib/source/library/lux/target/scheme.lux b/stdlib/source/library/lux/target/scheme.lux
index e3e6fb09b..e77a76d6d 100644
--- a/stdlib/source/library/lux/target/scheme.lux
+++ b/stdlib/source/library/lux/target/scheme.lux
@@ -11,7 +11,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/library/lux/test.lux b/stdlib/source/library/lux/test.lux
index e72427137..71c7c1a53 100644
--- a/stdlib/source/library/lux/test.lux
+++ b/stdlib/source/library/lux/test.lux
@@ -13,7 +13,7 @@
["[0]" io]
[concurrency
["[0]" atom (.only Atom)]
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
["<>" parser (.only)
["<[0]>" code]]]
[data
@@ -21,7 +21,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set (.only Set)]
["[0]" dictionary
["[1]" ordered (.only Dictionary)]]]]
@@ -29,7 +29,7 @@
["[0]" instant]
["[0]" duration (.only Duration)]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number (.only hex)
["n" nat]
["f" frac]]]
diff --git a/stdlib/source/library/lux/time.lux b/stdlib/source/library/lux/time.lux
index 79343f319..d0f07d610 100644
--- a/stdlib/source/library/lux/time.lux
+++ b/stdlib/source/library/lux/time.lux
@@ -14,10 +14,10 @@
["<>" parser (.only)
["<[0]>" text (.only Parser)]]]
[data
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]]]
+ ["n" nat (.open: "[1]#[0]" decimal)]]]
[type
[primitive (.except)]]]]
[/
diff --git a/stdlib/source/library/lux/time/date.lux b/stdlib/source/library/lux/time/date.lux
index 1d0df3aca..3327f15e8 100644
--- a/stdlib/source/library/lux/time/date.lux
+++ b/stdlib/source/library/lux/time/date.lux
@@ -14,13 +14,13 @@
["<>" parser (.only)
["<[0]>" text (.only Parser)]]]
[data
- ["[0]" text ("[1]#[0]" monoid)]
+ ["[0]" text (.open: "[1]#[0]" monoid)]
[collection
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
["[0]" dictionary (.only Dictionary)]]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]
+ ["n" nat (.open: "[1]#[0]" decimal)]
["i" int]]]
[type
[primitive (.except)]]]]
diff --git a/stdlib/source/library/lux/time/day.lux b/stdlib/source/library/lux/time/day.lux
index 590d850ed..a245c924b 100644
--- a/stdlib/source/library/lux/time/day.lux
+++ b/stdlib/source/library/lux/time/day.lux
@@ -11,7 +11,7 @@
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[macro
["^" pattern]
["[0]" template]]
diff --git a/stdlib/source/library/lux/time/duration.lux b/stdlib/source/library/lux/time/duration.lux
index 4616890db..75fcddefd 100644
--- a/stdlib/source/library/lux/time/duration.lux
+++ b/stdlib/source/library/lux/time/duration.lux
@@ -13,11 +13,11 @@
["<>" parser (.only)
["<[0]>" text (.only Parser)]]]
[data
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[math
[number
["i" int]
- ["[0]" nat ("[1]#[0]" decimal)]]]
+ ["[0]" nat (.open: "[1]#[0]" decimal)]]]
[type
[primitive (.except)]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/time/instant.lux b/stdlib/source/library/lux/time/instant.lux
index 4d36a5a7d..3a6071f59 100644
--- a/stdlib/source/library/lux/time/instant.lux
+++ b/stdlib/source/library/lux/time/instant.lux
@@ -16,7 +16,7 @@
["<>" parser (.only)
["<[0]>" text (.only Parser)]]]
[data
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[math
[number
["i" int]
diff --git a/stdlib/source/library/lux/time/month.lux b/stdlib/source/library/lux/time/month.lux
index 65cc2f570..0b8d8b8a8 100644
--- a/stdlib/source/library/lux/time/month.lux
+++ b/stdlib/source/library/lux/time/month.lux
@@ -11,7 +11,7 @@
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[macro
["^" pattern]
["[0]" template]]
diff --git a/stdlib/source/library/lux/time/year.lux b/stdlib/source/library/lux/time/year.lux
index aac70a1b3..d10df7456 100644
--- a/stdlib/source/library/lux/time/year.lux
+++ b/stdlib/source/library/lux/time/year.lux
@@ -12,11 +12,11 @@
["<>" parser (.only)
["<[0]>" text (.only Parser)]]]
[data
- ["[0]" text ("[1]#[0]" monoid)]]
+ ["[0]" text (.open: "[1]#[0]" monoid)]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]
- ["i" int ("[1]#[0]" decimal)]]]
+ ["n" nat (.open: "[1]#[0]" decimal)]
+ ["i" int (.open: "[1]#[0]" decimal)]]]
[type
[primitive (.except)]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/default/init.lux b/stdlib/source/library/lux/tool/compiler/default/init.lux
index 1b91c925c..6ddca02cf 100644
--- a/stdlib/source/library/lux/tool/compiler/default/init.lux
+++ b/stdlib/source/library/lux/tool/compiler/default/init.lux
@@ -11,13 +11,13 @@
[data
[binary (.only Binary)]
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary]
["[0]" set]
- ["[0]" sequence ("[1]#[0]" functor)]]]
+ ["[0]" sequence (.open: "[1]#[0]" functor)]]]
[meta
["[0]" configuration (.only Configuration)]
["[0]" version]]
diff --git a/stdlib/source/library/lux/tool/compiler/default/platform.lux b/stdlib/source/library/lux/tool/compiler/default/platform.lux
index 72504779c..680a6a759 100644
--- a/stdlib/source/library/lux/tool/compiler/default/platform.lux
+++ b/stdlib/source/library/lux/tool/compiler/default/platform.lux
@@ -9,22 +9,22 @@
[control
["[0]" function]
["[0]" maybe]
- ["[0]" try (.only Try) ("[1]#[0]" monad)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
["[0]" exception (.only exception:)]
[concurrency
- ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)]
+ ["[0]" async (.only Async Resolver) (.open: "[1]#[0]" monad)]
["[0]" stm (.only Var STM)]]]
[data
["[0]" binary (.only Binary)]
["[0]" bit]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" dictionary (.only Dictionary)]
- ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]
+ ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" mix)]
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" monoid functor mix)]]
+ ["[0]" list (.open: "[1]#[0]" monoid functor mix)]]
[format
["_" binary (.only Writer)]]]
["[0]" meta (.only)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux
index d79a962ca..0c8e86526 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux
@@ -14,11 +14,11 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only Format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
[syntax (.only syntax:)]]
[math
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux
index 633d8868b..65c8db0cb 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux
@@ -5,11 +5,11 @@
[equivalence (.only Equivalence)]
[hash (.only Hash)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text (.only)
["%" format (.only Format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux
index 0a13c9c40..4573ad571 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux
@@ -5,23 +5,23 @@
[equivalence (.except)]
["[0]" monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" monoid monad)]
+ ["[0]" maybe (.open: "[1]#[0]" monoid monad)]
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text (.only)
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]
- ["[0]" set (.only Set) ("[1]#[0]" equivalence)]]]
+ ["[0]" set (.only Set) (.open: "[1]#[0]" equivalence)]]]
[macro
["^" pattern]
["[0]" template]]
[math
[number
- ["n" nat ("[1]#[0]" interval)]
+ ["n" nat (.open: "[1]#[0]" interval)]
["i" int]
["r" rev]
["f" frac]]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux
index 8b3ec93ca..7ac9ebff8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux
@@ -13,7 +13,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
[macro
["^" pattern]
["[0]" template]]
@@ -28,7 +28,7 @@
[phase
["[0]" extension]]
[///
- ["[0]" phase ("[1]#[0]" monad)]
+ ["[0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux
index 46ac4596a..9aabc7d10 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux
@@ -8,10 +8,10 @@
["[0]" try]
["[0]" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix functor)]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]
[dictionary
["[0]" plist]]]]
["[0]" meta]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux
index 970c62d7c..bf221d35b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux
@@ -4,14 +4,14 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]
["[0]" try]
["[0]" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
[dictionary
["[0]" plist]]]]]]
["/" // (.only Environment Operation Phase)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux
index ff3deb58d..4907be964 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux
@@ -4,8 +4,8 @@
[abstract
[equivalence (.only Equivalence)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only Format)]]]
[macro
["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux
index 39e1fae5d..7f1c5d418 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux
@@ -7,7 +7,7 @@
["[0]" try]]
[data
[collection
- ["[0]" list ("[1]#[0]" monoid)]]]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]]]
[//
["[0]" analysis]
["[0]" synthesis]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux b/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux
index 829cbb4a4..1499d8081 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux
@@ -10,11 +10,11 @@
[data
[binary (.only Binary)]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" sequence (.only Sequence)]
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set (.only Set)]]]
[macro
["^" pattern]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux
index 7fd1b74a9..70dd51a99 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux
@@ -13,7 +13,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix monoid monad)]]]
+ ["[0]" list (.open: "[1]#[0]" mix monoid monad)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux
index 411440e41..eeb30664f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux
@@ -11,10 +11,10 @@
["[0]" state]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" monad)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["[0]" code]]
@@ -35,7 +35,7 @@
["[1][0]" type]
["[1][0]" inference]]
[///
- ["[1]" phase ("[1]#[0]" monad)]
+ ["[1]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux
index 57dfe4a2f..19e415b29 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux
@@ -13,7 +13,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monoid monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
[math
[number
["n" nat]]]
@@ -27,7 +27,7 @@
["[1][0]" inference]
["[1][0]" scope]]
[///
- ["[1]" phase ("[1]#[0]" functor)]
+ ["[1]" phase (.open: "[1]#[0]" functor)]
[reference (.only)
[variable (.only)]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux
index 0bbb089ce..cea38091d 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux
@@ -7,7 +7,7 @@
[control
["[0]" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[macro
["^" pattern]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux
index a007bdb45..be4a0fd6f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux
@@ -11,7 +11,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix monoid)]]]]]
+ ["[0]" list (.open: "[1]#[0]" mix monoid)]]]]]
["[0]" //
["[1][0]" extension]
["[1][0]" analysis]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux
index ed854b3cb..493776886 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux
@@ -11,7 +11,7 @@
["[0]" exception (.only exception:)]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" order)
+ ["[0]" text (.open: "[1]#[0]" order)
["%" format (.only Format format)]]
[collection
["[0]" list]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
index 49ac7d0fd..b7feef155 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
@@ -8,8 +8,8 @@
["[0]" predicate]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" monad)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
["[0]" exception (.only exception:)]
["<>" parser (.only)
["<[0]>" code (.only Parser)]
@@ -17,10 +17,10 @@
[data
[binary (.only Binary)]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix monad monoid)]
+ ["[0]" list (.open: "[1]#[0]" mix monad monoid)]
["[0]" array]
["[0]" dictionary (.only Dictionary)]
["[0]" sequence]]
@@ -36,8 +36,8 @@
[target
["[0]" jvm
["[0]!" reflection]
- ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" attribute]
["[0]" field]
["[0]" version]
@@ -47,7 +47,7 @@
["[0]" pool (.only Resource)]]
[encoding
["[0]" name (.only External)]]
- ["[1]" type (.only Type Argument Typed) ("[1]#[0]" equivalence)
+ ["[1]" type (.only Type Argument Typed) (.open: "[1]#[0]" equivalence)
["[0]" category (.only Void Value' Value Return' Return Primitive Object Class Array Var Parameter Method)]
["[0]" box]
["[0]" reflection]
@@ -57,7 +57,7 @@
["[0]" alias (.only Aliasing)]
["[0]T" lux (.only Mapping)]]]]
["[0]" type (.only)
- ["[0]" check (.only Check) ("[1]#[0]" monad)]]]]
+ ["[0]" check (.only Check) (.open: "[1]#[0]" monad)]]]]
["[0]" //
["[1][0]" lux (.only custom)]
["/[1]" // (.only)
@@ -78,7 +78,7 @@
["[0]A" type]
["[0]" scope]]
[///
- ["[0]" phase ("[1]#[0]" monad)]
+ ["[0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)
[module
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
index 3f973aadb..76f36e336 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
@@ -13,7 +13,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux
index 7929f2f83..b770c31cc 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux
@@ -7,7 +7,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]]]
[// (.only Handler Bundle)])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux
index 4bf7e260c..025e863d3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux
@@ -6,9 +6,9 @@
["[0]" monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]
["<[0]>" text]
["<[0]>" synthesis]]]
@@ -18,7 +18,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary]
["[0]" sequence]
["[0]" set (.only Set)]]
@@ -33,8 +33,8 @@
["[0]" i32]]]
[target
[jvm
- ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" attribute]
["[0]" field]
["[0]" version]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux
index b8302f85c..b66e2cc05 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux
@@ -7,7 +7,7 @@
["[0]" monad (.only do)]]
[control
[io (.only IO)]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try]
["[0]" exception (.only exception:)]
["<>" parser (.only)
@@ -20,7 +20,7 @@
[collection
["[0]" dictionary]
["[0]" array]
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set (.only Set)]]]
[macro
["^" pattern]
@@ -28,7 +28,7 @@
[math
[number
["n" nat]]]
- ["[0]" type (.only sharing) ("[1]#[0]" equivalence)
+ ["[0]" type (.only sharing) (.open: "[1]#[0]" equivalence)
["[0]" check]]]]
["[0]" /// (.only Extender)
["[1][0]" bundle]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux
index 49681e787..355dd5182 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux
@@ -15,7 +15,7 @@
[collection
["[0]" dictionary]
["[0]" set]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
[number
["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux
index b12fc2949..f9ad9a81e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux
@@ -10,7 +10,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary]]]
[macro
["^" pattern]]
@@ -37,7 +37,7 @@
[//
["[0]" synthesis (.only %synthesis)]
[///
- ["[1]" phase ("[1]#[0]" monad)]]]]])
+ ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
(def: .public (custom [parser handler])
(All (_ s)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux
index 2da6d5756..cbae57e3c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux
@@ -11,7 +11,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" monad)]
["[0]" dictionary]]]
[math
[number
@@ -19,7 +19,7 @@
["[0]" i32]]]
[target
[jvm
- ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)]
+ ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)]
[encoding
["[0]" signed (.only S4)]]
["[0]" type (.only Type)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux
index eaf40a8ee..4e60e6693 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux
@@ -4,17 +4,17 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
["<>" parser (.only)
["<[0]>" text]
["<[0]>" synthesis (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" monad mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" monad mix monoid)]
["[0]" dictionary (.only Dictionary)]
["[0]" set (.only Set)]
["[0]" sequence]]
@@ -30,14 +30,14 @@
[target
[jvm
["[0]" version]
- ["[0]" modifier ("[1]#[0]" monoid)]
+ ["[0]" modifier (.open: "[1]#[0]" monoid)]
["[0]" method (.only Method)]
["[0]" class (.only Class)]
[constant
[pool (.only Resource)]]
[encoding
["[0]" name]]
- ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)
+ ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)
["__" instruction (.only Primitive_Array_Type)]]
["[0]" type (.only Type Typed Argument)
["[0]" category (.only Void Value' Value Return' Return Primitive Object Array Var Parameter)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux
index f06cab2c6..834d3448c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux
@@ -14,7 +14,7 @@
["%" format (.only format)]]
[collection
["[0]" dictionary]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
@@ -41,7 +41,7 @@
["[0]" synthesis (.only %synthesis)]
["[0]" generation]
[///
- ["[1]" phase ("[1]#[0]" monad)]]]]])
+ ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
(def: .public (custom [parser handler])
(All (_ s)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux
index 25eeba0bc..ef05fe70f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux
@@ -15,7 +15,7 @@
[collection
["[0]" dictionary]
["[0]" set]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
[number
["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux
index b7219747b..22ffda36e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux
@@ -14,7 +14,7 @@
["%" format (.only format)]]
[collection
["[0]" dictionary]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
@@ -43,7 +43,7 @@
["[0]" synthesis (.only %synthesis)]
["[0]" generation]
[///
- ["[1]" phase ("[1]#[0]" monad)]]]]])
+ ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
(def: .public (statement expression archive synthesis)
Phase!
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux
index afd160be3..35e433e8e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux
@@ -15,7 +15,7 @@
[collection
["[0]" dictionary]
["[0]" set]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
[number
["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux
index c0bfdf7ed..e7395899b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux
@@ -14,7 +14,7 @@
["%" format (.only format)]]
[collection
["[0]" dictionary]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
@@ -41,7 +41,7 @@
["[0]" synthesis (.only %synthesis)]
["[0]" generation]
[///
- ["[1]" phase ("[1]#[0]" monad)]]]]])
+ ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
(def: .public (custom [parser handler])
(All (_ s)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux
index 8d445eb3c..9dbea2892 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux
@@ -15,7 +15,7 @@
[collection
["[0]" dictionary]
["[0]" set]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
[number
["f" frac]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux
index f88c04f0a..33572414f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux
@@ -21,7 +21,7 @@
[analysis (.only)]
["[1][0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux
index 6f93eb386..7a5c774c4 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux
@@ -9,7 +9,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
["[0]" set]]]
[macro
["^" pattern]]
@@ -33,7 +33,7 @@
["//[1]" ///
[reference
["[1][0]" variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux
index 412bf27b7..77569b17e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux
@@ -10,7 +10,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[target
["_" common_lisp (.only Expression Var/1)]]]]
["[0]" //
@@ -25,7 +25,7 @@
["[1][0]" generation (.only Context)]
["//[1]" ///
[arity (.only Arity)]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference
[variable (.only Register Variable)]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux
index d80a015e6..287d9a6c3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux
@@ -8,7 +8,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux
index efbf5c321..e9bbd9a5c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux
@@ -10,11 +10,11 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
["[0]" encoding]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux
index 4498fdb1f..b14e852b1 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux
@@ -12,7 +12,7 @@
[analysis (.only Variant Tuple)]
["[1][0]" synthesis (.only Synthesis)]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple expression archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux
index 5bfe69fea..317114afc 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux
@@ -8,7 +8,7 @@
["<[0]>" code]]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
["[0]" meta]
["[0]" macro (.only with_symbols)
["[0]" code]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux
index dde4dcea2..02540a965 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux
@@ -28,7 +28,7 @@
[analysis (.only)]
["[0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux
index 13d1ed400..9afe42e0c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux
@@ -8,7 +8,7 @@
[data
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
@@ -32,7 +32,7 @@
["//[1]" ///
[reference
[variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux
index 69db5cdd4..69b575162 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux
@@ -8,7 +8,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[target
["_" js (.only Expression Computation Var Statement)]]]]
["[0]" //
@@ -23,7 +23,7 @@
["[1][0]" generation]
["//[1]" ///
[arity (.only Arity)]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference
[variable (.only Register Variable)]]
[meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux
index 32823cd17..9849f3981 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux
index 5605d56ee..12359b713 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux
@@ -10,12 +10,12 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux
index b57b4b344..14e911912 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux
@@ -13,7 +13,7 @@
[analysis
[complex (.only Variant Tuple)]]
["//[1]" /// (.only)
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple generate archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux
index 73c286f0c..c4b026541 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux
@@ -19,7 +19,7 @@
["[0]" synthesis]
[///
["[0]" reference]
- ["[1]" phase ("[1]#[0]" monad)]]]]])
+ ["[1]" phase (.open: "[1]#[0]" monad)]]]]])
(def: .public (generate archive synthesis)
Phase
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux
index e718b504d..8fb2dcd0c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux
@@ -7,8 +7,8 @@
["[0]" function]]
[data
[collection
- ["[0]" list ("[1]#[0]" mix)]]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" list (.open: "[1]#[0]" mix)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[macro
["^" pattern]]
@@ -18,7 +18,7 @@
["[0]" i32]]]
[target
[jvm
- ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)
+ ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)
[environment
[limit
["[0]" stack]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux
index b89b43d67..28e90a032 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux
@@ -6,7 +6,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" monoid functor)]
+ ["[0]" list (.open: "[1]#[0]" monoid functor)]
["[0]" sequence]]
["[0]" format
["[1]" binary]]]
@@ -17,10 +17,10 @@
[target
[jvm
["[0]" version]
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" field (.only Field)]
["[0]" method (.only Method)]
- ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)]
+ ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)]
["[0]" class (.only Class)]
["[0]" type (.only Type)
[category (.only Return' Value')]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux
index 7d2ad1f85..4aea4dc4f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux
@@ -7,7 +7,7 @@
[target
[jvm
["[0]" field (.only Field)]
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
[type (.only Type)
[category (.only Value)]]
[constant
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux
index 2a0bc8cd9..737c6ac4b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux
@@ -3,11 +3,11 @@
[lux (.except Type type)
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]]
[target
[jvm
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" field (.only Field)]
["_" bytecode (.only Bytecode)]
[type (.only Type)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux
index 810ce179e..1684e6f8c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux
@@ -5,14 +5,14 @@
["[0]" monad]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
[target
[jvm
["[0]" field (.only Field)]
- ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]
+ ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]
[type (.only Type)
[category (.only Class)]]
[constant
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux
index 83a14abc9..1301e055c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux
@@ -3,7 +3,7 @@
[lux (.except)
[target
[jvm
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" method (.only Method)]]]]])
(def: .public modifier
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux
index 19f568571..69e7d5332 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux
@@ -7,7 +7,7 @@
["[0]" try]]
[data
[collection
- ["[0]" list ("[1]#[0]" monoid functor)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid functor)]]]
[math
[number
["n" nat]
@@ -15,7 +15,7 @@
["[0]" i32]]]
[target
[jvm
- ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)]
+ ["_" bytecode (.only Label Bytecode) (.open: "[1]#[0]" monad)]
["[0]" method (.only Method)]
[constant
[pool (.only Resource)]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux
index 53f43707d..e7e970d87 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux
@@ -9,7 +9,7 @@
["n" nat]]]
[target
[jvm
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" method (.only Method)]
["_" bytecode (.only Label Bytecode)]
[constant
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux
index da0d00cb2..32a1e4de8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux
@@ -7,7 +7,7 @@
["[0]" try]]
[data
[collection
- ["[0]" list ("[1]#[0]" monoid functor)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid functor)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux
index f52b7d682..51ceaf844 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux
@@ -3,7 +3,7 @@
[lux (.except Type type)
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[target
[jvm
["[0]" method (.only Method)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux
index dc28346dc..ebd1008a1 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux
@@ -14,7 +14,7 @@
[data
[binary (.only Binary)]
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]]
[collection
["[0]" array]
@@ -26,7 +26,7 @@
[jvm
["_" bytecode (.only Bytecode)]
["[0]" loader (.only Library)]
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" field (.only Field)]
["[0]" method (.only Method)]
["[0]" version]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux
index a0d7cffbc..f06d37da3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux
@@ -8,13 +8,13 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
[target
[jvm
- ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]]]]]
+ ["_" bytecode (.only Bytecode) (.open: "[1]#[0]" monad)]]]]]
["[0]" //
["[1][0]" runtime (.only Operation Phase Generator)]
["[1][0]" value]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux
index 94df434f2..6f9aa8aa3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux
@@ -13,7 +13,7 @@
[target
[jvm
["_" bytecode (.only Bytecode)]
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" method (.only Method)]
["[0]" version]
["[0]" class (.only Class)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
index 9ff51ff95..d923ea65d 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
@@ -10,7 +10,7 @@
[binary (.only Binary)]
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]
["[0]" format
["[1]" binary]]
@@ -26,7 +26,7 @@
[target
["[0]" jvm
["_" bytecode (.only Label Bytecode)]
- ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)]
+ ["[0]" modifier (.only Modifier) (.open: "[1]#[0]" monoid)]
["[0]" field (.only Field)]
["[0]" method (.only Method)]
["[1]/[0]" version]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux
index d2fdbb1cc..a415f60fa 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux
@@ -4,7 +4,7 @@
[target
[jvm
["_" bytecode (.only Bytecode)]
- ["[0]" type (.only Type) ("[1]#[0]" equivalence)
+ ["[0]" type (.only Type) (.open: "[1]#[0]" equivalence)
[category (.only Primitive)]
["[0]" box]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux
index 859c60b50..8d861e382 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux
@@ -28,7 +28,7 @@
[analysis (.only)]
["[0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux
index 59d0fa42d..c65093838 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux
@@ -7,7 +7,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[macro
["^" pattern]]
@@ -30,7 +30,7 @@
["//[1]" ///
[reference
["[1][0]" variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux
index d2907e282..a8757090a 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux
@@ -8,7 +8,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[target
["_" lua (.only Var Expression Label Statement)]]]]
["[0]" //
@@ -23,7 +23,7 @@
["[1][0]" generation]
["//[1]" ///
[arity (.only Arity)]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive
["[0]" unit]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux
index 66b05a97e..c79123870 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux
@@ -8,7 +8,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set]]]
[math
[number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux
index 4f31dd592..9b72bdf74 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux
@@ -10,12 +10,12 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux
index 1b8610f2b..65ed33699 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux
@@ -13,7 +13,7 @@
[analysis
[complex (.only Variant Tuple)]]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple phase archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux
index 38c06a8c2..3d2107867 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux
@@ -25,7 +25,7 @@
[analysis (.only)]
["[1][0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux
index 03c82f322..9815d9e3e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[macro
["^" pattern]]
@@ -32,7 +32,7 @@
["//[1]" ///
[reference
["[1][0]" variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux
index e304677d2..b6c9d1ab2 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux
@@ -10,7 +10,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[target
["_" php (.only Var Global Expression Argument Label Statement)]]]]
["[0]" //
@@ -25,7 +25,7 @@
["[1][0]" generation (.only Context)]
["//[1]" ///
[arity (.only Arity)]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference
[variable (.only Register Variable)]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux
index 5fab85e16..633b2c724 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set (.only Set)]]]
[math
[number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux
index 68b9671b1..649463554 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux
@@ -10,12 +10,12 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux
index e843e0676..d7a945e58 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux
@@ -15,7 +15,7 @@
[analysis (.only Variant Tuple)]
["[1][0]" synthesis (.only Synthesis)]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple expression archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux
index 96a5ebc4e..f3e8d85b8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux
@@ -28,7 +28,7 @@
[analysis (.only)]
["[1][0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux
index cbf957e34..dbb669dd8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux
@@ -7,7 +7,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[macro
["^" pattern]]
@@ -34,7 +34,7 @@
["//[1]" ///
[reference
["[1][0]" variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]
["[0]" cache
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux
index ee09d8060..feb8d0c26 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux
@@ -8,7 +8,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[target
["_" python (.only SVar Expression Statement)]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux
index d48bad978..d4e202ffc 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux
@@ -8,7 +8,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[math
[number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux
index 135f8db40..bc10a524b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux
@@ -9,12 +9,12 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux
index d8e397694..560fb1c49 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux
@@ -13,7 +13,7 @@
[complex (.only Variant Tuple)]]
["[1][0]" synthesis (.only Synthesis)]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple generate archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux
index 8c8ec4fea..3e4cf4f0e 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux
@@ -23,7 +23,7 @@
[analysis (.only)]
["[1][0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux
index 60f553909..1ad75fe08 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[macro
["^" pattern]
@@ -33,7 +33,7 @@
["//[1]" ///
[reference
["[1][0]" variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux
index a523fc621..59b92e776 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux
@@ -10,7 +10,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[target
["_" r (.only Expression SVar)]]]]
["[0]" //
@@ -25,7 +25,7 @@
["[1][0]" generation (.only Context)]
["//[1]" ///
[arity (.only Arity)]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference
[variable (.only Register Variable)]]
[meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux
index c71e536d2..f3756aad8 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set (.only Set)]]]
[math
[number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux
index 9bee4f953..e430bfaff 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux
@@ -10,12 +10,12 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
@@ -23,7 +23,7 @@
[math
[number (.only hex)
["n" nat]
- ["i" int ("[1]#[0]" interval)]
+ ["i" int (.open: "[1]#[0]" interval)]
["[0]" i64]]]
["@" target (.only)
["_" r (.only SVar Expression)]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux
index 82dc15ca4..f41b3268d 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux
@@ -15,7 +15,7 @@
[analysis (.only Variant Tuple)]
["[1][0]" synthesis (.only Synthesis)]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple expression archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux
index 0c7d531b9..f93648d04 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux
@@ -10,7 +10,7 @@
["[0]" ////
["[1][0]" generation]
["//[1]" ///
- ["[0]" phase ("[1]#[0]" monad)]
+ ["[0]" phase (.open: "[1]#[0]" monad)]
["[0]" reference (.only Reference)
["[0]" variable (.only Register Variable)]]
[meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux
index 218c8f226..f0e8638e4 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux
@@ -28,7 +28,7 @@
[analysis (.only)]
["[1][0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux
index bf7a4bc42..0f805e277 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux
@@ -9,7 +9,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[macro
["^" pattern]]
@@ -36,7 +36,7 @@
["//[1]" ///
[reference
["[1][0]" variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux
index c32ea1cc3..d0ff811b2 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux
@@ -8,7 +8,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[target
["_" ruby (.only LVar GVar Expression Statement)]]]]
["[0]" //
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux
index e5acb087a..3686ad6d9 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[math
[number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux
index bb811fc61..e309396f2 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux
@@ -10,12 +10,12 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
@@ -23,7 +23,7 @@
[math
[number (.only hex)
["[0]" i64]
- ["[0]" int ("[1]#[0]" interval)]]]
+ ["[0]" int (.open: "[1]#[0]" interval)]]]
["@" target (.only)
["_" ruby (.only Expression LVar Computation Literal Statement)]]]]
["[0]" ///
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux
index 4ebe22359..791f06d76 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux
@@ -13,7 +13,7 @@
[complex (.only Variant Tuple)]]
["[1][0]" synthesis (.only Synthesis)]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple generate archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux
index 3e9b76aa3..061a5c26c 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux
@@ -23,7 +23,7 @@
[analysis (.only)]
["[1][0]" synthesis]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux
index d111d7349..0c5465e96 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[macro
["^" pattern]
@@ -33,7 +33,7 @@
["//[1]" ///
[reference
["[1][0]" variable (.only Register)]]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
[archive (.only Archive)]]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux
index fe13c1aa2..f74911bc3 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux
@@ -13,7 +13,7 @@
[number (.only hex)
["f" frac]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["dict" dictionary (.only Dictionary)]]]
["[0]" macro (.only with_symbols)
["[0]" code]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux
index baf83633b..c937c11e7 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux
@@ -10,7 +10,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[target
["_" scheme (.only Expression Computation Var)]]]]
["[0]" //
@@ -25,7 +25,7 @@
["[1][0]" generation (.only Context)]
["//[1]" ///
[arity (.only Arity)]
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference
[variable (.only Register Variable)]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux
index 0f7a9c50a..6796a3944 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux
@@ -8,7 +8,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set (.only Set)]]]
[math
[number
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux
index c60d67bd1..94b77f919 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux
@@ -10,12 +10,12 @@
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" sequence]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux
index 2c90b2010..ec1611ddf 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux
@@ -15,7 +15,7 @@
[analysis (.only Variant Tuple)]
["[1][0]" synthesis (.only Synthesis)]
["//[1]" ///
- ["[1][0]" phase ("[1]#[0]" monad)]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]])
(def: .public (tuple expression archive elemsS+)
(Generator (Tuple Synthesis))
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux
index 0600ba9c0..99db4589b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux
@@ -8,7 +8,7 @@
["[0]" try]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["^" pattern]]]]
@@ -25,7 +25,7 @@
["[2][0]" simple]
["[2][0]" complex]]
[///
- ["[0]" phase ("[1]#[0]" monad)]
+ ["[0]" phase (.open: "[1]#[0]" monad)]
[reference (.only)
[variable (.only)]]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux
index 5890ab241..bdbcdeb02 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux
@@ -8,10 +8,10 @@
["[0]" pipe]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" functor mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
["[0]" set (.only Set)]]]
[macro
["^" pattern]]
@@ -31,7 +31,7 @@
["[2][0]" side]
["[2][0]" member (.only Member)]]]
[///
- ["[1]" phase ("[1]#[0]" monad)]
+ ["[1]" phase (.open: "[1]#[0]" monad)]
["[1][0]" reference (.only)
["[1]/[0]" variable (.only Register Variable)]]
[meta
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux
index f1e08702f..dec9a0177 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux
@@ -6,13 +6,13 @@
["[0]" enum]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]]
[data
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
[macro
["^" pattern]]
[math
@@ -26,7 +26,7 @@
["/" synthesis (.only Path Abstraction Synthesis Operation Phase)]
[///
[arity (.only Arity)]
- ["[0]" phase ("[1]#[0]" monad)]
+ ["[0]" phase (.open: "[1]#[0]" monad)]
["[1][0]" reference (.only)
["[1]/[0]" variable (.only Register Variable)]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
index e8388ed17..b3cb4d704 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
@@ -4,7 +4,7 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]]
[data
[collection
["[0]" list]]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
index f774ddb6d..584612bbb 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
@@ -4,7 +4,7 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]]
[data
@@ -13,7 +13,7 @@
["%" format]]
[collection
["[0]" dictionary (.only Dictionary)]
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" set]]]
[macro
["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/program.lux b/stdlib/source/library/lux/tool/compiler/language/lux/program.lux
index 30276425b..11d63955b 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/program.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/program.lux
@@ -12,7 +12,7 @@
[text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]]]
[////
[meta
["[0]" archive (.only Archive)
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux
index fbc202680..d1cad0503 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux
@@ -11,11 +11,11 @@
[data
["[0]" sum]
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only Format format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["^" pattern]]
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux
index f925aa95c..17419d58f 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux
@@ -7,14 +7,14 @@
[control
["[0]" pipe]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]]
[macro
["^" pattern]]
[math
[number
- ["[0]" i64 ("[1]#[0]" equivalence)]
+ ["[0]" i64 (.open: "[1]#[0]" equivalence)]
["n" nat]
["i" int]
["f" frac]]]]])
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive.lux b/stdlib/source/library/lux/tool/compiler/meta/archive.lux
index 41d12fdc2..b88b57053 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive.lux
@@ -19,13 +19,13 @@
[format
["[0]" binary (.only Writer)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]
["[0]" set]
["[0]" sequence (.only Sequence)]]]
[math
[number
- ["n" nat ("[1]#[0]" equivalence)]]]
+ ["n" nat (.open: "[1]#[0]" equivalence)]]]
[type
[primitive (.except)]]]]
[/
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux
index 085e3d001..146b2d12d 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux
@@ -7,7 +7,7 @@
["[0]" maybe]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux
index 7daff5d95..7f0f4faeb 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux
@@ -16,7 +16,7 @@
[type (.only sharing)
[primitive (.except)]]]]
[///
- ["[0]" signature (.only Signature) ("[1]#[0]" equivalence)]
+ ["[0]" signature (.only Signature) (.open: "[1]#[0]" equivalence)]
["[0]" key (.only Key)]])
(exception: .public (invalid_signature [expected Signature
diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux
index 56586bd2e..3b849a479 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux
@@ -5,7 +5,7 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
["<>" parser (.only)
["<[0]>" binary (.only Parser)]]]
@@ -16,7 +16,7 @@
[collection
[set (.only Set)]
["[0]" list]
- ["[0]" sequence (.only Sequence) ("[1]#[0]" functor mix)]
+ ["[0]" sequence (.only Sequence) (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]]
[format
["[0]" binary (.only Writer)]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux
index 18a6165f6..8008fe5a6 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux
@@ -8,7 +8,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" monoid mix monad)]
+ ["[0]" list (.open: "[1]#[0]" monoid mix monad)]
["[0]" set (.only Set)]
["[0]" dictionary (.only Dictionary)]
["[0]" sequence]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux
index fb2fa3ab8..b1d64ebb5 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux
@@ -4,7 +4,7 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]
["[0]" state]
[function
@@ -13,7 +13,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]
["[0]" set (.only Set)]]]]]
[////
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux
index 35cb42cac..9a4ed2e1b 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux
@@ -11,10 +11,10 @@
[data
[binary (.only Binary)]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]
[world
["[0]" file]]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux
index 8cb425843..6ccdcdd56 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux
@@ -5,13 +5,13 @@
[predicate (.only Predicate)]
["[0]" monad (.only Monad do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
[concurrency
["[0]" async (.only Async)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" mix functor)]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]
["[0]" dictionary (.only Dictionary)]
["[0]" set]]]
[math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cli.lux b/stdlib/source/library/lux/tool/compiler/meta/cli.lux
index a3e631d17..d611dde33 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cli.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cli.lux
@@ -14,7 +14,7 @@
["[0]" text (.only)
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux b/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux
index bdd1e8714..1d37314b6 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux
@@ -12,7 +12,7 @@
["[0]" text (.only)
["%" format]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number (.only hex)]]
[meta
diff --git a/stdlib/source/library/lux/tool/compiler/meta/export.lux b/stdlib/source/library/lux/tool/compiler/meta/export.lux
index e5391b566..21c75e46c 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/export.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/export.lux
@@ -4,9 +4,9 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" monad)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" monad)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" functor)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" functor)]]]
[data
["[0]" text (.only)
["%" format (.only format)]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux b/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux
index d5aadcdd9..435a8d3fb 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux
@@ -7,17 +7,17 @@
[control
["[0]" try (.only Try)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
["<>" parser (.only)
["<[0]>" binary (.only Parser)]]]
[data
[binary (.only Binary)]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
[set (.only Set)]
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
["[0]" dictionary (.only Dictionary)]
["[0]" sequence (.only Sequence)]]]
[macro
diff --git a/stdlib/source/library/lux/tool/compiler/meta/io/context.lux b/stdlib/source/library/lux/tool/compiler/meta/io/context.lux
index 06c7fb4f8..96e91fbd6 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/io/context.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/io/context.lux
@@ -10,10 +10,10 @@
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[data
[binary (.only Binary)]
- ["[0]" text ("[1]#[0]" hash)
+ ["[0]" text (.open: "[1]#[0]" hash)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager.lux b/stdlib/source/library/lux/tool/compiler/meta/packager.lux
index a45d43772..1543e082f 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager.lux
@@ -9,7 +9,7 @@
[collection
[dictionary (.only Dictionary)]
["[0]" sequence]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[world
["[0]" file]]]]
[//
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux
index 197d404b8..63df754f0 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux
@@ -5,7 +5,7 @@
[abstract
["[0]" monad (.only Monad do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]]
[data
["[0]" binary (.only Binary)]
@@ -13,7 +13,7 @@
["%" format (.only format)]]
[collection
["[0]" sequence]
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary]
["[0]" set (.only Set)]]]
[math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux
index a1b7bb6a3..1fbd7ddc9 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux
@@ -15,7 +15,7 @@
["[0]" utf8]]]
[collection
["[0]" sequence]
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]
["[0]" set (.only Set)]]]
[math
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
index 5c6ba160e..d99635b00 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
@@ -14,7 +14,7 @@
["[0]" encoding]]
[collection
["[0]" sequence]
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]
["[0]" set]]
[format
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux
index 4503723f9..9c140909d 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux
@@ -16,7 +16,7 @@
[collection
["[0]" sequence]
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" functor)]]]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]]]
["[0]" // (.only Packager)
[//
["[0]" archive (.only Output)
diff --git a/stdlib/source/library/lux/tool/compiler/phase.lux b/stdlib/source/library/lux/tool/compiler/phase.lux
index 35e8215f6..213d40339 100644
--- a/stdlib/source/library/lux/tool/compiler/phase.lux
+++ b/stdlib/source/library/lux/tool/compiler/phase.lux
@@ -6,7 +6,7 @@
[monad (.only Monad do)]]
[control
["[0]" state]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only Exception)]
["[0]" io]]
[data
diff --git a/stdlib/source/library/lux/tool/interpreter.lux b/stdlib/source/library/lux/tool/interpreter.lux
index 74d9a49f1..07405ea54 100644
--- a/stdlib/source/library/lux/tool/interpreter.lux
+++ b/stdlib/source/library/lux/tool/interpreter.lux
@@ -6,7 +6,7 @@
["[0]" try (.only Try)]
["ex" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[type (.only sharing)
["[0]" check]]
diff --git a/stdlib/source/library/lux/type.lux b/stdlib/source/library/lux/type.lux
index 879334883..6976a1df0 100644
--- a/stdlib/source/library/lux/type.lux
+++ b/stdlib/source/library/lux/type.lux
@@ -13,20 +13,20 @@
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" monoid equivalence)]
+ ["[0]" text (.open: "[1]#[0]" monoid equivalence)]
[collection
["[0]" array]
- ["[0]" list ("[1]#[0]" monad monoid mix)]]]
+ ["[0]" list (.open: "[1]#[0]" monad monoid mix)]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
["^" pattern]
["[0]" code]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]]]
+ ["n" nat (.open: "[1]#[0]" decimal)]]]
["[0]" meta (.only)
["[0]" location]
- ["[0]" symbol ("[1]#[0]" equivalence codec)]]]])
+ ["[0]" symbol (.open: "[1]#[0]" equivalence codec)]]]])
(template [<name> <tag>]
[(def: .public (<name> type)
diff --git a/stdlib/source/library/lux/type/check.lux b/stdlib/source/library/lux/type/check.lux
index e61b0fb11..a98b54932 100644
--- a/stdlib/source/library/lux/type/check.lux
+++ b/stdlib/source/library/lux/type/check.lux
@@ -12,16 +12,16 @@
["[0]" exception (.only Exception exception:)]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" monoid equivalence)]
+ ["[0]" text (.open: "[1]#[0]" monoid equivalence)]
[collection
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
["[0]" set (.only Set)]]]
[macro
["^" pattern]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]]]]]
- ["[0]" // ("[1]#[0]" equivalence)])
+ ["n" nat (.open: "[1]#[0]" decimal)]]]]]
+ ["[0]" // (.open: "[1]#[0]" equivalence)])
(template: (!n#= reference subject)
[("lux i64 =" reference subject)])
diff --git a/stdlib/source/library/lux/type/implicit.lux b/stdlib/source/library/lux/type/implicit.lux
index e4fb1cac1..622e308ed 100644
--- a/stdlib/source/library/lux/type/implicit.lux
+++ b/stdlib/source/library/lux/type/implicit.lux
@@ -11,10 +11,10 @@
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad mix)]
+ ["[0]" list (.open: "[1]#[0]" monad mix)]
["[0]" dictionary (.only Dictionary)]]]
["[0]" macro (.only)
["[0]" code]
@@ -23,7 +23,7 @@
["[0]" number (.only)
["n" nat]]]
["[0]" meta]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check (.only Check)]]]])
(def: (type_var id env)
diff --git a/stdlib/source/library/lux/type/poly.lux b/stdlib/source/library/lux/type/poly.lux
index a888e8e7e..cb18f9967 100644
--- a/stdlib/source/library/lux/type/poly.lux
+++ b/stdlib/source/library/lux/type/poly.lux
@@ -7,14 +7,14 @@
["[0]" monad (.only do)]]
[control
["[0]" maybe]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" type (.only Env)]
["<[0]>" code (.only Parser)]]]
[data
["[0]" product]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary]]]
[macro (.only with_symbols)
[syntax (.only syntax:)]
diff --git a/stdlib/source/library/lux/type/primitive.lux b/stdlib/source/library/lux/type/primitive.lux
index e45876b69..7486a56fc 100644
--- a/stdlib/source/library/lux/type/primitive.lux
+++ b/stdlib/source/library/lux/type/primitive.lux
@@ -6,19 +6,19 @@
[monad (.only Monad do)]]
[control
["[0]" exception (.only exception:)]
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence monoid)]
+ ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
[macro
["^" pattern]
["[0]" code]
[syntax (.only syntax:)
["|[0]|" export]]]
[meta
- ["[0]" symbol ("[1]#[0]" codec)]]]]
+ ["[0]" symbol (.open: "[1]#[0]" codec)]]]]
["[0]" //])
(type: Stack
diff --git a/stdlib/source/library/lux/type/resource.lux b/stdlib/source/library/lux/type/resource.lux
index 57d52c9a8..f2365d0cf 100644
--- a/stdlib/source/library/lux/type/resource.lux
+++ b/stdlib/source/library/lux/type/resource.lux
@@ -16,7 +16,7 @@
[collection
["[0]" set]
["[0]" sequence (.only Sequence)]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
["[0]" macro (.only)
[syntax (.only syntax:)]]
[math
diff --git a/stdlib/source/library/lux/type/unit.lux b/stdlib/source/library/lux/type/unit.lux
index 91942f05c..317dc1848 100644
--- a/stdlib/source/library/lux/type/unit.lux
+++ b/stdlib/source/library/lux/type/unit.lux
@@ -8,7 +8,7 @@
[order (.only Order)]
[enum (.only Enum)]]
[control
- ["<>" parser ("[1]#[0]" monad)
+ ["<>" parser (.open: "[1]#[0]" monad)
["<[0]>" code (.only Parser)]]]
[data
["[0]" text (.only)
diff --git a/stdlib/source/library/lux/world/console.lux b/stdlib/source/library/lux/world/console.lux
index a6b0d4668..b1d7dac13 100644
--- a/stdlib/source/library/lux/world/console.lux
+++ b/stdlib/source/library/lux/world/console.lux
@@ -7,11 +7,11 @@
[monad (.only do)]]
[control
["[0]" maybe]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
- ["[0]" io (.only IO io) ("[1]#[0]" functor)]
+ ["[0]" io (.only IO io) (.open: "[1]#[0]" functor)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]
["[0]" atom]]]
[data
["[0]" text (.only Char)
diff --git a/stdlib/source/library/lux/world/db/jdbc.lux b/stdlib/source/library/lux/world/db/jdbc.lux
index 6942f788a..c8d453d53 100644
--- a/stdlib/source/library/lux/world/db/jdbc.lux
+++ b/stdlib/source/library/lux/world/db/jdbc.lux
@@ -8,7 +8,7 @@
["[0]" try (.only Try)]
["ex" exception]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
[security
["!" capability (.only capability:)]]]
[data
diff --git a/stdlib/source/library/lux/world/db/sql.lux b/stdlib/source/library/lux/world/db/sql.lux
index 2706dd6a4..084ef671f 100644
--- a/stdlib/source/library/lux/world/db/sql.lux
+++ b/stdlib/source/library/lux/world/db/sql.lux
@@ -6,10 +6,10 @@
[data
[number
["i" int]]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["[0]" template]]
[type
diff --git a/stdlib/source/library/lux/world/file.lux b/stdlib/source/library/lux/world/file.lux
index 93a3879ac..f03256f14 100644
--- a/stdlib/source/library/lux/world/file.lux
+++ b/stdlib/source/library/lux/world/file.lux
@@ -6,23 +6,23 @@
["[0]" monad (.only Monad do)]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
- ["[0]" io (.only IO) ("[1]#[0]" functor)]
+ ["[0]" io (.only IO) (.open: "[1]#[0]" functor)]
["[0]" function]
[concurrency
["[0]" async (.only Async)]
["[0]" stm (.only Var STM)]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" product]
["[0]" binary (.only Binary)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" array (.only Array)]
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" dictionary (.only Dictionary)]]]
["[0]" ffi
(~~ (.for "JavaScript" (~~ (.these ["[0]" node_js]))
diff --git a/stdlib/source/library/lux/world/file/watch.lux b/stdlib/source/library/lux/world/file/watch.lux
index 60e01ebc6..a3026e8e8 100644
--- a/stdlib/source/library/lux/world/file/watch.lux
+++ b/stdlib/source/library/lux/world/file/watch.lux
@@ -20,14 +20,14 @@
["%" format (.only format)]]
[collection
["[0]" dictionary (.only Dictionary)]
- ["[0]" list ("[1]#[0]" functor monoid mix)]
+ ["[0]" list (.open: "[1]#[0]" functor monoid mix)]
["[0]" set]
["[0]" array]]]
[math
[number
["n" nat]]]
[time
- ["[0]" instant (.only Instant) ("[1]#[0]" equivalence)]]
+ ["[0]" instant (.only Instant) (.open: "[1]#[0]" equivalence)]]
[type
[primitive (.only primitive: representation abstraction)]]]]
["[0]" //])
diff --git a/stdlib/source/library/lux/world/net/http/client.lux b/stdlib/source/library/lux/world/net/http/client.lux
index 49ead2fd3..7f0a1588f 100644
--- a/stdlib/source/library/lux/world/net/http/client.lux
+++ b/stdlib/source/library/lux/world/net/http/client.lux
@@ -8,7 +8,7 @@
[control
["[0]" pipe]
["[0]" io (.only IO)]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]
[concurrency
["[0]" async (.only Async)]]
diff --git a/stdlib/source/library/lux/world/net/http/cookie.lux b/stdlib/source/library/lux/world/net/http/cookie.lux
index 60fe0989a..bb09b61ee 100644
--- a/stdlib/source/library/lux/world/net/http/cookie.lux
+++ b/stdlib/source/library/lux/world/net/http/cookie.lux
@@ -4,7 +4,7 @@
[control
[monad (.only do)]
["[0]" try (.only Try)]
- ["p" parser ("[1]#[0]" monad)
+ ["p" parser (.open: "[1]#[0]" monad)
["l" text (.only Parser)]]]
[data
[number
diff --git a/stdlib/source/library/lux/world/net/http/request.lux b/stdlib/source/library/lux/world/net/http/request.lux
index 6c6325eb6..86d74217d 100644
--- a/stdlib/source/library/lux/world/net/http/request.lux
+++ b/stdlib/source/library/lux/world/net/http/request.lux
@@ -20,7 +20,7 @@
["[0]" json (.only JSON)]
["[0]" context (.only Context Property)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary]]]
[macro
["^" pattern]]
diff --git a/stdlib/source/library/lux/world/net/http/response.lux b/stdlib/source/library/lux/world/net/http/response.lux
index ed50b5f08..4e4542dde 100644
--- a/stdlib/source/library/lux/world/net/http/response.lux
+++ b/stdlib/source/library/lux/world/net/http/response.lux
@@ -4,7 +4,7 @@
[control
[concurrency
["[0]" async]
- ["[0]" frp ("[1]#[0]" monad)]]]
+ ["[0]" frp (.open: "[1]#[0]" monad)]]]
[data
["[0]" text
["[0]" encoding]]
@@ -12,7 +12,7 @@
["[0]" html]
["[0]" css (.only CSS)]
["[0]" context]
- ["[0]" json (.only JSON) ("[1]#[0]" codec)]]]
+ ["[0]" json (.only JSON) (.open: "[1]#[0]" codec)]]]
["[0]" io]
[world
["[0]" binary (.only Binary)]]]]
diff --git a/stdlib/source/library/lux/world/program.lux b/stdlib/source/library/lux/world/program.lux
index 90000b855..c78116cbe 100644
--- a/stdlib/source/library/lux/world/program.lux
+++ b/stdlib/source/library/lux/world/program.lux
@@ -7,7 +7,7 @@
[control
["[0]" function]
["[0]" io (.only IO)]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]
[concurrency
@@ -16,13 +16,13 @@
[parser
["[0]" environment (.only Environment)]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text (.only)
["%" format (.only format)]]
[collection
["[0]" array (.only Array)]
["[0]" dictionary (.only Dictionary)]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
["[0]" ffi (.only import:)
(~~ (.for "JavaScript" (~~ (.these ["[0]" node_js]))
"{old}" (~~ (.these ["node_js" //math]))
diff --git a/stdlib/source/library/lux/world/shell.lux b/stdlib/source/library/lux/world/shell.lux
index be59e7b65..e52d4e0f3 100644
--- a/stdlib/source/library/lux/world/shell.lux
+++ b/stdlib/source/library/lux/world/shell.lux
@@ -25,7 +25,7 @@
["[0]" utf8]]]
[collection
["[0]" array (.only Array)]
- ["[0]" list ("[1]#[0]" mix functor)]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]
["[0]" dictionary]]]
[math
[number (.only hex)
diff --git a/stdlib/source/poly/lux/abstract/equivalence.lux b/stdlib/source/poly/lux/abstract/equivalence.lux
index b13c38453..63a88058e 100644
--- a/stdlib/source/poly/lux/abstract/equivalence.lux
+++ b/stdlib/source/poly/lux/abstract/equivalence.lux
@@ -10,10 +10,10 @@
[data
["[0]" product]
["[0]" bit]
- ["[0]" text ("[1]#[0]" monoid)
+ ["[0]" text (.open: "[1]#[0]" monoid)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" monad)]
["[0]" sequence]
["[0]" array]
["[0]" queue]
@@ -25,7 +25,7 @@
["[0]" code]]
[math
[number
- ["[0]" nat ("[1]#[0]" decimal)]
+ ["[0]" nat (.open: "[1]#[0]" decimal)]
["[0]" int]
["[0]" rev]
["[0]" frac]]]
diff --git a/stdlib/source/poly/lux/abstract/functor.lux b/stdlib/source/poly/lux/abstract/functor.lux
index 78a11f2fd..f7a4a6d7d 100644
--- a/stdlib/source/poly/lux/abstract/functor.lux
+++ b/stdlib/source/poly/lux/abstract/functor.lux
@@ -12,7 +12,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" monad monoid)]]]
[macro
[syntax (.only syntax:)]
["[0]" code]]
diff --git a/stdlib/source/poly/lux/data/format/json.lux b/stdlib/source/poly/lux/data/format/json.lux
index 09b65efea..2bf11cdc7 100644
--- a/stdlib/source/poly/lux/data/format/json.lux
+++ b/stdlib/source/poly/lux/data/format/json.lux
@@ -15,7 +15,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" monad)]
["[0]" sequence (.only sequence)]
["[0]" dictionary]]]
[macro
@@ -23,7 +23,7 @@
["[0]" code]]
[math
[number
- ["n" nat ("[1]#[0]" decimal)]
+ ["n" nat (.open: "[1]#[0]" decimal)]
["[0]" i64]
["[0]" int]
["[0]" frac]]]
diff --git a/stdlib/source/program/aedifex.lux b/stdlib/source/program/aedifex.lux
index e753fbed6..d14e5ba74 100644
--- a/stdlib/source/program/aedifex.lux
+++ b/stdlib/source/program/aedifex.lux
@@ -8,12 +8,12 @@
[control
["[0]" io (.only IO)]
["[0]" maybe]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
[parser
[environment (.only Environment)]]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[data
[binary (.only Binary)]
["[0]" text (.only)
@@ -25,7 +25,7 @@
[collection
["[0]" set]
["[0]" dictionary (.only Dictionary)]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[tool
[compiler
[language
diff --git a/stdlib/source/program/aedifex/artifact.lux b/stdlib/source/program/aedifex/artifact.lux
index 0b7a03d9c..247e4a5d0 100644
--- a/stdlib/source/program/aedifex/artifact.lux
+++ b/stdlib/source/program/aedifex/artifact.lux
@@ -7,10 +7,10 @@
[hash (.only Hash)]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" order)
+ ["[0]" text (.open: "[1]#[0]" order)
["%" format (.only Format)]]
[collection
- ["[0]" list ("[1]#[0]" monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]
[world
["[0]" file (.only Path)]
[net
diff --git a/stdlib/source/program/aedifex/artifact/time/date.lux b/stdlib/source/program/aedifex/artifact/time/date.lux
index 4f364d651..31a2f0f2a 100644
--- a/stdlib/source/program/aedifex/artifact/time/date.lux
+++ b/stdlib/source/program/aedifex/artifact/time/date.lux
@@ -17,7 +17,7 @@
["n" nat]
["i" int]]]
[time
- ["[0]" date ("[1]#[0]" equivalence)]
+ ["[0]" date (.open: "[1]#[0]" equivalence)]
["[0]" year]
["[0]" month]]
[type
diff --git a/stdlib/source/program/aedifex/artifact/versioning.lux b/stdlib/source/program/aedifex/artifact/versioning.lux
index b9c158c6b..9c7dab3c6 100644
--- a/stdlib/source/program/aedifex/artifact/versioning.lux
+++ b/stdlib/source/program/aedifex/artifact/versioning.lux
@@ -16,7 +16,7 @@
[format
["[0]" xml (.only XML)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/program/aedifex/command/build.lux b/stdlib/source/program/aedifex/command/build.lux
index 3e175f2d7..d08f7f7b1 100644
--- a/stdlib/source/program/aedifex/command/build.lux
+++ b/stdlib/source/program/aedifex/command/build.lux
@@ -6,17 +6,17 @@
[order (.only Order)]
[monad (.only do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]
["[0]" io (.only IO)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" order)
+ ["[0]" text (.open: "[1]#[0]" order)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]
["[0]" set]]]
[macro
diff --git a/stdlib/source/program/aedifex/command/deps.lux b/stdlib/source/program/aedifex/command/deps.lux
index 379217a18..915ac8db0 100644
--- a/stdlib/source/program/aedifex/command/deps.lux
+++ b/stdlib/source/program/aedifex/command/deps.lux
@@ -10,7 +10,7 @@
[data
[collection
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
["[0]" dictionary]]
[text
["%" format]]]
diff --git a/stdlib/source/program/aedifex/command/pom.lux b/stdlib/source/program/aedifex/command/pom.lux
index 478f77946..784a07d9a 100644
--- a/stdlib/source/program/aedifex/command/pom.lux
+++ b/stdlib/source/program/aedifex/command/pom.lux
@@ -4,9 +4,9 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[data
[text
["%" format (.only format)]
diff --git a/stdlib/source/program/aedifex/command/test.lux b/stdlib/source/program/aedifex/command/test.lux
index 994bf7967..fa3d55d1d 100644
--- a/stdlib/source/program/aedifex/command/test.lux
+++ b/stdlib/source/program/aedifex/command/test.lux
@@ -6,7 +6,7 @@
[control
[try (.only Try)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[data
[collection
["[0]" dictionary]]]
diff --git a/stdlib/source/program/aedifex/dependency.lux b/stdlib/source/program/aedifex/dependency.lux
index 3a8a69d81..9e522fa94 100644
--- a/stdlib/source/program/aedifex/dependency.lux
+++ b/stdlib/source/program/aedifex/dependency.lux
@@ -7,10 +7,10 @@
[hash (.only Hash)]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" order)
+ ["[0]" text (.open: "[1]#[0]" order)
["%" format (.only format)]]]]]
["[0]" //
- ["[1]" artifact (.only Artifact) ("[1]#[0]" order)
+ ["[1]" artifact (.only Artifact) (.open: "[1]#[0]" order)
[type (.only Type)]]])
(type: .public Dependency
diff --git a/stdlib/source/program/aedifex/dependency/deployment.lux b/stdlib/source/program/aedifex/dependency/deployment.lux
index a904e9f6c..69d85ef9a 100644
--- a/stdlib/source/program/aedifex/dependency/deployment.lux
+++ b/stdlib/source/program/aedifex/dependency/deployment.lux
@@ -18,7 +18,7 @@
[collection
["[0]" dictionary]
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]
[time
["[0]" instant (.only Instant)]]]]
["[0]" ///
diff --git a/stdlib/source/program/aedifex/dependency/resolution.lux b/stdlib/source/program/aedifex/dependency/resolution.lux
index f535dd186..568973c47 100644
--- a/stdlib/source/program/aedifex/dependency/resolution.lux
+++ b/stdlib/source/program/aedifex/dependency/resolution.lux
@@ -11,7 +11,7 @@
["[0]" predicate (.only Predicate)]]
[control
["[0]" maybe]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only Exception exception:)]
["<>" parsernone
["<[0]>" xml (.only Parser)]]
@@ -28,7 +28,7 @@
[collection
["[0]" dictionary (.only Dictionary)]
["[0]" set]
- ["[0]" list ("[1]#[0]" functor monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]]]
[math
[number
["n" nat]
diff --git a/stdlib/source/program/aedifex/format.lux b/stdlib/source/program/aedifex/format.lux
index af0521b85..456f621e7 100644
--- a/stdlib/source/program/aedifex/format.lux
+++ b/stdlib/source/program/aedifex/format.lux
@@ -2,10 +2,10 @@
[library
[lux (.except)
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" dictionary (.only Dictionary)]
- ["[0]" list ("[1]#[0]" monad)]
+ ["[0]" list (.open: "[1]#[0]" monad)]
["[0]" set (.only Set)]]]
[macro
["[0]" code]
diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux
index 113db629d..0ba7371b8 100644
--- a/stdlib/source/program/aedifex/metadata/artifact.lux
+++ b/stdlib/source/program/aedifex/metadata/artifact.lux
@@ -21,7 +21,7 @@
[format
["[0]" xml (.only XML)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux
index 1e0879467..eb2f48c76 100644
--- a/stdlib/source/program/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/program/aedifex/metadata/snapshot.lux
@@ -22,7 +22,7 @@
[format
["[0]" xml (.only XML)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
[number
["n" nat]]]
diff --git a/stdlib/source/program/aedifex/package.lux b/stdlib/source/program/aedifex/package.lux
index f8f140b40..4706c50ce 100644
--- a/stdlib/source/program/aedifex/package.lux
+++ b/stdlib/source/program/aedifex/package.lux
@@ -4,7 +4,7 @@
[abstract
[equivalence (.only Equivalence)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
[parser
["<[0]>" xml]]]
[data
diff --git a/stdlib/source/program/aedifex/parser.lux b/stdlib/source/program/aedifex/parser.lux
index b4014f06a..7f184b2eb 100644
--- a/stdlib/source/program/aedifex/parser.lux
+++ b/stdlib/source/program/aedifex/parser.lux
@@ -5,7 +5,7 @@
[monad (.only do)]]
[control
["[0]" maybe]
- ["<>" parser ("[1]#[0]" functor)
+ ["<>" parser (.open: "[1]#[0]" functor)
["<[0]>" code (.only Parser)]]]
[data
["[0]" text]
diff --git a/stdlib/source/program/aedifex/pom.lux b/stdlib/source/program/aedifex/pom.lux
index 76be72b40..537fde5e7 100644
--- a/stdlib/source/program/aedifex/pom.lux
+++ b/stdlib/source/program/aedifex/pom.lux
@@ -5,7 +5,7 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try (.only Try)]
["[0]" exception]
["<>" parser (.only)
@@ -15,7 +15,7 @@
[format
["_" xml (.only Tag XML)]]
[collection
- ["[0]" list ("[1]#[0]" monoid functor mix)]
+ ["[0]" list (.open: "[1]#[0]" monoid functor mix)]
["[0]" set]
["[0]" dictionary]]]
[meta
diff --git a/stdlib/source/program/aedifex/profile.lux b/stdlib/source/program/aedifex/profile.lux
index 622cd3f9b..5ed623591 100644
--- a/stdlib/source/program/aedifex/profile.lux
+++ b/stdlib/source/program/aedifex/profile.lux
@@ -5,16 +5,16 @@
[monoid (.only Monoid)]
[equivalence (.only Equivalence)]]
[control
- ["[0]" maybe ("[1]#[0]" monoid)]
+ ["[0]" maybe (.open: "[1]#[0]" monoid)]
["[0]" exception (.only exception:)]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" monoid)]
+ ["[0]" list (.open: "[1]#[0]" monoid)]
["[0]" set (.only Set)]
["[0]" dictionary (.only Dictionary)
- ["[0]" plist (.only PList) ("[1]#[0]" monoid)]]]]
+ ["[0]" plist (.only PList) (.open: "[1]#[0]" monoid)]]]]
[macro
["^" pattern]
["[0]" template]]
@@ -32,8 +32,8 @@
[module
[descriptor (.only Module)]]]]]]]]
[//
- ["[0]" runtime (.only Runtime) ("[1]#[0]" equivalence)]
- ["[0]" dependency (.only Dependency) ("[1]#[0]" equivalence)]
+ ["[0]" runtime (.only Runtime) (.open: "[1]#[0]" equivalence)]
+ ["[0]" dependency (.only Dependency) (.open: "[1]#[0]" equivalence)]
["[0]" artifact (.only Artifact)
["[0]" type]]
[repository
diff --git a/stdlib/source/program/aedifex/project.lux b/stdlib/source/program/aedifex/project.lux
index 811e89d0c..e4ab5be29 100644
--- a/stdlib/source/program/aedifex/project.lux
+++ b/stdlib/source/program/aedifex/project.lux
@@ -14,7 +14,7 @@
[collection
["[0]" dictionary (.only Dictionary)]
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" mix)]]]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]]]
["[0]" //
["[1]" profile (.only Name Profile)]])
diff --git a/stdlib/source/program/aedifex/runtime.lux b/stdlib/source/program/aedifex/runtime.lux
index 21046fca2..7d49725df 100644
--- a/stdlib/source/program/aedifex/runtime.lux
+++ b/stdlib/source/program/aedifex/runtime.lux
@@ -8,7 +8,7 @@
["[0]" text
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monoid)]
+ ["[0]" list (.open: "[1]#[0]" monoid)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["[0]" template]]
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux
index bcc771965..543900782 100644
--- a/stdlib/source/program/compositor.lux
+++ b/stdlib/source/program/compositor.lux
@@ -11,7 +11,7 @@
["[0]" maybe]
["[0]" try (.only Try)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[data
[binary (.only Binary)]
["[0]" product]
diff --git a/stdlib/source/specification/compositor/generation/case.lux b/stdlib/source/specification/compositor/generation/case.lux
index c0909a558..1fbde2917 100644
--- a/stdlib/source/specification/compositor/generation/case.lux
+++ b/stdlib/source/specification/compositor/generation/case.lux
@@ -7,13 +7,13 @@
["[0]" pipe]
["[0]" try (.only Try)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[number
["n" nat]
["f" frac]]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
["r" random (.only Random)]]
[tool
diff --git a/stdlib/source/specification/compositor/generation/common.lux b/stdlib/source/specification/compositor/generation/common.lux
index 334ce7012..e8d5e6ab4 100644
--- a/stdlib/source/specification/compositor/generation/common.lux
+++ b/stdlib/source/specification/compositor/generation/common.lux
@@ -7,13 +7,13 @@
["[0]" pipe]
["[0]" try (.only Try)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[number
["[0]" i64]
["n" nat]
["i" int]
["f" frac]]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" list]]]
diff --git a/stdlib/source/specification/compositor/generation/function.lux b/stdlib/source/specification/compositor/generation/function.lux
index d1ab6e87a..7e2c6d66f 100644
--- a/stdlib/source/specification/compositor/generation/function.lux
+++ b/stdlib/source/specification/compositor/generation/function.lux
@@ -10,9 +10,9 @@
[number
["n" nat]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
- ["r" random (.only Random) ("[1]#[0]" monad)]]
+ ["r" random (.only Random) (.open: "[1]#[0]" monad)]]
[tool
[compiler
[analysis (.only Arity)]
diff --git a/stdlib/source/specification/compositor/generation/primitive.lux b/stdlib/source/specification/compositor/generation/primitive.lux
index 375cdf94c..d76f98f0a 100644
--- a/stdlib/source/specification/compositor/generation/primitive.lux
+++ b/stdlib/source/specification/compositor/generation/primitive.lux
@@ -7,10 +7,10 @@
["[0]" pipe]
["[0]" try]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[number
["f" frac]]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["r" random]]
diff --git a/stdlib/source/specification/compositor/generation/structure.lux b/stdlib/source/specification/compositor/generation/structure.lux
index e43533acb..d914c309f 100644
--- a/stdlib/source/specification/compositor/generation/structure.lux
+++ b/stdlib/source/specification/compositor/generation/structure.lux
@@ -11,11 +11,11 @@
[number
["n" nat]
["i" int]]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" array (.only Array)]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["r" random]]
["[0]" ffi (.only import:)]
diff --git a/stdlib/source/specification/lux/abstract/equivalence.lux b/stdlib/source/specification/lux/abstract/equivalence.lux
index 8454e002a..eaa2a9b5b 100644
--- a/stdlib/source/specification/lux/abstract/equivalence.lux
+++ b/stdlib/source/specification/lux/abstract/equivalence.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]]]
[\\library
diff --git a/stdlib/source/specification/lux/world/file.lux b/stdlib/source/specification/lux/world/file.lux
index 6075f38c7..0956528de 100644
--- a/stdlib/source/specification/lux/world/file.lux
+++ b/stdlib/source/specification/lux/world/file.lux
@@ -7,17 +7,17 @@
["[0]" predicate]]
[control
[io (.only IO)]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[concurrency
["[0]" async (.only Async)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
- ["[0]" utf8 ("[1]#[0]" codec)]]]
- ["[0]" binary (.only Binary) ("[1]#[0]" equivalence monoid)
+ ["[0]" utf8 (.open: "[1]#[0]" codec)]]]
+ ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence monoid)
["$[1]" \\test]]
[collection
["[0]" list]]]
@@ -26,7 +26,7 @@
[number
["n" nat]]]
[time
- ["[0]" instant (.only Instant) ("[1]#[0]" equivalence)]]]]
+ ["[0]" instant (.only Instant) (.open: "[1]#[0]" equivalence)]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/specification/lux/world/shell.lux b/stdlib/source/specification/lux/world/shell.lux
index 3bff4626d..64e31abfe 100644
--- a/stdlib/source/specification/lux/world/shell.lux
+++ b/stdlib/source/specification/lux/world/shell.lux
@@ -5,14 +5,14 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]
[parser
["[0]" environment (.only Environment)]]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random]
diff --git a/stdlib/source/test/aedifex/artifact.lux b/stdlib/source/test/aedifex/artifact.lux
index e16c5f534..aefe175f4 100644
--- a/stdlib/source/test/aedifex/artifact.lux
+++ b/stdlib/source/test/aedifex/artifact.lux
@@ -10,7 +10,7 @@
["$[0]" order]
["$[0]" hash]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]
[world
diff --git a/stdlib/source/test/aedifex/artifact/extension.lux b/stdlib/source/test/aedifex/artifact/extension.lux
index 130065193..d8bfd8267 100644
--- a/stdlib/source/test/aedifex/artifact/extension.lux
+++ b/stdlib/source/test/aedifex/artifact/extension.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" set]
["[0]" list]]]
diff --git a/stdlib/source/test/aedifex/artifact/snapshot.lux b/stdlib/source/test/aedifex/artifact/snapshot.lux
index e0c7ffc4b..5379dd8af 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot.lux
@@ -7,11 +7,11 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" xml]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
["$[0]" /
["[1][0]" build]
["[1][0]" stamp]
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/build.lux b/stdlib/source/test/aedifex/artifact/snapshot/build.lux
index 96c41ce36..2775467c9 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/build.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/build.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" xml]]]
[math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
index fc9488004..e097f5420 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" xml]]]
[math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/time.lux b/stdlib/source/test/aedifex/artifact/snapshot/time.lux
index 65f17c8a4..28dd249cc 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/time.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/time.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" text]]]
[math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version.lux b/stdlib/source/test/aedifex/artifact/snapshot/version.lux
index 39883cb64..7ba555256 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" xml]]]
[math
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
index 9441be139..27ef6062c 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
@@ -7,14 +7,14 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" text]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]
["i" int]]]
diff --git a/stdlib/source/test/aedifex/artifact/time.lux b/stdlib/source/test/aedifex/artifact/time.lux
index 81b04c07d..366ec1955 100644
--- a/stdlib/source/test/aedifex/artifact/time.lux
+++ b/stdlib/source/test/aedifex/artifact/time.lux
@@ -7,11 +7,11 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" text]]]
[time
- ["[0]" instant ("[1]#[0]" equivalence)]]
+ ["[0]" instant (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/aedifex/artifact/time/date.lux b/stdlib/source/test/aedifex/artifact/time/date.lux
index 4f997fef1..12c4a0da1 100644
--- a/stdlib/source/test/aedifex/artifact/time/date.lux
+++ b/stdlib/source/test/aedifex/artifact/time/date.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[parser
["<[0]>" text]]]
@@ -17,7 +17,7 @@
["n" nat]
["i" int]]]
[time
- ["[0]" date ("[1]#[0]" equivalence)]
+ ["[0]" date (.open: "[1]#[0]" equivalence)]
["[0]" year]]]]
[\\program
["[0]" /]])
diff --git a/stdlib/source/test/aedifex/artifact/time/time.lux b/stdlib/source/test/aedifex/artifact/time/time.lux
index 60dda35c0..c3b866451 100644
--- a/stdlib/source/test/aedifex/artifact/time/time.lux
+++ b/stdlib/source/test/aedifex/artifact/time/time.lux
@@ -6,7 +6,7 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" text]]]
[math
diff --git a/stdlib/source/test/aedifex/artifact/type.lux b/stdlib/source/test/aedifex/artifact/type.lux
index de596592b..a2b5926e5 100644
--- a/stdlib/source/test/aedifex/artifact/type.lux
+++ b/stdlib/source/test/aedifex/artifact/type.lux
@@ -10,7 +10,7 @@
["[0]" set]
["[0]" list]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\program
diff --git a/stdlib/source/test/aedifex/artifact/versioning.lux b/stdlib/source/test/aedifex/artifact/versioning.lux
index 6a8e29a08..006ec6566 100644
--- a/stdlib/source/test/aedifex/artifact/versioning.lux
+++ b/stdlib/source/test/aedifex/artifact/versioning.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" xml]]]
[math
diff --git a/stdlib/source/test/aedifex/cache.lux b/stdlib/source/test/aedifex/cache.lux
index 13b8e27d4..de334b03d 100644
--- a/stdlib/source/test/aedifex/cache.lux
+++ b/stdlib/source/test/aedifex/cache.lux
@@ -19,7 +19,7 @@
["[0]" set]
["[0]" dictionary]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]
[world
diff --git a/stdlib/source/test/aedifex/cli.lux b/stdlib/source/test/aedifex/cli.lux
index 6f3d257c6..9cc571bbe 100644
--- a/stdlib/source/test/aedifex/cli.lux
+++ b/stdlib/source/test/aedifex/cli.lux
@@ -16,7 +16,7 @@
[collection
["[0]" list]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
[\\program
["[0]" / (.only)
["/[1]" //
diff --git a/stdlib/source/test/aedifex/command/build.lux b/stdlib/source/test/aedifex/command/build.lux
index 176acc46b..1bb77d307 100644
--- a/stdlib/source/test/aedifex/command/build.lux
+++ b/stdlib/source/test/aedifex/command/build.lux
@@ -14,7 +14,7 @@
[parser
["[0]" environment]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" dictionary]]]
[math
diff --git a/stdlib/source/test/aedifex/command/clean.lux b/stdlib/source/test/aedifex/command/clean.lux
index 73ad4bcd2..e7bf81855 100644
--- a/stdlib/source/test/aedifex/command/clean.lux
+++ b/stdlib/source/test/aedifex/command/clean.lux
@@ -11,10 +11,10 @@
[data
[binary (.only Binary)]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set]]]
[math
["[0]" random (.only Random)]
diff --git a/stdlib/source/test/aedifex/command/deploy.lux b/stdlib/source/test/aedifex/command/deploy.lux
index ade7ffc6f..0a4e08166 100644
--- a/stdlib/source/test/aedifex/command/deploy.lux
+++ b/stdlib/source/test/aedifex/command/deploy.lux
@@ -12,8 +12,8 @@
[parser
["[0]" environment]]]
[data
- ["[0]" binary ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" binary (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/stdlib/source/test/aedifex/command/deps.lux b/stdlib/source/test/aedifex/command/deps.lux
index c4cf1bcf0..c5e496e29 100644
--- a/stdlib/source/test/aedifex/command/deps.lux
+++ b/stdlib/source/test/aedifex/command/deps.lux
@@ -12,7 +12,7 @@
[parser
["[0]" environment]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/stdlib/source/test/aedifex/command/install.lux b/stdlib/source/test/aedifex/command/install.lux
index 7fa9463f7..4de5c5226 100644
--- a/stdlib/source/test/aedifex/command/install.lux
+++ b/stdlib/source/test/aedifex/command/install.lux
@@ -5,7 +5,7 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception]
[concurrency
["[0]" async (.only Async)]]
@@ -13,7 +13,7 @@
["[0]" environment]]]
[data
["[0]" binary]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" set (.only Set)]]]
diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux
index 76eb99b89..75509644d 100644
--- a/stdlib/source/test/aedifex/command/pom.lux
+++ b/stdlib/source/test/aedifex/command/pom.lux
@@ -5,12 +5,12 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[concurrency
["[0]" async]]]
[data
- ["[0]" binary ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" binary (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
[encoding
["[0]" utf8]]]
[format
diff --git a/stdlib/source/test/aedifex/command/test.lux b/stdlib/source/test/aedifex/command/test.lux
index a6237f970..50bd8e183 100644
--- a/stdlib/source/test/aedifex/command/test.lux
+++ b/stdlib/source/test/aedifex/command/test.lux
@@ -12,7 +12,7 @@
[parser
["[0]" environment]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" dictionary]
["[0]" list]]]
diff --git a/stdlib/source/test/aedifex/command/version.lux b/stdlib/source/test/aedifex/command/version.lux
index 9bdb03cc7..fbd864d4b 100644
--- a/stdlib/source/test/aedifex/command/version.lux
+++ b/stdlib/source/test/aedifex/command/version.lux
@@ -11,7 +11,7 @@
[concurrency
["[0]" async (.only Async)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random]]
diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux
index cd8c2172e..ab15af81c 100644
--- a/stdlib/source/test/aedifex/dependency/deployment.lux
+++ b/stdlib/source/test/aedifex/dependency/deployment.lux
@@ -7,20 +7,20 @@
["[0]" hash (.only Hash)]]
[control
["[0]" io (.only IO)]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[concurrency
["[0]" atom (.only Atom)]
["[0]" async]]]
[data
["[0]" product]
- ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
+ ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
["[0]" text (.only)
["%" format (.only format)]]
[collection
["[0]" dictionary (.only Dictionary)]
["[0]" set]
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
["[0]" random (.only Random)]
[number
@@ -43,7 +43,7 @@
["[0]" profile]
["[0]" metadata]
["[0]" package (.only Package)]
- ["[0]" artifact (.only Artifact) ("[1]#[0]" equivalence)
+ ["[0]" artifact (.only Artifact) (.open: "[1]#[0]" equivalence)
["[1]/[0]" type]
["[1]/[0]" extension]]
["[0]" repository (.only)
diff --git a/stdlib/source/test/aedifex/dependency/resolution.lux b/stdlib/source/test/aedifex/dependency/resolution.lux
index 666bd0c53..eaec8b475 100644
--- a/stdlib/source/test/aedifex/dependency/resolution.lux
+++ b/stdlib/source/test/aedifex/dependency/resolution.lux
@@ -39,7 +39,7 @@
["[1]" profile]
["[1][0]" package (.only Package)]
["[1][0]" hash]
- ["[1][0]" dependency (.only Dependency) ("[1]#[0]" equivalence)
+ ["[1][0]" dependency (.only Dependency) (.open: "[1]#[0]" equivalence)
["[1]/[0]" status]]
["[1][0]" pom]
["[1][0]" artifact (.only Artifact)
diff --git a/stdlib/source/test/aedifex/dependency/status.lux b/stdlib/source/test/aedifex/dependency/status.lux
index c6b6abe9a..6b59fa394 100644
--- a/stdlib/source/test/aedifex/dependency/status.lux
+++ b/stdlib/source/test/aedifex/dependency/status.lux
@@ -10,7 +10,7 @@
["[0]" binary
["[1]T" \\test]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
["$[0]" ///
["[1][0]" hash]]
[\\program
diff --git a/stdlib/source/test/aedifex/metadata.lux b/stdlib/source/test/aedifex/metadata.lux
index b10f192fd..bdac5dfac 100644
--- a/stdlib/source/test/aedifex/metadata.lux
+++ b/stdlib/source/test/aedifex/metadata.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random]]]]
["[0]" /
diff --git a/stdlib/source/test/aedifex/metadata/artifact.lux b/stdlib/source/test/aedifex/metadata/artifact.lux
index 34b98590a..34869e646 100644
--- a/stdlib/source/test/aedifex/metadata/artifact.lux
+++ b/stdlib/source/test/aedifex/metadata/artifact.lux
@@ -8,14 +8,14 @@
["$[0]" equivalence]]]
[control
["[0]" maybe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["[0]" environment]
["<[0]>" xml]]
[concurrency
["[0]" async]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[macro
diff --git a/stdlib/source/test/aedifex/metadata/snapshot.lux b/stdlib/source/test/aedifex/metadata/snapshot.lux
index 136e488c8..c45b817cd 100644
--- a/stdlib/source/test/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/test/aedifex/metadata/snapshot.lux
@@ -8,20 +8,20 @@
["$[0]" equivalence]]]
[control
["[0]" maybe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["[0]" environment]
["<[0]>" xml]]
[concurrency
["[0]" async]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[macro
["[0]" code]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]
["[0]" time (.only)
diff --git a/stdlib/source/test/aedifex/package.lux b/stdlib/source/test/aedifex/package.lux
index ead5ce5be..6a7f0a960 100644
--- a/stdlib/source/test/aedifex/package.lux
+++ b/stdlib/source/test/aedifex/package.lux
@@ -33,7 +33,7 @@
["[0]" / (.only)
["/[1]" //
["[1]" profile]
- ["[1][0]" hash ("[1]#[0]" equivalence)]
+ ["[1][0]" hash (.open: "[1]#[0]" equivalence)]
["[1][0]" pom]
[dependency
["[1][0]" status]]
diff --git a/stdlib/source/test/aedifex/parser.lux b/stdlib/source/test/aedifex/parser.lux
index 6b53ab371..050d3daef 100644
--- a/stdlib/source/test/aedifex/parser.lux
+++ b/stdlib/source/test/aedifex/parser.lux
@@ -15,7 +15,7 @@
[collection
["[0]" set (.only Set)]
["[0]" dictionary (.only Dictionary)]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/aedifex/pom.lux b/stdlib/source/test/aedifex/pom.lux
index fbc7d12b2..3a58b340c 100644
--- a/stdlib/source/test/aedifex/pom.lux
+++ b/stdlib/source/test/aedifex/pom.lux
@@ -10,7 +10,7 @@
["<>" parser (.only)
["<[0]>" xml]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[format
["[0]" xml]]]
[math
diff --git a/stdlib/source/test/aedifex/profile.lux b/stdlib/source/test/aedifex/profile.lux
index a77cb4c7e..d45ac5fa9 100644
--- a/stdlib/source/test/aedifex/profile.lux
+++ b/stdlib/source/test/aedifex/profile.lux
@@ -13,12 +13,12 @@
[parser
["[0]" cli]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" set (.only Set)]
["[0]" dictionary (.only Dictionary)]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]
[tool
diff --git a/stdlib/source/test/aedifex/project.lux b/stdlib/source/test/aedifex/project.lux
index 8a52a39b8..61afbc9da 100644
--- a/stdlib/source/test/aedifex/project.lux
+++ b/stdlib/source/test/aedifex/project.lux
@@ -8,13 +8,13 @@
["$[0]" equivalence]
["$[0]" monoid]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[//
diff --git a/stdlib/source/test/aedifex/repository/local.lux b/stdlib/source/test/aedifex/repository/local.lux
index e8737c5cc..160410bc4 100644
--- a/stdlib/source/test/aedifex/repository/local.lux
+++ b/stdlib/source/test/aedifex/repository/local.lux
@@ -5,13 +5,13 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["[0]" environment]]
[concurrency
["[0]" async]]]
[data
- ["[0]" binary ("[1]#[0]" equivalence)]
+ ["[0]" binary (.open: "[1]#[0]" equivalence)]
[text
[encoding
["[0]" utf8]]]]
diff --git a/stdlib/source/test/aedifex/repository/remote.lux b/stdlib/source/test/aedifex/repository/remote.lux
index 72c042fd7..50ae42a09 100644
--- a/stdlib/source/test/aedifex/repository/remote.lux
+++ b/stdlib/source/test/aedifex/repository/remote.lux
@@ -6,13 +6,13 @@
[monad (.only do)]]
[control
["[0]" io (.only IO)]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try ("[1]#[0]" monad)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" monad)]
["[0]" exception]
["[0]" function]]
[data
- ["[0]" binary ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" binary (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/stdlib/source/test/aedifex/runtime.lux b/stdlib/source/test/aedifex/runtime.lux
index 78ba09d07..a1ba22588 100644
--- a/stdlib/source/test/aedifex/runtime.lux
+++ b/stdlib/source/test/aedifex/runtime.lux
@@ -7,14 +7,14 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\program
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index 790250e73..9fed6be1a 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -9,28 +9,28 @@
[monad (.only do)]]
[control
["[0]" io]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
[concurrency
["[0]" atom (.only Atom)]]
[parser
["<[0]>" code]]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
- ["[0]" set (.only Set) ("[1]#[0]" equivalence)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
+ ["[0]" set (.only Set) (.open: "[1]#[0]" equivalence)]
[dictionary
["[0]" plist]]]]
["[0]" macro
[syntax (.only syntax:)]
["^" pattern]
- ["[0]" code ("[1]#[0]" equivalence)]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]
["[0]" template]]
["[0]" math
- ["[0]" random ("[1]#[0]" functor)]
+ ["[0]" random (.open: "[1]#[0]" functor)]
[number
[i8 (.only)]
[i16 (.only)]
@@ -39,8 +39,8 @@
["r" rev]
["f" frac]
["[0]" i64]]]
- ["[0]" meta ("[1]#[0]" monad)
- ["[0]" location ("[1]#[0]" equivalence)]]]]
+ ["[0]" meta (.open: "[1]#[0]" monad)
+ ["[0]" location (.open: "[1]#[0]" equivalence)]]]]
... TODO: Must have 100% coverage on tests.
["[0]" /
["[1][0]" abstract]
@@ -529,7 +529,7 @@
[(<referral> <module/0>)
(<referral> <m2/1>)]]
- [(.using ["[0]" <module/0>' ("[1]#[0]" <definition>)])
+ [(.using ["[0]" <module/0>' (.open: "[1]#[0]" <definition>)])
("lux def module" [[<module/0> <module/0>]])
[(<referral> <module/0> (<open/0> <definition>))]]
))))))
diff --git a/stdlib/source/test/lux/abstract/codec.lux b/stdlib/source/test/lux/abstract/codec.lux
index 120dc7a39..970045e7c 100644
--- a/stdlib/source/test/lux/abstract/codec.lux
+++ b/stdlib/source/test/lux/abstract/codec.lux
@@ -7,7 +7,7 @@
[control
["[0]" try]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[format
["[0]" json (.only JSON)]]]
[math
diff --git a/stdlib/source/test/lux/abstract/comonad/cofree.lux b/stdlib/source/test/lux/abstract/comonad/cofree.lux
index 1818540f0..8e8c2998d 100644
--- a/stdlib/source/test/lux/abstract/comonad/cofree.lux
+++ b/stdlib/source/test/lux/abstract/comonad/cofree.lux
@@ -13,7 +13,7 @@
[data
[collection
["[0]" list]
- ["[0]" stream (.only Stream) ("[1]#[0]" comonad)]]]
+ ["[0]" stream (.only Stream) (.open: "[1]#[0]" comonad)]]]
[math
["[0]" random]]]]
[\\library
diff --git a/stdlib/source/test/lux/abstract/enum.lux b/stdlib/source/test/lux/abstract/enum.lux
index 5aa3fd4c5..d33a9aee8 100644
--- a/stdlib/source/test/lux/abstract/enum.lux
+++ b/stdlib/source/test/lux/abstract/enum.lux
@@ -5,11 +5,11 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/abstract/equivalence.lux b/stdlib/source/test/lux/abstract/equivalence.lux
index 47b2ab03a..2ca34e885 100644
--- a/stdlib/source/test/lux/abstract/equivalence.lux
+++ b/stdlib/source/test/lux/abstract/equivalence.lux
@@ -8,7 +8,7 @@
[functor
["$[0]" contravariant]]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/abstract/hash.lux b/stdlib/source/test/lux/abstract/hash.lux
index 6e2f2504a..cd9a966da 100644
--- a/stdlib/source/test/lux/abstract/hash.lux
+++ b/stdlib/source/test/lux/abstract/hash.lux
@@ -8,7 +8,7 @@
[functor
["$[0]" contravariant]]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/abstract/interval.lux b/stdlib/source/test/lux/abstract/interval.lux
index 4d84cfcb7..74579b53a 100644
--- a/stdlib/source/test/lux/abstract/interval.lux
+++ b/stdlib/source/test/lux/abstract/interval.lux
@@ -18,7 +18,7 @@
[number
["n" nat]]]]]
[\\library
- ["[0]" / (.only Interval) ("#[0]" equivalence)]])
+ ["[0]" / (.only Interval) (.open: "[1]#[0]" equivalence)]])
(template [<name> <cmp>]
[(def: .public <name>
@@ -94,7 +94,7 @@
right_outer ..outer]
(all _.and
(_.property "The union of an interval to itself yields the same interval."
- (#= some_interval (/.union some_interval some_interval)))
+ (/#= some_interval (/.union some_interval some_interval)))
(_.property "The union of 2 inner intervals is another inner interval."
(/.inner? (/.union left_inner right_inner)))
(_.property "The union of 2 outer intervals yields an inner interval when their complements don't overlap, and an outer when they do."
@@ -115,7 +115,7 @@
right_outer ..outer]
(all _.and
(_.property "The intersection of an interval to itself yields the same interval."
- (#= some_interval (/.intersection some_interval some_interval)))
+ (/#= some_interval (/.intersection some_interval some_interval)))
(_.property "The intersection of 2 inner intervals yields an inner interval when they overlap, and an outer when they don't."
(if (/.overlaps? left_inner right_inner)
(/.inner? (/.intersection left_inner right_inner))
@@ -130,7 +130,7 @@
[some_interval ..interval]
(all _.and
(_.property "The complement of a complement is the same as the original."
- (#= some_interval (|> some_interval /.complement /.complement)))
+ (/#= some_interval (|> some_interval /.complement /.complement)))
(_.property "The complement of an interval does not overlap it."
(not (/.overlaps? some_interval (/.complement some_interval))))
)))
diff --git a/stdlib/source/test/lux/abstract/monad.lux b/stdlib/source/test/lux/abstract/monad.lux
index 5ea6a5404..b0dc3f1cc 100644
--- a/stdlib/source/test/lux/abstract/monad.lux
+++ b/stdlib/source/test/lux/abstract/monad.lux
@@ -5,7 +5,7 @@
[data
["[0]" identity (.only Identity)]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/abstract/monad/free.lux b/stdlib/source/test/lux/abstract/monad/free.lux
index 0d63275d5..9d9329a6c 100644
--- a/stdlib/source/test/lux/abstract/monad/free.lux
+++ b/stdlib/source/test/lux/abstract/monad/free.lux
@@ -12,7 +12,7 @@
["$[0]" monad]]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random]]]]
[\\library
diff --git a/stdlib/source/test/lux/abstract/order.lux b/stdlib/source/test/lux/abstract/order.lux
index a283abfdf..68eedeeba 100644
--- a/stdlib/source/test/lux/abstract/order.lux
+++ b/stdlib/source/test/lux/abstract/order.lux
@@ -8,7 +8,7 @@
[functor
["$[0]" contravariant]]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/abstract/predicate.lux b/stdlib/source/test/lux/abstract/predicate.lux
index 6a8b64dbe..46c44ceea 100644
--- a/stdlib/source/test/lux/abstract/predicate.lux
+++ b/stdlib/source/test/lux/abstract/predicate.lux
@@ -12,7 +12,7 @@
[control
["[0]" function]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[math
diff --git a/stdlib/source/test/lux/control/concatenative.lux b/stdlib/source/test/lux/control/concatenative.lux
index d158a83a0..825228c31 100644
--- a/stdlib/source/test/lux/control/concatenative.lux
+++ b/stdlib/source/test/lux/control/concatenative.lux
@@ -6,7 +6,7 @@
[monad (.only do)]]
[data
["[0]" sum]
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/test/lux/control/concurrency/actor.lux b/stdlib/source/test/lux/control/concurrency/actor.lux
index 1df46e911..5713f1599 100644
--- a/stdlib/source/test/lux/control/concurrency/actor.lux
+++ b/stdlib/source/test/lux/control/concurrency/actor.lux
@@ -22,7 +22,7 @@
["[0]" / (.only actor: message:)
[//
["[0]" atom (.only Atom)]
- ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)]
+ ["[0]" async (.only Async Resolver) (.open: "[1]#[0]" monad)]
["[0]" frp]]]])
(exception: got_wrecked)
diff --git a/stdlib/source/test/lux/control/concurrency/frp.lux b/stdlib/source/test/lux/control/concurrency/frp.lux
index 4dc2b1da7..79d2fe727 100644
--- a/stdlib/source/test/lux/control/concurrency/frp.lux
+++ b/stdlib/source/test/lux/control/concurrency/frp.lux
@@ -14,7 +14,7 @@
["[0]" io (.only IO io)]]
[data
[collection
- ["[0]" list ("[1]#[0]" mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" mix monoid)]
["[0]" sequence (.only Sequence)]]]
[math
["[0]" random]
@@ -25,7 +25,7 @@
[\\library
["[0]" / (.only)
[//
- ["[0]" async (.only Async) ("[1]#[0]" monad)]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]
["[0]" atom (.only Atom atom)]]]])
(def: injection
diff --git a/stdlib/source/test/lux/control/concurrency/semaphore.lux b/stdlib/source/test/lux/control/concurrency/semaphore.lux
index bc99871e9..1df21f823 100644
--- a/stdlib/source/test/lux/control/concurrency/semaphore.lux
+++ b/stdlib/source/test/lux/control/concurrency/semaphore.lux
@@ -15,10 +15,10 @@
["[0]" async (.only Async)]
["[0]" atom (.only Atom)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/control/concurrency/stm.lux b/stdlib/source/test/lux/control/concurrency/stm.lux
index 7bbe7f398..05d6f33da 100644
--- a/stdlib/source/test/lux/control/concurrency/stm.lux
+++ b/stdlib/source/test/lux/control/concurrency/stm.lux
@@ -13,7 +13,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/control/exception.lux b/stdlib/source/test/lux/control/exception.lux
index b71d50025..459e7101a 100644
--- a/stdlib/source/test/lux/control/exception.lux
+++ b/stdlib/source/test/lux/control/exception.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random]
diff --git a/stdlib/source/test/lux/control/function/memo.lux b/stdlib/source/test/lux/control/function/memo.lux
index 2d8b7f7b0..b16902c88 100644
--- a/stdlib/source/test/lux/control/function/memo.lux
+++ b/stdlib/source/test/lux/control/function/memo.lux
@@ -6,12 +6,12 @@
[monad (.only do)]]
[control
["[0]" io (.only IO)]
- ["[0]" state (.only State) ("[1]#[0]" monad)]]
+ ["[0]" state (.only State) (.open: "[1]#[0]" monad)]]
[data
["[0]" product]
[collection
["[0]" dictionary (.only Dictionary)]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/test/lux/control/function/mixin.lux b/stdlib/source/test/lux/control/function/mixin.lux
index 01dd7ab47..c19295365 100644
--- a/stdlib/source/test/lux/control/function/mixin.lux
+++ b/stdlib/source/test/lux/control/function/mixin.lux
@@ -13,7 +13,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/test/lux/control/function/mutual.lux b/stdlib/source/test/lux/control/function/mutual.lux
index 3e9c053e7..698685d0c 100644
--- a/stdlib/source/test/lux/control/function/mutual.lux
+++ b/stdlib/source/test/lux/control/function/mutual.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[text
["%" format (.only format)]]]
[math
diff --git a/stdlib/source/test/lux/control/maybe.lux b/stdlib/source/test/lux/control/maybe.lux
index d24ea6166..b986c2fbc 100644
--- a/stdlib/source/test/lux/control/maybe.lux
+++ b/stdlib/source/test/lux/control/maybe.lux
@@ -12,7 +12,7 @@
["$[0]" apply]
["$[0]" monad]]]
[control
- ["[0]" io ("[1]#[0]" monad)]
+ ["[0]" io (.open: "[1]#[0]" monad)]
["[0]" pipe]]
[data
["[0]" text]
@@ -23,7 +23,7 @@
[number
["n" nat]]]]]
[\\library
- ["[0]" / ("[1]#[0]" monoid monad)]])
+ ["[0]" / (.open: "[1]#[0]" monoid monad)]])
(def: .public test
Test
diff --git a/stdlib/source/test/lux/control/parser.lux b/stdlib/source/test/lux/control/parser.lux
index e4312d220..c5fdb888a 100644
--- a/stdlib/source/test/lux/control/parser.lux
+++ b/stdlib/source/test/lux/control/parser.lux
@@ -14,10 +14,10 @@
[parser
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/control/parser/analysis.lux b/stdlib/source/test/lux/control/parser/analysis.lux
index bb68755c0..1e1a288b2 100644
--- a/stdlib/source/test/lux/control/parser/analysis.lux
+++ b/stdlib/source/test/lux/control/parser/analysis.lux
@@ -10,8 +10,8 @@
["[0]" exception]
["<>" parser]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[math
@@ -22,7 +22,7 @@
["f" frac]
["r" rev]]]
[meta
- ["[0]" symbol ("[1]#[0]" equivalence)]]
+ ["[0]" symbol (.open: "[1]#[0]" equivalence)]]
[tool
[compiler
[reference (.only Constant)
diff --git a/stdlib/source/test/lux/control/parser/binary.lux b/stdlib/source/test/lux/control/parser/binary.lux
index 34bfab2f7..41d2cec10 100644
--- a/stdlib/source/test/lux/control/parser/binary.lux
+++ b/stdlib/source/test/lux/control/parser/binary.lux
@@ -17,7 +17,7 @@
["[0]" binary]
["[0]" sum]
["[0]" bit]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/stdlib/source/test/lux/control/parser/cli.lux b/stdlib/source/test/lux/control/parser/cli.lux
index 731cea3e4..28e5fb4a2 100644
--- a/stdlib/source/test/lux/control/parser/cli.lux
+++ b/stdlib/source/test/lux/control/parser/cli.lux
@@ -8,7 +8,7 @@
["[0]" try]
["<>" parser]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[macro
@@ -16,7 +16,7 @@
[math
["[0]" random]
[number
- ["n" nat ("[1]#[0]" decimal)]]]]]
+ ["n" nat (.open: "[1]#[0]" decimal)]]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/control/parser/code.lux b/stdlib/source/test/lux/control/parser/code.lux
index 81a90c5b0..ad59d2ba3 100644
--- a/stdlib/source/test/lux/control/parser/code.lux
+++ b/stdlib/source/test/lux/control/parser/code.lux
@@ -17,7 +17,7 @@
["^" pattern]
["[0]" code]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" functor)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" functor)]
[number
["[0]" nat]
["[0]" int]
diff --git a/stdlib/source/test/lux/control/parser/environment.lux b/stdlib/source/test/lux/control/parser/environment.lux
index cce8c0d99..9b098cf1a 100644
--- a/stdlib/source/test/lux/control/parser/environment.lux
+++ b/stdlib/source/test/lux/control/parser/environment.lux
@@ -8,7 +8,7 @@
["[0]" try]
["[0]" exception]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" dictionary]]]
[math
@@ -17,7 +17,7 @@
["n" nat]]]]]
[\\library
["[0]" / (.only)
- ["/[1]" // ("[1]#[0]" monad)]]])
+ ["/[1]" // (.open: "[1]#[0]" monad)]]])
(def: .public test
Test
diff --git a/stdlib/source/test/lux/control/parser/json.lux b/stdlib/source/test/lux/control/parser/json.lux
index de37cc4dd..75a817481 100644
--- a/stdlib/source/test/lux/control/parser/json.lux
+++ b/stdlib/source/test/lux/control/parser/json.lux
@@ -14,10 +14,10 @@
["[0]" bit]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set]
["[0]" dictionary]
- ["[0]" sequence (.only sequence) ("[1]#[0]" functor)]]
+ ["[0]" sequence (.only sequence) (.open: "[1]#[0]" functor)]]
[format
["[0]" json]]]
[macro
diff --git a/stdlib/source/test/lux/control/parser/synthesis.lux b/stdlib/source/test/lux/control/parser/synthesis.lux
index 3a279ab7a..8e974ad33 100644
--- a/stdlib/source/test/lux/control/parser/synthesis.lux
+++ b/stdlib/source/test/lux/control/parser/synthesis.lux
@@ -12,7 +12,7 @@
["[0]" bit]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/test/lux/control/parser/text.lux b/stdlib/source/test/lux/control/parser/text.lux
index ae26c9858..af56ad878 100644
--- a/stdlib/source/test/lux/control/parser/text.lux
+++ b/stdlib/source/test/lux/control/parser/text.lux
@@ -10,14 +10,14 @@
["[0]" exception (.only Exception)]
["[0]" function]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
["[0]" unicode
["[1]" set]
["[1]/[0]" block]]]
[collection
["[0]" set]
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
[tree
["[0]" finger]]]]
[math
diff --git a/stdlib/source/test/lux/control/parser/type.lux b/stdlib/source/test/lux/control/parser/type.lux
index dc7a62b96..779c63cd2 100644
--- a/stdlib/source/test/lux/control/parser/type.lux
+++ b/stdlib/source/test/lux/control/parser/type.lux
@@ -2,7 +2,7 @@
[library
[lux (.except)
["_" test (.only Test)]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
[monad (.only do)]]
[control
@@ -20,7 +20,7 @@
[number
["n" nat]]]
[meta
- ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+ ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
[\\library
["[0]" / (.only)
["/[1]" //]]])
diff --git a/stdlib/source/test/lux/control/parser/xml.lux b/stdlib/source/test/lux/control/parser/xml.lux
index 02262b6f8..95e6c3713 100644
--- a/stdlib/source/test/lux/control/parser/xml.lux
+++ b/stdlib/source/test/lux/control/parser/xml.lux
@@ -2,16 +2,16 @@
[library
[lux (.except)
["_" test (.only Test)]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[format
- ["[0]" xml ("[1]#[0]" equivalence)]]
+ ["[0]" xml (.open: "[1]#[0]" equivalence)]]
[collection
["[0]" dictionary]
["[0]" list]]]
@@ -23,10 +23,10 @@
[number
["n" nat]]]
[meta
- ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+ ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
[\\library
["[0]" / (.only)
- ["/[1]" // ("[1]#[0]" monad)]]])
+ ["/[1]" // (.open: "[1]#[0]" monad)]]])
(template: (!expect <pattern> <value>)
[(case <value>
diff --git a/stdlib/source/test/lux/control/pipe.lux b/stdlib/source/test/lux/control/pipe.lux
index c181ba0f4..cc455e8aa 100644
--- a/stdlib/source/test/lux/control/pipe.lux
+++ b/stdlib/source/test/lux/control/pipe.lux
@@ -7,7 +7,7 @@
[monad (.only do)]]
[data
["[0]" identity]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random]
diff --git a/stdlib/source/test/lux/control/remember.lux b/stdlib/source/test/lux/control/remember.lux
index 2488b31cc..38bd18517 100644
--- a/stdlib/source/test/lux/control/remember.lux
+++ b/stdlib/source/test/lux/control/remember.lux
@@ -17,7 +17,7 @@
["%" format (.only format)]]]
[math
[number (.only hex)]
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]
[time
["[0]" date (.only Date)]
["[0]" instant]
diff --git a/stdlib/source/test/lux/control/security/policy.lux b/stdlib/source/test/lux/control/security/policy.lux
index 0fcb1e901..efd4a029c 100644
--- a/stdlib/source/test/lux/control/security/policy.lux
+++ b/stdlib/source/test/lux/control/security/policy.lux
@@ -10,7 +10,7 @@
["$[0]" apply]
["$[0]" monad]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[macro
["^" pattern]]
[math
diff --git a/stdlib/source/test/lux/control/try.lux b/stdlib/source/test/lux/control/try.lux
index 995b0125f..043890c39 100644
--- a/stdlib/source/test/lux/control/try.lux
+++ b/stdlib/source/test/lux/control/try.lux
@@ -13,7 +13,7 @@
["[0]" pipe]
["[0]" io]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/control/writer.lux b/stdlib/source/test/lux/control/writer.lux
index a6f496598..78d475ce1 100644
--- a/stdlib/source/test/lux/control/writer.lux
+++ b/stdlib/source/test/lux/control/writer.lux
@@ -14,7 +14,7 @@
["[0]" io]]
[data
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/data/binary.lux b/stdlib/source/test/lux/data/binary.lux
index ba454ead3..15df63e2e 100644
--- a/stdlib/source/test/lux/data/binary.lux
+++ b/stdlib/source/test/lux/data/binary.lux
@@ -14,7 +14,7 @@
["[0]" exception (.only Exception)]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
[array
[\\unsafe (.only)]]]]
[math
diff --git a/stdlib/source/test/lux/data/collection/array.lux b/stdlib/source/test/lux/data/collection/array.lux
index b1d6b549f..ee06a8073 100644
--- a/stdlib/source/test/lux/data/collection/array.lux
+++ b/stdlib/source/test/lux/data/collection/array.lux
@@ -13,10 +13,10 @@
["$[0]" equivalence]
["$[0]" functor (.only Injection)]]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" bit]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]
["[0]" set]]]
diff --git a/stdlib/source/test/lux/data/collection/dictionary.lux b/stdlib/source/test/lux/data/collection/dictionary.lux
index ad26c0120..11a4da3cb 100644
--- a/stdlib/source/test/lux/data/collection/dictionary.lux
+++ b/stdlib/source/test/lux/data/collection/dictionary.lux
@@ -9,13 +9,13 @@
["$[0]" equivalence]
["$[0]" functor (.only Injection)]]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try]
["[0]" exception]]
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set]]]
[math
["[0]" random]
diff --git a/stdlib/source/test/lux/data/collection/dictionary/ordered.lux b/stdlib/source/test/lux/data/collection/dictionary/ordered.lux
index 01c979131..75e7a36e2 100644
--- a/stdlib/source/test/lux/data/collection/dictionary/ordered.lux
+++ b/stdlib/source/test/lux/data/collection/dictionary/ordered.lux
@@ -9,15 +9,15 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" set]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\library
diff --git a/stdlib/source/test/lux/data/collection/dictionary/plist.lux b/stdlib/source/test/lux/data/collection/dictionary/plist.lux
index 3b8f1ae99..252ca9f85 100644
--- a/stdlib/source/test/lux/data/collection/dictionary/plist.lux
+++ b/stdlib/source/test/lux/data/collection/dictionary/plist.lux
@@ -8,9 +8,9 @@
["$[0]" equivalence]
["$[0]" monoid]]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text]
[collection
["[0]" set]
diff --git a/stdlib/source/test/lux/data/collection/list.lux b/stdlib/source/test/lux/data/collection/list.lux
index c727f3041..81e8d76dc 100644
--- a/stdlib/source/test/lux/data/collection/list.lux
+++ b/stdlib/source/test/lux/data/collection/list.lux
@@ -21,7 +21,7 @@
[data
["[0]" bit]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" set]]]
[math
@@ -30,7 +30,7 @@
["n" nat]
["[0]" int]]]]]
[\\library
- ["[0]" / ("[1]#[0]" monad)]])
+ ["[0]" / (.open: "[1]#[0]" monad)]])
(def: bounded_size
(Random Nat)
diff --git a/stdlib/source/test/lux/data/collection/queue.lux b/stdlib/source/test/lux/data/collection/queue.lux
index 05388830b..a67697de2 100644
--- a/stdlib/source/test/lux/data/collection/queue.lux
+++ b/stdlib/source/test/lux/data/collection/queue.lux
@@ -8,10 +8,10 @@
["$[0]" equivalence]
["$[0]" functor (.only Injection)]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" set]
- ["[0]" list ("[1]#[0]" monoid)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/data/collection/queue/priority.lux b/stdlib/source/test/lux/data/collection/queue/priority.lux
index fc8484b42..624231fb1 100644
--- a/stdlib/source/test/lux/data/collection/queue/priority.lux
+++ b/stdlib/source/test/lux/data/collection/queue/priority.lux
@@ -5,9 +5,9 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/data/collection/sequence.lux b/stdlib/source/test/lux/data/collection/sequence.lux
index f86951ea4..92d59f68d 100644
--- a/stdlib/source/test/lux/data/collection/sequence.lux
+++ b/stdlib/source/test/lux/data/collection/sequence.lux
@@ -15,17 +15,17 @@
["[0]" try (.only Try)]
["[0]" exception]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
["[0]" set]]]
[math
["[0]" random]
[number
["n" nat]]]]]
[\\library
- ["[0]" / ("[1]#[0]" monad)]])
+ ["[0]" / (.open: "[1]#[0]" monad)]])
(def: signatures
Test
diff --git a/stdlib/source/test/lux/data/collection/set.lux b/stdlib/source/test/lux/data/collection/set.lux
index 53bf5ee0e..17617c2dc 100644
--- a/stdlib/source/test/lux/data/collection/set.lux
+++ b/stdlib/source/test/lux/data/collection/set.lux
@@ -10,7 +10,7 @@
["$[0]" hash]
["$[0]" monoid]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[math
@@ -18,7 +18,7 @@
[number
["n" nat]]]]]
[\\library
- ["[0]" / ("#[0]" equivalence)]])
+ ["[0]" / (.open: "[1]#[0]" equivalence)]])
(def: gen_nat
(Random Nat)
@@ -68,7 +68,7 @@
(bit#= (/.empty? setL)
(n.= 0 (/.size setL))))
(_.coverage [/.list /.of_list]
- (|> setL /.list (/.of_list n.hash) (#= setL)))
+ (|> setL /.list (/.of_list n.hash) (/#= setL)))
(_.coverage [/.member?]
(and (list.every? (/.member? setL) (/.list setL))
(not (/.member? setL non_memberL))))
@@ -89,12 +89,12 @@
(|> setL
(/.has non_memberL)
(/.lacks non_memberL)
- (#= setL))
+ (/#= setL))
idempotency!
(|> setL
(/.lacks non_memberL)
- (#= setL))]
+ (/#= setL))]
(and symmetry!
idempotency!)))
(_.coverage [/.union /.sub?]
@@ -107,7 +107,7 @@
union_with_empty_set!
(|> setL
(/.union (/.empty n.hash))
- (#= setL))]
+ (/#= setL))]
(and sets_are_subs_of_their_unions!
union_with_empty_set!)))
(_.coverage [/.intersection /.super?]
diff --git a/stdlib/source/test/lux/data/collection/set/multi.lux b/stdlib/source/test/lux/data/collection/set/multi.lux
index 2811e074c..555d7e210 100644
--- a/stdlib/source/test/lux/data/collection/set/multi.lux
+++ b/stdlib/source/test/lux/data/collection/set/multi.lux
@@ -10,10 +10,10 @@
["$[0]" equivalence]
["$[0]" hash]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" set]
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/data/collection/set/ordered.lux b/stdlib/source/test/lux/data/collection/set/ordered.lux
index f8dba7aaf..64a1dc4bb 100644
--- a/stdlib/source/test/lux/data/collection/set/ordered.lux
+++ b/stdlib/source/test/lux/data/collection/set/ordered.lux
@@ -8,11 +8,11 @@
[\\specification
["$[0]" equivalence]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\library
diff --git a/stdlib/source/test/lux/data/collection/stack.lux b/stdlib/source/test/lux/data/collection/stack.lux
index 70141fc19..337b7de4e 100644
--- a/stdlib/source/test/lux/data/collection/stack.lux
+++ b/stdlib/source/test/lux/data/collection/stack.lux
@@ -10,7 +10,7 @@
[control
["[0]" maybe]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/data/collection/stream.lux b/stdlib/source/test/lux/data/collection/stream.lux
index 7c6f10baf..ee293cfa8 100644
--- a/stdlib/source/test/lux/data/collection/stream.lux
+++ b/stdlib/source/test/lux/data/collection/stream.lux
@@ -13,7 +13,7 @@
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/data/collection/tree.lux b/stdlib/source/test/lux/data/collection/tree.lux
index c936ded41..945c1c6b8 100644
--- a/stdlib/source/test/lux/data/collection/tree.lux
+++ b/stdlib/source/test/lux/data/collection/tree.lux
@@ -11,7 +11,7 @@
[data
["[0]" product]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/data/collection/tree/finger.lux b/stdlib/source/test/lux/data/collection/tree/finger.lux
index d2ddb1b96..a9e3d68e6 100644
--- a/stdlib/source/test/lux/data/collection/tree/finger.lux
+++ b/stdlib/source/test/lux/data/collection/tree/finger.lux
@@ -5,11 +5,11 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
- ["[0]" text ("[1]#[0]" equivalence monoid)]
+ ["[0]" text (.open: "[1]#[0]" equivalence monoid)]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/data/collection/tree/zipper.lux b/stdlib/source/test/lux/data/collection/tree/zipper.lux
index 4270e0f88..4a2bbac26 100644
--- a/stdlib/source/test/lux/data/collection/tree/zipper.lux
+++ b/stdlib/source/test/lux/data/collection/tree/zipper.lux
@@ -10,7 +10,7 @@
["$[0]" comonad]]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
["[0]" product]
["[0]" text]
diff --git a/stdlib/source/test/lux/data/format/binary.lux b/stdlib/source/test/lux/data/format/binary.lux
index 4210d2563..8c69f0c64 100644
--- a/stdlib/source/test/lux/data/format/binary.lux
+++ b/stdlib/source/test/lux/data/format/binary.lux
@@ -8,7 +8,7 @@
[\\specification
["$[0]" monoid]]]
[data
- ["[0]" binary ("[1]#[0]" equivalence)]]
+ ["[0]" binary (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]]]
[\\library
diff --git a/stdlib/source/test/lux/data/format/json.lux b/stdlib/source/test/lux/data/format/json.lux
index 9ae374636..1fb8f94fa 100644
--- a/stdlib/source/test/lux/data/format/json.lux
+++ b/stdlib/source/test/lux/data/format/json.lux
@@ -9,7 +9,7 @@
["$[0]" equivalence]
["$[0]" codec]]]
[control
- ["[0]" try ("[1]#[0]" functor)]]
+ ["[0]" try (.open: "[1]#[0]" functor)]]
[data
["[0]" product]
["[0]" bit]
@@ -19,7 +19,7 @@
["[0]" sequence]
["[0]" dictionary]
["[0]" set]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random (.only Random)]
[number
@@ -29,7 +29,7 @@
["[0]" syntax (.only syntax:)]
["[0]" code]]]]
[\\library
- ["[0]" / (.only JSON) ("#[0]" equivalence)]])
+ ["[0]" / (.only JSON) (.open: "[1]#[0]" equivalence)]])
(def: .public random
(Random /.JSON)
@@ -85,7 +85,7 @@
(|> expected
/.format
(# /.codec decoded)
- (try#each (#= expected))
+ (try#each (/#= expected))
(try.else false))))
(do random.monad
[keys (random.set text.hash 3 (random.alphabetic 1))
@@ -106,7 +106,7 @@
(_.coverage [/.field]
(list.every? (function (_ [key expected])
(|> (/.field key object)
- (try#each (#= expected))
+ (try#each (/#= expected))
(try.else false)))
expected))
))
@@ -122,7 +122,7 @@
.let [can_find_known_key!
(|> object
(/.field key)
- (try#each (#= {/.#Number expected}))
+ (try#each (/#= {/.#Number expected}))
(try.else false))
cannot_find_unknown_key!
@@ -165,15 +165,15 @@
<key5> (string)
<key6> (string)]
(_.coverage [/.json]
- (and (#= {/.#Null} (/.json ()))
+ (and (/#= {/.#Null} (/.json ()))
(~~ (template [<tag> <value>]
- [(#= {<tag> <value>} (/.json <value>))]
+ [(/#= {<tag> <value>} (/.json <value>))]
[/.#Boolean <boolean>]
[/.#Number <number>]
[/.#String <string>]
))
- (#= {/.#Array <array_sequence>} (/.json [() <boolean> <number> <string>]))
+ (/#= {/.#Array <array_sequence>} (/.json [() <boolean> <number> <string>]))
(let [object (/.json {<key0> ()
<key1> <boolean>
<key2> <number>
@@ -189,11 +189,11 @@
value4 (/.field <key4> object)
value5 (/.field <key5> object)
value6 (/.field <key6> value5)]
- (in (and (#= {/.#Null} value0)
- (#= {/.#Boolean <boolean>} value1)
- (#= {/.#Number <number>} value2)
- (#= {/.#String <string>} value3)
- (#= {/.#Array <array_sequence>} value4)
- (#= {/.#Number <number>} value6))))))
+ (in (and (/#= {/.#Null} value0)
+ (/#= {/.#Boolean <boolean>} value1)
+ (/#= {/.#Number <number>} value2)
+ (/#= {/.#String <string>} value3)
+ (/#= {/.#Array <array_sequence>} value4)
+ (/#= {/.#Number <number>} value6))))))
)))
))))
diff --git a/stdlib/source/test/lux/data/format/tar.lux b/stdlib/source/test/lux/data/format/tar.lux
index 24c1be821..c30fb086b 100644
--- a/stdlib/source/test/lux/data/format/tar.lux
+++ b/stdlib/source/test/lux/data/format/tar.lux
@@ -12,8 +12,8 @@
["<b>" binary]]]
[data
["[0]" product]
- ["[0]" binary ("[1]#[0]" equivalence monoid)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" binary (.open: "[1]#[0]" equivalence monoid)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
["[0]" utf8]]
@@ -22,7 +22,7 @@
["[1]/[0]" block]]]
[collection
["[0]" sequence]
- ["[0]" list ("[1]#[0]" mix)]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]
["[0]" format
["[1]" binary]]]
[time
diff --git a/stdlib/source/test/lux/data/format/xml.lux b/stdlib/source/test/lux/data/format/xml.lux
index 89c68a67a..dc95a00fe 100644
--- a/stdlib/source/test/lux/data/format/xml.lux
+++ b/stdlib/source/test/lux/data/format/xml.lux
@@ -13,15 +13,15 @@
["p" parser
["</>" xml]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" dictionary]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["^" pattern]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]
[meta
diff --git a/stdlib/source/test/lux/data/sum.lux b/stdlib/source/test/lux/data/sum.lux
index 9dd279775..82adfdc49 100644
--- a/stdlib/source/test/lux/data/sum.lux
+++ b/stdlib/source/test/lux/data/sum.lux
@@ -12,7 +12,7 @@
[data
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/data/text/buffer.lux b/stdlib/source/test/lux/data/text/buffer.lux
index 0def44bd6..b6d868fbd 100644
--- a/stdlib/source/test/lux/data/text/buffer.lux
+++ b/stdlib/source/test/lux/data/text/buffer.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/data/text/encoding.lux b/stdlib/source/test/lux/data/text/encoding.lux
index 42f0e9d38..d56fd8bdc 100644
--- a/stdlib/source/test/lux/data/text/encoding.lux
+++ b/stdlib/source/test/lux/data/text/encoding.lux
@@ -10,9 +10,9 @@
["[0]" maybe]
["[0]" try]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" mix)]
+ ["[0]" list (.open: "[1]#[0]" mix)]
["[0]" set]]]
[macro
["[0]" template]]
diff --git a/stdlib/source/test/lux/data/text/escape.lux b/stdlib/source/test/lux/data/text/escape.lux
index c2d06ce89..aba3d5948 100644
--- a/stdlib/source/test/lux/data/text/escape.lux
+++ b/stdlib/source/test/lux/data/text/escape.lux
@@ -12,8 +12,8 @@
[parser
["<[0]>" code]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text (.only Char) ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.only Char) (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" set (.only Set)]]]
diff --git a/stdlib/source/test/lux/data/text/format.lux b/stdlib/source/test/lux/data/text/format.lux
index 9026a7029..903e13497 100644
--- a/stdlib/source/test/lux/data/text/format.lux
+++ b/stdlib/source/test/lux/data/text/format.lux
@@ -11,13 +11,13 @@
[control
["[0]" try]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
["[0]" bit]
[format
["[0]" xml]
["[0]" json]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
["[0]" time (.only)
["[0]" day]
["[0]" month]
@@ -25,7 +25,7 @@
["[0]" duration]
["[0]" date]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
["[0]" modulus]
["[0]" modular]
[number
diff --git a/stdlib/source/test/lux/data/text/regex.lux b/stdlib/source/test/lux/data/text/regex.lux
index 646e29e6c..c16388e4e 100644
--- a/stdlib/source/test/lux/data/text/regex.lux
+++ b/stdlib/source/test/lux/data/text/regex.lux
@@ -11,7 +11,7 @@
["<[0]>" text (.only Parser)]
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/test/lux/data/text/unicode/set.lux b/stdlib/source/test/lux/data/text/unicode/set.lux
index a0cc8b90f..af36a8463 100644
--- a/stdlib/source/test/lux/data/text/unicode/set.lux
+++ b/stdlib/source/test/lux/data/text/unicode/set.lux
@@ -8,9 +8,9 @@
["$[0]" equivalence]]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" set ("[1]#[0]" equivalence)]]]
+ ["[0]" set (.open: "[1]#[0]" equivalence)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/debug.lux b/stdlib/source/test/lux/debug.lux
index 30b464449..9b61ab55d 100644
--- a/stdlib/source/test/lux/debug.lux
+++ b/stdlib/source/test/lux/debug.lux
@@ -6,15 +6,15 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[parser
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]
[format
[json (.only JSON)]
[xml (.only XML)]]]
diff --git a/stdlib/source/test/lux/documentation.lux b/stdlib/source/test/lux/documentation.lux
index b6a08b480..40ad67b42 100644
--- a/stdlib/source/test/lux/documentation.lux
+++ b/stdlib/source/test/lux/documentation.lux
@@ -9,7 +9,7 @@
[parser
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]
[format
["md" markdown]]]
diff --git a/stdlib/source/test/lux/extension.lux b/stdlib/source/test/lux/extension.lux
index a40850eb7..c8434e1c6 100644
--- a/stdlib/source/test/lux/extension.lux
+++ b/stdlib/source/test/lux/extension.lux
@@ -19,7 +19,7 @@
[abstract
["[0]" monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["<>" parser (.only)
["<[0]>" code]
["<[0]>" analysis]
@@ -27,11 +27,11 @@
[data
["[0]" binary]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" sequence]
- ["[0]" list ("[1]#[0]" functor)]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]
[format
["[0]F" binary]]]
[macro
diff --git a/stdlib/source/test/lux/ffi.js.lux b/stdlib/source/test/lux/ffi.js.lux
index 20920baa6..6d0946605 100644
--- a/stdlib/source/test/lux/ffi.js.lux
+++ b/stdlib/source/test/lux/ffi.js.lux
@@ -7,8 +7,8 @@
[control
["[0]" try]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/ffi.jvm.lux b/stdlib/source/test/lux/ffi.jvm.lux
index 9e4af45a8..0174a039f 100644
--- a/stdlib/source/test/lux/ffi.jvm.lux
+++ b/stdlib/source/test/lux/ffi.jvm.lux
@@ -2,7 +2,7 @@
[library
[lux (.except)
["_" test (.only Test)]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
["[0]" meta]
["[0]" debug]
["[0]" static]
@@ -10,13 +10,13 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[parser
["<[0]>" code]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" array (.only Array)]]]
@@ -25,15 +25,15 @@
["[0]" code]
["[0]" template]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number (.only hex)
["[0]" i64]
["n" nat]
- ["i" int ("[1]#[0]" equivalence)]
- ["f" frac ("[1]#[0]" equivalence)]]]
+ ["i" int (.open: "[1]#[0]" equivalence)]
+ ["f" frac (.open: "[1]#[0]" equivalence)]]]
[target
["[0]" jvm
- ["[1]" type ("[1]#[0]" equivalence)]]]]]
+ ["[1]" type (.open: "[1]#[0]" equivalence)]]]]]
[\\library
["[0]" /]]
["$[0]" /
diff --git a/stdlib/source/test/lux/ffi.old.lux b/stdlib/source/test/lux/ffi.old.lux
index 53b14d335..e5f5ab8aa 100644
--- a/stdlib/source/test/lux/ffi.old.lux
+++ b/stdlib/source/test/lux/ffi.old.lux
@@ -8,7 +8,7 @@
[control
["[0]" pipe]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[macro
["[0]" template]]
@@ -18,7 +18,7 @@
["n" nat]
["i" int]
["f" frac]]]
- ["[0]" type ("[1]#[0]" equivalence)]]]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/ffi.php.lux b/stdlib/source/test/lux/ffi.php.lux
index d880303ec..22532f1b1 100644
--- a/stdlib/source/test/lux/ffi.php.lux
+++ b/stdlib/source/test/lux/ffi.php.lux
@@ -7,7 +7,7 @@
[control
["[0]" try]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/ffi.scm.lux b/stdlib/source/test/lux/ffi.scm.lux
index d880303ec..22532f1b1 100644
--- a/stdlib/source/test/lux/ffi.scm.lux
+++ b/stdlib/source/test/lux/ffi.scm.lux
@@ -7,7 +7,7 @@
[control
["[0]" try]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/ffi/export.jvm.lux b/stdlib/source/test/lux/ffi/export.jvm.lux
index b01c607ef..7dc0e194d 100644
--- a/stdlib/source/test/lux/ffi/export.jvm.lux
+++ b/stdlib/source/test/lux/ffi/export.jvm.lux
@@ -8,18 +8,18 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]]
[macro
["[0]" code]
["[0]" template]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number (.only hex)
["[0]" i64]
- ["[0]" int ("[1]#[0]" equivalence)]
- ["[0]" frac ("[1]#[0]" equivalence)]]]]]
+ ["[0]" int (.open: "[1]#[0]" equivalence)]
+ ["[0]" frac (.open: "[1]#[0]" equivalence)]]]]]
[\\library
["[0]" / (.only)
["/[1]" //]]])
diff --git a/stdlib/source/test/lux/locale.lux b/stdlib/source/test/lux/locale.lux
index 7116e3e67..7f4f183fb 100644
--- a/stdlib/source/test/lux/locale.lux
+++ b/stdlib/source/test/lux/locale.lux
@@ -8,9 +8,9 @@
["$[0]" equivalence]
["$[0]" hash]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["[0]" encoding (.only Encoding)]]
[collection
["[0]" list]]]]]
diff --git a/stdlib/source/test/lux/locale/language.lux b/stdlib/source/test/lux/locale/language.lux
index 66f34be4f..6c8b4f6ad 100644
--- a/stdlib/source/test/lux/locale/language.lux
+++ b/stdlib/source/test/lux/locale/language.lux
@@ -13,7 +13,7 @@
["[0]" text]
[collection
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/test/lux/locale/territory.lux b/stdlib/source/test/lux/locale/territory.lux
index c1d82e8fc..067d68595 100644
--- a/stdlib/source/test/lux/locale/territory.lux
+++ b/stdlib/source/test/lux/locale/territory.lux
@@ -13,7 +13,7 @@
["[0]" text]
[collection
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/test/lux/macro.lux b/stdlib/source/test/lux/macro.lux
index cda98f580..f1f2bce0b 100644
--- a/stdlib/source/test/lux/macro.lux
+++ b/stdlib/source/test/lux/macro.lux
@@ -6,11 +6,11 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" code]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text (.only)
["%" format (.only format)]]
[collection
@@ -18,7 +18,7 @@
[macro
["^" pattern]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" functor)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" functor)]
[number
["n" nat]]]
["[0]" meta (.only)
@@ -27,7 +27,7 @@
[\\library
["[0]" / (.only)
[syntax (.only syntax:)]
- ["[0]" code ("[1]#[0]" equivalence)]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]
["[0]" template]]]
["[0]" /
["[1][0]" code]
diff --git a/stdlib/source/test/lux/macro/code.lux b/stdlib/source/test/lux/macro/code.lux
index 34f759fed..f3991eda0 100644
--- a/stdlib/source/test/lux/macro/code.lux
+++ b/stdlib/source/test/lux/macro/code.lux
@@ -12,9 +12,9 @@
["[0]" product]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]
[meta
diff --git a/stdlib/source/test/lux/macro/pattern.lux b/stdlib/source/test/lux/macro/pattern.lux
index 1353b17ed..6fb9ef8d0 100644
--- a/stdlib/source/test/lux/macro/pattern.lux
+++ b/stdlib/source/test/lux/macro/pattern.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[macro
["[0]" code]]
[math
diff --git a/stdlib/source/test/lux/macro/syntax/check.lux b/stdlib/source/test/lux/macro/syntax/check.lux
index c7e4dbc39..cb43a209c 100644
--- a/stdlib/source/test/lux/macro/syntax/check.lux
+++ b/stdlib/source/test/lux/macro/syntax/check.lux
@@ -13,7 +13,7 @@
[math
["[0]" random (.only Random)]]
[macro
- ["[0]" code ("[1]#[0]" equivalence)]]]]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]]]]
[\\library
["[0]" /]]
["$[0]" ///
diff --git a/stdlib/source/test/lux/macro/syntax/definition.lux b/stdlib/source/test/lux/macro/syntax/definition.lux
index 2365e0d6b..7fa3550dd 100644
--- a/stdlib/source/test/lux/macro/syntax/definition.lux
+++ b/stdlib/source/test/lux/macro/syntax/definition.lux
@@ -12,7 +12,7 @@
["<>" parser (.only)
["<[0]>" code]]]
[macro
- ["[0]" code ("[1]#[0]" equivalence)]]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]
[meta
diff --git a/stdlib/source/test/lux/macro/syntax/export.lux b/stdlib/source/test/lux/macro/syntax/export.lux
index a2133452c..151d72ada 100644
--- a/stdlib/source/test/lux/macro/syntax/export.lux
+++ b/stdlib/source/test/lux/macro/syntax/export.lux
@@ -6,11 +6,11 @@
[monad (.only do)]]
[control
["[0]" maybe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" code]]]
[macro
- ["[0]" code ("[1]#[0]" equivalence)]]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/macro/syntax/type/variable.lux b/stdlib/source/test/lux/macro/syntax/type/variable.lux
index db7e23daa..0e1d52f6f 100644
--- a/stdlib/source/test/lux/macro/syntax/type/variable.lux
+++ b/stdlib/source/test/lux/macro/syntax/type/variable.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" code]]]
[math
diff --git a/stdlib/source/test/lux/math.lux b/stdlib/source/test/lux/math.lux
index 6c7cfd915..38c704927 100644
--- a/stdlib/source/test/lux/math.lux
+++ b/stdlib/source/test/lux/math.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/test/lux/math/infix.lux b/stdlib/source/test/lux/math/infix.lux
index 249f8d3a2..441df11b9 100644
--- a/stdlib/source/test/lux/math/infix.lux
+++ b/stdlib/source/test/lux/math/infix.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/math/logic/fuzzy.lux b/stdlib/source/test/lux/math/logic/fuzzy.lux
index e0e5bc1ea..2cfc62142 100644
--- a/stdlib/source/test/lux/math/logic/fuzzy.lux
+++ b/stdlib/source/test/lux/math/logic/fuzzy.lux
@@ -9,7 +9,7 @@
[functor
["$[0]" contravariant]]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]
["[0]" set]]]
diff --git a/stdlib/source/test/lux/math/modular.lux b/stdlib/source/test/lux/math/modular.lux
index e05d7c8e9..0137ba9ae 100644
--- a/stdlib/source/test/lux/math/modular.lux
+++ b/stdlib/source/test/lux/math/modular.lux
@@ -2,7 +2,7 @@
[library
[lux (.except)
["_" test (.only Test)]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
[monad (.only do)]
["[0]" predicate]
@@ -16,7 +16,7 @@
["[0]" exception]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/math/number/complex.lux b/stdlib/source/test/lux/math/number/complex.lux
index ec11a5428..087ee1245 100644
--- a/stdlib/source/test/lux/math/number/complex.lux
+++ b/stdlib/source/test/lux/math/number/complex.lux
@@ -8,7 +8,7 @@
["$[0]" equivalence]]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random (.only Random)]]]]
[\\library
diff --git a/stdlib/source/test/lux/math/number/frac.lux b/stdlib/source/test/lux/math/number/frac.lux
index 5f4c021bd..c302d876c 100644
--- a/stdlib/source/test/lux/math/number/frac.lux
+++ b/stdlib/source/test/lux/math/number/frac.lux
@@ -13,7 +13,7 @@
["$[0]" monoid]
["$[0]" codec]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[macro
["[0]" template]]
[math
diff --git a/stdlib/source/test/lux/math/number/i64.lux b/stdlib/source/test/lux/math/number/i64.lux
index f6ade938b..550d6f03d 100644
--- a/stdlib/source/test/lux/math/number/i64.lux
+++ b/stdlib/source/test/lux/math/number/i64.lux
@@ -3,7 +3,7 @@
[lux (.except)
["_" test (.only Test)]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[abstract
[monad (.only do)]
[\\specification
@@ -13,7 +13,7 @@
[math
["[0]" random (.only Random)]]]]
[\\library
- ["[0]" / ("#[0]" equivalence)
+ ["[0]" / (.open: "[1]#[0]" equivalence)
[// (.only hex)
["n" nat]
["i" int]]]])
@@ -26,20 +26,20 @@
(all _.and
(_.coverage [/.one? /.one]
(if (/.one? idx pattern)
- (#= pattern (/.one idx pattern))
- (not (#= pattern (/.one idx pattern)))))
+ (/#= pattern (/.one idx pattern))
+ (not (/#= pattern (/.one idx pattern)))))
(_.coverage [/.zero? /.zero]
(if (/.zero? idx pattern)
- (#= pattern (/.zero idx pattern))
- (not (#= pattern (/.zero idx pattern)))))
+ (/#= pattern (/.zero idx pattern))
+ (not (/#= pattern (/.zero idx pattern)))))
(_.coverage [/.flipped]
- (#= (/.flipped idx pattern)
- (if (/.one? idx pattern)
- (/.zero idx pattern)
- (/.one idx pattern))))
+ (/#= (/.flipped idx pattern)
+ (if (/.one? idx pattern)
+ (/.zero idx pattern)
+ (/.one idx pattern))))
(_.coverage [/.bit]
(bit#= (/.zero? idx pattern)
- (#= /.false (/.and (/.bit idx) pattern))))
+ (/#= /.false (/.and (/.bit idx) pattern))))
)))
(def: shift
@@ -51,19 +51,19 @@
[idx (# ! each (|>> (n.% (-- /.width)) ++) random.nat)]
(_.coverage [/.left_shifted /.right_shifted]
(let [nullity!
- (and (#= pattern (/.left_shifted 0 pattern))
- (#= pattern (/.right_shifted 0 pattern)))
+ (and (/#= pattern (/.left_shifted 0 pattern))
+ (/#= pattern (/.right_shifted 0 pattern)))
idempotency!
- (and (#= pattern (/.left_shifted /.width pattern))
- (#= pattern (/.right_shifted /.width pattern)))
+ (and (/#= pattern (/.left_shifted /.width pattern))
+ (/#= pattern (/.right_shifted /.width pattern)))
movement!
(let [shift (n.- idx /.width)]
- (#= (/.and (/.mask idx) pattern)
- (|> pattern
- (/.left_shifted shift)
- (/.right_shifted shift))))]
+ (/#= (/.and (/.mask idx) pattern)
+ (|> pattern
+ (/.left_shifted shift)
+ (/.right_shifted shift))))]
(and nullity!
idempotency!
movement!))))
@@ -78,20 +78,20 @@
signed random.int]
(all _.and
(_.coverage [/.sign]
- (bit#= (#= (.i64 0) (/.and /.sign signed))
+ (bit#= (/#= (.i64 0) (/.and /.sign signed))
(i.positive? signed)))
(_.coverage [/.mask]
(let [mask (/.mask idx)
- idempotency! (#= (/.and mask pattern)
- (/.and mask (/.and mask pattern)))
+ idempotency! (/#= (/.and mask pattern)
+ (/.and mask (/.and mask pattern)))
limit (++ (.nat mask))
limit! (if (n.< limit pattern)
- (#= pattern (/.and mask pattern))
+ (/#= pattern (/.and mask pattern))
(n.< limit (/.and mask pattern)))
- empty! (#= /.false (/.mask 0))
- full! (#= /.true (/.mask /.width))]
+ empty! (/#= /.false (/.mask 0))
+ full! (/#= /.true (/.mask /.width))]
(and idempotency!
limit!
@@ -103,19 +103,19 @@
offset (# ! each (n.% spare) random.nat)]
(_.coverage [/.region]
(case size
- 0 (#= /.false (/.region offset size))
- _ (#= (|> pattern
- ... NNNNYYYYNNNN
- (/.right_shifted offset)
- ... ____NNNNYYYY
- (/.left_shifted spare)
- ... YYYY________
- (/.right_shifted spare)
- ... ________YYYY
- (/.left_shifted offset)
- ... ____YYYY____
- )
- (/.and (/.region offset size) pattern)))))
+ 0 (/#= /.false (/.region offset size))
+ _ (/#= (|> pattern
+ ... NNNNYYYYNNNN
+ (/.right_shifted offset)
+ ... ____NNNNYYYY
+ (/.left_shifted spare)
+ ... YYYY________
+ (/.right_shifted spare)
+ ... ________YYYY
+ (/.left_shifted offset)
+ ... ____YYYY____
+ )
+ (/.and (/.region offset size) pattern)))))
))))
(def: sub
@@ -143,7 +143,7 @@
($equivalence.spec (# sub sub_equivalence) (random (# sub narrow)))
(_.coverage [/.sub]
(let [actual (|> expected .i64 (# sub narrow) (# sub wide))]
- (#= expected actual)))
+ (/#= expected actual)))
))))))
(def: signature
@@ -175,27 +175,27 @@
(_.coverage [/.false]
(n.= 0 (/.ones /.false)))
(_.coverage [/.or]
- (and (#= /.true (/.or /.true pattern))
- (#= pattern (/.or /.false pattern))))
+ (and (/#= /.true (/.or /.true pattern))
+ (/#= pattern (/.or /.false pattern))))
(_.coverage [/.true]
(n.= /.width (/.ones /.true)))
(_.coverage [/.and]
- (and (#= pattern (/.and /.true pattern))
- (#= /.false (/.and /.false pattern))))
+ (and (/#= pattern (/.and /.true pattern))
+ (/#= /.false (/.and /.false pattern))))
(_.coverage [/.not]
- (and (#= /.false
- (/.and pattern
- (/.not pattern)))
- (#= /.true
- (/.or pattern
- (/.not pattern)))))
+ (and (/#= /.false
+ (/.and pattern
+ (/.not pattern)))
+ (/#= /.true
+ (/.or pattern
+ (/.not pattern)))))
(_.coverage [/.xor]
- (and (#= /.true
- (/.xor pattern
- (/.not pattern)))
- (#= /.false
- (/.xor pattern
- pattern))))
+ (and (/#= /.true
+ (/.xor pattern
+ (/.not pattern)))
+ (/#= /.false
+ (/.xor pattern
+ pattern))))
(_.coverage [/.ones]
(let [zero&one!
(if (/.one? idx pattern)
@@ -210,52 +210,52 @@
complementarity!)))
(_.coverage [/.left_rotated /.right_rotated]
(let [false!
- (and (#= /.false (/.left_rotated idx /.false))
- (#= /.false (/.right_rotated idx /.false)))
+ (and (/#= /.false (/.left_rotated idx /.false))
+ (/#= /.false (/.right_rotated idx /.false)))
true!
- (and (#= /.true (/.left_rotated idx /.true))
- (#= /.true (/.right_rotated idx /.true)))
+ (and (/#= /.true (/.left_rotated idx /.true))
+ (/#= /.true (/.right_rotated idx /.true)))
inverse!
(and (|> pattern
(/.left_rotated idx)
(/.right_rotated idx)
- (#= pattern))
+ (/#= pattern))
(|> pattern
(/.right_rotated idx)
(/.left_rotated idx)
- (#= pattern)))
+ (/#= pattern)))
nullity!
(and (|> pattern
(/.left_rotated 0)
- (#= pattern))
+ (/#= pattern))
(|> pattern
(/.right_rotated 0)
- (#= pattern)))
+ (/#= pattern)))
futility!
(and (|> pattern
(/.left_rotated /.width)
- (#= pattern))
+ (/#= pattern))
(|> pattern
(/.right_rotated /.width)
- (#= pattern)))]
+ (/#= pattern)))]
(and false!
true!
inverse!
nullity!
futility!)))
(_.coverage [/.reversed]
- (and (|> pattern /.reversed /.reversed (#= pattern))
- (or (|> pattern /.reversed (#= pattern) not)
+ (and (|> pattern /.reversed /.reversed (/#= pattern))
+ (or (|> pattern /.reversed (/#= pattern) not)
(let [high (/.and (hex "FFFFFFFF00000000")
pattern)
low (/.and (hex "00000000FFFFFFFF")
pattern)]
- (#= (/.reversed high)
- low)))))
+ (/#= (/.reversed high)
+ low)))))
..bit
..shift
diff --git a/stdlib/source/test/lux/math/number/int.lux b/stdlib/source/test/lux/math/number/int.lux
index 200d932ea..1509a65fc 100644
--- a/stdlib/source/test/lux/math/number/int.lux
+++ b/stdlib/source/test/lux/math/number/int.lux
@@ -13,7 +13,7 @@
["$[0]" monoid]
["$[0]" codec]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]]]
[\\library
diff --git a/stdlib/source/test/lux/math/number/nat.lux b/stdlib/source/test/lux/math/number/nat.lux
index 04a0418c1..733b6445e 100644
--- a/stdlib/source/test/lux/math/number/nat.lux
+++ b/stdlib/source/test/lux/math/number/nat.lux
@@ -13,7 +13,7 @@
["$[0]" monoid]
["$[0]" codec]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random]]]]
[\\library
diff --git a/stdlib/source/test/lux/math/number/ratio.lux b/stdlib/source/test/lux/math/number/ratio.lux
index b851e47eb..fe01953dc 100644
--- a/stdlib/source/test/lux/math/number/ratio.lux
+++ b/stdlib/source/test/lux/math/number/ratio.lux
@@ -10,15 +10,15 @@
["$[0]" monoid]
["$[0]" codec]]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]]]
[\\library
["[0]" / (.only)
[//
- ["n" nat ("[1]#[0]" equivalence)]]]])
+ ["n" nat (.open: "[1]#[0]" equivalence)]]]])
(def: part
(Random Nat)
diff --git a/stdlib/source/test/lux/math/number/rev.lux b/stdlib/source/test/lux/math/number/rev.lux
index 45ce9ff55..82b16e725 100644
--- a/stdlib/source/test/lux/math/number/rev.lux
+++ b/stdlib/source/test/lux/math/number/rev.lux
@@ -13,7 +13,7 @@
["$[0]" monoid]
["$[0]" codec]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random]]]]
[\\library
@@ -21,7 +21,7 @@
[// (.only hex)
["n" nat]
["f" frac]
- ["[0]" i64 ("[1]#[0]" hash)]]]])
+ ["[0]" i64 (.open: "[1]#[0]" hash)]]]])
(def: signature
Test
diff --git a/stdlib/source/test/lux/meta.lux b/stdlib/source/test/lux/meta.lux
index 31119081b..87823e85a 100644
--- a/stdlib/source/test/lux/meta.lux
+++ b/stdlib/source/test/lux/meta.lux
@@ -2,7 +2,7 @@
[library
[lux (.except)
["_" test (.only Test)]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
[equivalence (.only Equivalence)]
[monad (.only do)]
@@ -12,14 +12,14 @@
["$[0]" monad]]]
[control
["[0]" maybe]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]
["[0]" set]]]
[macro
["^" pattern]]
@@ -29,7 +29,7 @@
["n" nat]]]
[meta
["[0]" location]
- ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+ ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
[\\library
["[0]" /]]
["[0]" /
diff --git a/stdlib/source/test/lux/meta/configuration.lux b/stdlib/source/test/lux/meta/configuration.lux
index 8f9539fae..a8d7f0169 100644
--- a/stdlib/source/test/lux/meta/configuration.lux
+++ b/stdlib/source/test/lux/meta/configuration.lux
@@ -9,7 +9,7 @@
["$[0]" equivalence]
["$[0]" monoid]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
["<>" parser (.only)
["<[0]>" text]
@@ -22,7 +22,7 @@
[syntax (.only syntax:)]
["[0]" code]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/static.lux b/stdlib/source/test/lux/static.lux
index c5ecf3a71..2e810c517 100644
--- a/stdlib/source/test/lux/static.lux
+++ b/stdlib/source/test/lux/static.lux
@@ -5,14 +5,14 @@
["@" target]
["[0]" meta]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[macro
["[0]" code]]
[math
- ["[0]" random ("[1]#[0]" functor)]
+ ["[0]" random (.open: "[1]#[0]" functor)]
[number
["n" nat]
["i" int]
diff --git a/stdlib/source/test/lux/target/js.lux b/stdlib/source/test/lux/target/js.lux
index c759cc02e..84cd62bdf 100644
--- a/stdlib/source/test/lux/target/js.lux
+++ b/stdlib/source/test/lux/target/js.lux
@@ -9,18 +9,18 @@
[control
["[0]" pipe]
["[0]" function]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text (.only \n) ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.only \n) (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["[0]" template]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]
["i" int]
diff --git a/stdlib/source/test/lux/target/jvm.lux b/stdlib/source/test/lux/target/jvm.lux
index 0dddacfb5..c2c1e49f3 100644
--- a/stdlib/source/test/lux/target/jvm.lux
+++ b/stdlib/source/test/lux/target/jvm.lux
@@ -13,8 +13,8 @@
[concurrency
["[0]" atom]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
["[0]" format
["[1]" binary]]
@@ -23,9 +23,9 @@
["[0]" dictionary]
["[0]" sequence]
["[0]" set]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]
["i" int]
@@ -37,7 +37,7 @@
["[0]" /
["[1][0]" loader (.only Library)]
["[1][0]" version]
- ["[1][0]" modifier ("[1]#[0]" monoid)]
+ ["[1][0]" modifier (.open: "[1]#[0]" monoid)]
["[1][0]" field]
["[1][0]" method (.only Method)]
["[1][0]" class]
diff --git a/stdlib/source/test/lux/target/lua.lux b/stdlib/source/test/lux/target/lua.lux
index 381758793..fbdc7625e 100644
--- a/stdlib/source/test/lux/target/lua.lux
+++ b/stdlib/source/test/lux/target/lua.lux
@@ -12,18 +12,18 @@
[control
["[0]" pipe]
["[0]" function]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text (.only \n) ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.only \n) (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["[0]" template]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]
["i" int]
diff --git a/stdlib/source/test/lux/target/python.lux b/stdlib/source/test/lux/target/python.lux
index 0b484f9ef..35fbf47c8 100644
--- a/stdlib/source/test/lux/target/python.lux
+++ b/stdlib/source/test/lux/target/python.lux
@@ -12,25 +12,25 @@
["$[0]" hash]]]
[control
["[0]" function]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[macro
["[0]" code]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]
["i" int]
["f" frac]
["[0]" i64]]]]]
[\\library
- ["[0]" / ("[1]#[0]" equivalence)]])
+ ["[0]" / (.open: "[1]#[0]" equivalence)]])
(ffi.import: (eval [Text] "try" "?" Any))
diff --git a/stdlib/source/test/lux/target/ruby.lux b/stdlib/source/test/lux/target/ruby.lux
index 94e1df527..5e5588be7 100644
--- a/stdlib/source/test/lux/target/ruby.lux
+++ b/stdlib/source/test/lux/target/ruby.lux
@@ -11,17 +11,17 @@
["$[0]" equivalence]]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor)]
+ ["[0]" list (.open: "[1]#[0]" functor)]
["[0]" set]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number (.only hex)
["n" nat]
["i" int]
@@ -35,7 +35,7 @@
[world
["[0]" file]]]]
[\\library
- ["[0]" / ("[1]#[0]" equivalence)]])
+ ["[0]" / (.open: "[1]#[0]" equivalence)]])
(ffi.import: (eval [Text] "try" "?" Any))
diff --git a/stdlib/source/test/lux/test.lux b/stdlib/source/test/lux/test.lux
index 1a1842846..b43483870 100644
--- a/stdlib/source/test/lux/test.lux
+++ b/stdlib/source/test/lux/test.lux
@@ -10,7 +10,7 @@
["[0]" async]
["[0]" atom (.only Atom)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]
[collection
["[0]" list]
diff --git a/stdlib/source/test/lux/time.lux b/stdlib/source/test/lux/time.lux
index 8f478b695..456409afd 100644
--- a/stdlib/source/test/lux/time.lux
+++ b/stdlib/source/test/lux/time.lux
@@ -11,7 +11,7 @@
["$[0]" codec]]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[parser
["<[0]>" text]]]
diff --git a/stdlib/source/test/lux/time/date.lux b/stdlib/source/test/lux/time/date.lux
index 1d0da3548..2d9a2486b 100644
--- a/stdlib/source/test/lux/time/date.lux
+++ b/stdlib/source/test/lux/time/date.lux
@@ -10,7 +10,7 @@
["$[0]" enum]
["$[0]" codec]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[parser
["<[0]>" text]]]
diff --git a/stdlib/source/test/lux/time/day.lux b/stdlib/source/test/lux/time/day.lux
index 4537d684d..432012147 100644
--- a/stdlib/source/test/lux/time/day.lux
+++ b/stdlib/source/test/lux/time/day.lux
@@ -12,14 +12,14 @@
["$[0]" enum]
["$[0]" codec]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
[collection
["[0]" list]
["[0]" set]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\library
diff --git a/stdlib/source/test/lux/time/duration.lux b/stdlib/source/test/lux/time/duration.lux
index 80e516133..d637ebf2f 100644
--- a/stdlib/source/test/lux/time/duration.lux
+++ b/stdlib/source/test/lux/time/duration.lux
@@ -11,7 +11,7 @@
["$[0]" monoid]
["$[0]" codec]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/time/instant.lux b/stdlib/source/test/lux/time/instant.lux
index 50c1eec56..0ae5bf04c 100644
--- a/stdlib/source/test/lux/time/instant.lux
+++ b/stdlib/source/test/lux/time/instant.lux
@@ -15,12 +15,12 @@
["[0]" io]]
[data
[collection
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
["[0]" random]]
[time
["[0]" duration (.only Duration)]
- ["[0]" day (.only Day) ("[1]#[0]" enum)]]]]
+ ["[0]" day (.only Day) (.open: "[1]#[0]" enum)]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/time/month.lux b/stdlib/source/test/lux/time/month.lux
index 61172c7be..b1950994b 100644
--- a/stdlib/source/test/lux/time/month.lux
+++ b/stdlib/source/test/lux/time/month.lux
@@ -12,12 +12,12 @@
["$[0]" enum]
["$[0]" codec]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
[collection
["[0]" set]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/time/year.lux b/stdlib/source/test/lux/time/year.lux
index d96fb4539..f80e03838 100644
--- a/stdlib/source/test/lux/time/year.lux
+++ b/stdlib/source/test/lux/time/year.lux
@@ -12,7 +12,7 @@
["[0]" try]
["[0]" exception]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[text
["%" format (.only format)]]]
[math
diff --git a/stdlib/source/test/lux/tool/compiler/arity.lux b/stdlib/source/test/lux/tool/compiler/arity.lux
index cba1ec670..7ba4457d0 100644
--- a/stdlib/source/test/lux/tool/compiler/arity.lux
+++ b/stdlib/source/test/lux/tool/compiler/arity.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux
index 3ee106194..a1f45b42d 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux
@@ -14,14 +14,14 @@
["[0]" try]
["[0]" exception (.only exception:)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[macro
["[0]" template]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["f" frac]]]
[meta
@@ -45,7 +45,7 @@
["[1][0]" symbol]
["[0]" location
["[2][1]" /]
- ["[1]" \\library ("[1]#[0]" equivalence)]]]]]]
+ ["[1]" \\library (.open: "[1]#[0]" equivalence)]]]]]]
[\\library
["[0]" / (.only)
[//
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux
index 4167b14b8..6b10cb6ea 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux
@@ -8,11 +8,11 @@
["$[0]" equivalence]
["$[0]" hash]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux
index 0b8e456e7..362d94927 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux
@@ -9,23 +9,23 @@
["$[0]" equivalence]]]
[control
["[0]" pipe]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only Exception)]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]
[collection
["[0]" set]
["[0]" dictionary]
- ["[0]" list ("[1]#[0]" functor mix)]]]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]]]
[macro
["^" pattern]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
- ["n" nat ("[1]#[0]" interval)]
+ ["n" nat (.open: "[1]#[0]" interval)]
["i" int]
["r" rev]
["f" frac]]]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux
index 1f73e45e7..f7acc50f8 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux
@@ -5,19 +5,19 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only Exception)]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
[macro
["[0]" code]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]
[meta
@@ -25,7 +25,7 @@
["$[1]" \\test]]
["[0]" configuration
["$[1]" \\test]]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check (.only Check)]]]]
[\\library
["[0]" / (.only)
@@ -42,7 +42,7 @@
["[1]/[0]" analysis
["[1]" lux]]]]
[///
- ["[2][0]" phase ("[1]#[0]" monad)]
+ ["[2][0]" phase (.open: "[1]#[0]" monad)]
[meta
["[0]" archive]]]]]]])
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux
index 832684b48..684873614 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux
@@ -8,18 +8,18 @@
["$[0]" equivalence]]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
- ["[0]" list ("[1]#[0]" monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monad)]]]
[macro
- ["[0]" code ("[1]#[0]" equivalence)]]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]
["[0]" meta (.only)
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux
index 1093d5917..ef24e378b 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux
@@ -6,11 +6,11 @@
["[0]" monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]
["[0]" set]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux
index 38be6c002..b78881b03 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux
@@ -7,10 +7,10 @@
[\\specification
["$[0]" equivalence]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["f" frac]]]]]
[\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux
index e2c440224..8a4730a35 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux
@@ -6,8 +6,8 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
["[0]" product]
@@ -26,7 +26,7 @@
[phase
["[1][0]" extension]]
[///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[reference
["[1][0]" variable (.only Register Variable)]]]]]]]
["$[0]" //
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux
index 223b22cca..a918dc13c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux
@@ -7,10 +7,10 @@
[\\specification
["$[0]" equivalence]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["f" frac]]]]]
[\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux
index 4a2f18b51..5b2c340dc 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux
@@ -6,7 +6,7 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]]
+ ["[0]" try (.open: "[1]#[0]" functor)]]
[data
["[0]" product]]
[math
@@ -14,7 +14,7 @@
[meta
["[0]" configuration
["$[1]" \\test]]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check]]]]
[\\library
["[0]" / (.only)
@@ -24,7 +24,7 @@
[phase
["[2][0]" extension]]
[///
- ["[2][0]" phase ("[1]#[0]" functor)]]]]]])
+ ["[2][0]" phase (.open: "[1]#[0]" functor)]]]]]])
(def: .public random_state
(Random Lux)
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux
index 87ca59d95..67c097440 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux
@@ -18,7 +18,7 @@
["[0]" random]
[number
["n" nat]]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check]]]]
[\\library
["[0]" / (.only)
@@ -36,7 +36,7 @@
["[1][0]" type (.only)
["$[1]" \\test]]]
[///
- ["[0]" phase ("[1]#[0]" monad)]
+ ["[0]" phase (.open: "[1]#[0]" monad)]
[meta
["[0]" archive]]]]]]]
["[0]" /
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux
index 2c2367a0c..f69c47c4c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux
@@ -5,7 +5,7 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
["[0]" product]
@@ -15,7 +15,7 @@
["[0]" code]]
[math
["[0]" random]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check]]]]
[\\library
["[0]" / (.only)
@@ -36,7 +36,7 @@
["[2][0]" inference
["$[1]" \\test]]]
[///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
["[0]" archive]]]]]]]])
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux
index 2db4901b8..669d747ff 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux
@@ -6,22 +6,22 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try (.only Try) ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.only Try) (.open: "[1]#[0]" functor)]
["[0]" exception (.only Exception)]]
[data
["[0]" product]
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" text (.only)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" monad monoid)]
+ ["[0]" list (.open: "[1]#[0]" monad monoid)]
["[0]" set]]]
[macro
["^" pattern]
["[0]" code]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]
["f" frac]]]
@@ -30,7 +30,7 @@
["$[1]" \\test]]
["[0]" configuration
["$[1]" \\test]]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["[0]" check]]]]
[\\library
["[0]" / (.only)
@@ -48,7 +48,7 @@
["[2][0]" complex]
["[2][0]" scope]]
[///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
["[0]" archive]]]]]]]])
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux
index 423a541aa..90730f325 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux
@@ -6,7 +6,7 @@
[monad (.only do)]]
[control
["[0]" function]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
["[0]" product]
@@ -23,7 +23,7 @@
[meta
["[0]" symbol
["$[1]" \\test]]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["$[1]" \\test]
["[0]" check]]]]
[\\library
@@ -43,7 +43,7 @@
["[2][0]" inference
["$[1]" \\test]]]
[///
- ["[1][0]" phase ("[1]#[0]" monad)]
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]
[meta
["[0]" archive]]]]]]]])
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux
index a6ec3d851..9f09dba69 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux
@@ -6,14 +6,14 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]]
[data
["[0]" product]
["[0]" text]]
[math
["[0]" random]]
- ["[0]" type ("[1]#[0]" equivalence)
+ ["[0]" type (.open: "[1]#[0]" equivalence)
["$[1]" \\test]]]]
[\\library
["[0]" / (.only)
@@ -27,7 +27,7 @@
["[2][0]" type (.only)
["$[1]" \\test]]]
[///
- ["[1][0]" phase ("[1]#[0]" monad)]]]]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" monad)]]]]]]])
(def: .public test
Test
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux
index 6796d5da7..66d8d5833 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux
@@ -2,7 +2,7 @@
[library
[lux (.except)
["_" test (.only Test)]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
[monad (.only do)]]
[control
@@ -24,7 +24,7 @@
["[2][0]" type]
["[2][0]" module]]
[///
- ["[1][0]" phase ("[1]#[0]" functor)]]]]]])
+ ["[1][0]" phase (.open: "[1]#[0]" functor)]]]]]])
(def: (analysis state module type it ?)
(-> Lux Text Type (Operation Analysis) (-> Analysis Bit) Bit)
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux
index c4417535c..05ddfaaff 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux
@@ -12,12 +12,12 @@
["[0]" try]
["[0]" exception]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" dictionary]
- ["[0]" list ("[1]#[0]" mix)]]]
+ ["[0]" list (.open: "[1]#[0]" mix)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
index 7159422cc..c7d2ba84e 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux
@@ -14,7 +14,7 @@
["[0]" atom]]]
[data
["[0]" product]]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[macro
["[0]" code]]
[meta
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux
index c885819a5..351098c03 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux
@@ -6,7 +6,7 @@
["[0]" monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]]
+ ["[0]" try (.open: "[1]#[0]" functor)]]
[data
["[0]" sum]
["[0]" text (.only)
@@ -17,7 +17,7 @@
["[0]" rev]
["[0]" frac]]
[collection
- ["[0]" list ("[1]#[0]" functor mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
["[0]" set]]]
[math
["[0]" random (.only Random)]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux
index fb46bc028..8ab54be6f 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux
@@ -12,7 +12,7 @@
[number
["n" nat]]
[collection
- ["[0]" list ("[1]#[0]" functor mix monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor mix monoid)]
["[0]" dictionary (.only Dictionary)]
["[0]" set]]]
[macro
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
index 4d0ae78d3..96c5116be 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux
@@ -10,9 +10,9 @@
[number
["n" nat]]
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]
[\\
["[0]" /
[////
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux
index fca41d4c5..3e6cdda9c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux
@@ -10,7 +10,7 @@
["n" nat]]
[collection
["[0]" list]]]
- ["r" math/random (.only Random) ("[1]#[0]" monad)]
+ ["r" math/random (.only Random) (.open: "[1]#[0]" monad)]
["_" test (.only Test)]
[meta
["[0]" symbol]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux
index d2d62f1db..954818c48 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux
@@ -10,7 +10,7 @@
["[0]" pipe]
["[0]" try]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" product]
[number
["n" nat]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
index c683c8bb8..006790ba4 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux
@@ -14,7 +14,7 @@
[number
["n" nat]]
[collection
- ["[0]" list ("[1]#[0]" functor mix)]
+ ["[0]" list (.open: "[1]#[0]" functor mix)]
["[0]" dictionary (.only Dictionary)]]]
[macro
["^" pattern]]]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux b/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux
index 7719130c8..7e92f65ae 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux
@@ -5,7 +5,7 @@
["%" text/format (.only format)]
[number
["n" nat]]]
- ["r" math/random (.only Random) ("[1]#[0]" monad)]
+ ["r" math/random (.only Random) (.open: "[1]#[0]" monad)]
["_" test (.only Test)]
[control
["[0]" try]
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux
index 929b99b71..fec861dfd 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux
@@ -8,8 +8,8 @@
["$[0]" equivalence]
["$[0]" hash]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]]]
[\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux
index 20b38598b..61080fd2c 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux
@@ -8,8 +8,8 @@
["$[0]" equivalence]
["$[0]" hash]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]]]
[\\library
diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux
index c8135b2ad..cd422dccc 100644
--- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux
+++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux
@@ -8,8 +8,8 @@
["$[0]" equivalence]
["$[0]" hash]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive.lux b/stdlib/source/test/lux/tool/compiler/meta/archive.lux
index 9c013079f..359446987 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive.lux
@@ -13,7 +13,7 @@
["%" format (.only format)]]
[collection
["[0]" list]
- ["[0]" set ("[1]#[0]" equivalence)]
+ ["[0]" set (.open: "[1]#[0]" equivalence)]
["[0]" sequence]]]
[math
["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux
index 87ce44514..2f8086595 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux
@@ -6,7 +6,7 @@
[\\specification
["$[0]" equivalence]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux
index 9bf3509c5..b62b50e3c 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux
@@ -7,15 +7,15 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" binary]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[format
["[0]" binary]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux
index e67f4e18e..ce5dd5566 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux
@@ -6,7 +6,7 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[parser
["<[0]>" binary]]]
@@ -20,7 +20,7 @@
[\\library
["[0]" / (.only)
[///
- ["[1][0]" signature ("[1]#[0]" equivalence)]
+ ["[1][0]" signature (.open: "[1]#[0]" equivalence)]
["[1][0]" key]]]]
["[0]" ///
["[1][0]" signature]])
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux
index f441916d2..7305277cb 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux
@@ -5,8 +5,8 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" binary]]]
[data
@@ -15,7 +15,7 @@
[collection
["[0]" sequence (.only Sequence)]
["[0]" set (.only Set)]
- ["[0]" list ("[1]#[0]" mix functor)]]
+ ["[0]" list (.open: "[1]#[0]" mix functor)]]
[format
["[0]" binary]]]
[math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux
index b54e7cc63..23a2d62c9 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux
@@ -7,12 +7,12 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[parser
["<[0]>" binary]]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[format
["[0]F" binary]]]
[math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux
index 1aaa9bfae..3d42ef1e1 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux
@@ -5,11 +5,11 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[concurrency
["[0]" async]]]
[data
- ["[0]" binary ("[1]#[0]" equivalence)]
+ ["[0]" binary (.open: "[1]#[0]" equivalence)]
[collection
["[0]" sequence]]]
[math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux
index 4b31a3c36..de5344cf1 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux
@@ -7,9 +7,9 @@
[control
["[0]" try]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[data
- ["[0]" binary ("[1]#[0]" equivalence)
+ ["[0]" binary (.open: "[1]#[0]" equivalence)
["$[1]" \\test]]]
[math
["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux
index ea51f0f9b..8091e33c8 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux
@@ -8,7 +8,7 @@
["[0]" try]
["[0]" exception]
[concurrency
- ["[0]" async (.only Async) ("[1]#[0]" monad)]]]
+ ["[0]" async (.only Async) (.open: "[1]#[0]" monad)]]]
[math
["[0]" random]]
[world
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cli.lux b/stdlib/source/test/lux/tool/compiler/meta/cli.lux
index a50a44fc5..6df5fc3dd 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cli.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cli.lux
@@ -6,20 +6,20 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["<>" parser (.only)
["<[0]>" cli]]]
[data
["[0]" product]
["[0]" text]
[collection
- ["[0]" list ("[1]#[0]" monoid monad)]]]
+ ["[0]" list (.open: "[1]#[0]" monoid monad)]]]
[math
["[0]" random (.only Random)]
[number
["n" nat]]]
[meta
- ["[0]" configuration ("[1]#[0]" equivalence)
+ ["[0]" configuration (.open: "[1]#[0]" equivalence)
["$[1]" \\test]]]]]
[\\library
["[0]" / (.only)
diff --git a/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux b/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux
index 85ea91687..988227519 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux
@@ -7,7 +7,7 @@
[\\specification
["$[0]" equivalence]]]
[control
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["<>" parser
["<[0]>" text]]]
[math
diff --git a/stdlib/source/test/lux/tool/compiler/meta/context.lux b/stdlib/source/test/lux/tool/compiler/meta/context.lux
index 6031daabf..46d9c6343 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/context.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/context.lux
@@ -8,7 +8,7 @@
["[0]" text]
[collection
["[0]" set]
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random (.only Random)]
[number
diff --git a/stdlib/source/test/lux/tool/compiler/meta/export.lux b/stdlib/source/test/lux/tool/compiler/meta/export.lux
index ca92ca74c..eccebdfe0 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/export.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/export.lux
@@ -6,18 +6,18 @@
[monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
[concurrency
["[0]" async]]
[parser
["<[0]>" binary]]]
[data
["[0]" product]
- ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[format
["[0]" tar]]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/stdlib/source/test/lux/tool/compiler/meta/import.lux b/stdlib/source/test/lux/tool/compiler/meta/import.lux
index 7145da568..a055d3408 100644
--- a/stdlib/source/test/lux/tool/compiler/meta/import.lux
+++ b/stdlib/source/test/lux/tool/compiler/meta/import.lux
@@ -5,8 +5,8 @@
[abstract
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" functor)]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception]
[concurrency
["[0]" async]]
@@ -14,12 +14,12 @@
["<[0]>" binary]]]
[data
["[0]" product]
- ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" format
["[0]" tar (.only Tar)]
["[1]" binary]]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]
[encoding
["[0]" utf8]]]
diff --git a/stdlib/source/test/lux/tool/compiler/phase.lux b/stdlib/source/test/lux/tool/compiler/phase.lux
index b6d7ac312..6fa17a691 100644
--- a/stdlib/source/test/lux/tool/compiler/phase.lux
+++ b/stdlib/source/test/lux/tool/compiler/phase.lux
@@ -9,10 +9,10 @@
["$[0]" monad]]]
[control
["[0]" pipe]
- ["[0]" try ("[1]#[0]" functor)]
+ ["[0]" try (.open: "[1]#[0]" functor)]
["[0]" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random]
diff --git a/stdlib/source/test/lux/tool/compiler/reference.lux b/stdlib/source/test/lux/tool/compiler/reference.lux
index d6ef6ace8..37e61b319 100644
--- a/stdlib/source/test/lux/tool/compiler/reference.lux
+++ b/stdlib/source/test/lux/tool/compiler/reference.lux
@@ -8,14 +8,14 @@
["$[0]" equivalence]
["$[0]" hash]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format]]]
[math
["[0]" random (.only Random)]
[number
["n" nat]]]
[meta
- ["[0]" symbol ("[1]#[0]" equivalence)]]]]
+ ["[0]" symbol (.open: "[1]#[0]" equivalence)]]]]
[\\library
["[0]" / (.only)
["[0]" variable (.only Register)]]]
diff --git a/stdlib/source/test/lux/tool/compiler/reference/variable.lux b/stdlib/source/test/lux/tool/compiler/reference/variable.lux
index 082350228..cfbd5eeaa 100644
--- a/stdlib/source/test/lux/tool/compiler/reference/variable.lux
+++ b/stdlib/source/test/lux/tool/compiler/reference/variable.lux
@@ -8,7 +8,7 @@
["$[0]" equivalence]
["$[0]" hash]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
[math
["[0]" random (.only Random)]]]]
[\\library
diff --git a/stdlib/source/test/lux/tool/compiler/version.lux b/stdlib/source/test/lux/tool/compiler/version.lux
index 96cd64fa0..cd3bf39ee 100644
--- a/stdlib/source/test/lux/tool/compiler/version.lux
+++ b/stdlib/source/test/lux/tool/compiler/version.lux
@@ -5,8 +5,8 @@
[abstract
[monad (.only do)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/type.lux b/stdlib/source/test/lux/type.lux
index 0c6d1e6fa..e93535317 100644
--- a/stdlib/source/test/lux/type.lux
+++ b/stdlib/source/test/lux/type.lux
@@ -10,20 +10,20 @@
["[0]" pipe]
["[0]" maybe]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]
["[0]" array]]]
[macro
["^" pattern]
- ["[0]" code ("[1]#[0]" equivalence)]]
+ ["[0]" code (.open: "[1]#[0]" equivalence)]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\library
- ["[0]" / ("[1]#[0]" equivalence)]]
+ ["[0]" / (.open: "[1]#[0]" equivalence)]]
["[0]" /
["[1][0]" primitive]
["[1][0]" check]
diff --git a/stdlib/source/test/lux/type/check.lux b/stdlib/source/test/lux/type/check.lux
index 27c63dc0b..d8e92bebc 100644
--- a/stdlib/source/test/lux/type/check.lux
+++ b/stdlib/source/test/lux/type/check.lux
@@ -2,7 +2,7 @@
[library
[lux (.except type symbol)
["_" test (.only Test)]
- ["[0]" type ("[1]#[0]" equivalence)]
+ ["[0]" type (.open: "[1]#[0]" equivalence)]
[abstract
["[0]" monad (.only do)]
[\\specification
@@ -15,17 +15,17 @@
["[0]" try]
["[0]" exception (.only exception:)]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
["[0]" product]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
- ["[0]" list ("[1]#[0]" functor monoid)]
+ ["[0]" list (.open: "[1]#[0]" functor monoid)]
["[0]" set]]]
[macro
["^" pattern]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
["n" nat]]]]]
[\\library
diff --git a/stdlib/source/test/lux/type/dynamic.lux b/stdlib/source/test/lux/type/dynamic.lux
index 3b9179d37..cb5931ff7 100644
--- a/stdlib/source/test/lux/type/dynamic.lux
+++ b/stdlib/source/test/lux/type/dynamic.lux
@@ -8,7 +8,7 @@
["[0]" try]
["[0]" exception]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random (.only Random)]
diff --git a/stdlib/source/test/lux/type/implicit.lux b/stdlib/source/test/lux/type/implicit.lux
index 4eb575a18..7a345cd53 100644
--- a/stdlib/source/test/lux/type/implicit.lux
+++ b/stdlib/source/test/lux/type/implicit.lux
@@ -9,7 +9,7 @@
[monad (.only do)]
["[0]" enum]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[math
diff --git a/stdlib/source/test/lux/type/primitive.lux b/stdlib/source/test/lux/type/primitive.lux
index bb6defdda..15b084af1 100644
--- a/stdlib/source/test/lux/type/primitive.lux
+++ b/stdlib/source/test/lux/type/primitive.lux
@@ -11,7 +11,7 @@
[parser
["<[0]>" code]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]]
["[0]" macro (.only)
[syntax (.only syntax:)]
["[0]" code]
diff --git a/stdlib/source/test/lux/type/quotient.lux b/stdlib/source/test/lux/type/quotient.lux
index a0f2fa444..c8652e8c7 100644
--- a/stdlib/source/test/lux/type/quotient.lux
+++ b/stdlib/source/test/lux/type/quotient.lux
@@ -7,12 +7,12 @@
[\\specification
["$[0]" equivalence]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random (.only Random)]
[number
- ["n" nat ("[1]#[0]" equivalence)]]]]]
+ ["n" nat (.open: "[1]#[0]" equivalence)]]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/type/refinement.lux b/stdlib/source/test/lux/type/refinement.lux
index fbf318736..514d59e79 100644
--- a/stdlib/source/test/lux/type/refinement.lux
+++ b/stdlib/source/test/lux/type/refinement.lux
@@ -6,10 +6,10 @@
[predicate (.only Predicate)]
[monad (.only do)]]
[control
- ["[0]" maybe ("[1]#[0]" monad)]]
+ ["[0]" maybe (.open: "[1]#[0]" monad)]]
[data
[collection
- ["[0]" list ("[1]#[0]" functor)]]]
+ ["[0]" list (.open: "[1]#[0]" functor)]]]
[math
["[0]" random]
[number
diff --git a/stdlib/source/test/lux/type/resource.lux b/stdlib/source/test/lux/type/resource.lux
index f49981fdd..a33c4817d 100644
--- a/stdlib/source/test/lux/type/resource.lux
+++ b/stdlib/source/test/lux/type/resource.lux
@@ -16,7 +16,7 @@
["<[0]>" code]]]
[data
["[0]" identity (.only Identity)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
["[0]" macro (.only)
[syntax (.only syntax:)]
diff --git a/stdlib/source/test/lux/type/unit.lux b/stdlib/source/test/lux/type/unit.lux
index 19b2bc9c2..7ea97fc3f 100644
--- a/stdlib/source/test/lux/type/unit.lux
+++ b/stdlib/source/test/lux/type/unit.lux
@@ -18,7 +18,7 @@
["[0]" random (.only Random)]
[number
["i" int]
- ["[0]" ratio ("[1]#[0]" equivalence)]]]]]
+ ["[0]" ratio (.open: "[1]#[0]" equivalence)]]]]]
[\\library
["[0]" /]])
diff --git a/stdlib/source/test/lux/world/console.lux b/stdlib/source/test/lux/world/console.lux
index 9cfe5dbc5..cb0978bda 100644
--- a/stdlib/source/test/lux/world/console.lux
+++ b/stdlib/source/test/lux/world/console.lux
@@ -9,7 +9,7 @@
["[0]" try (.only Try)]
["[0]" exception (.only exception:)]]
[data
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]]
[math
["[0]" random]]]]
diff --git a/stdlib/source/test/lux/world/file.lux b/stdlib/source/test/lux/world/file.lux
index 53c2c7ce9..2e06d0af5 100644
--- a/stdlib/source/test/lux/world/file.lux
+++ b/stdlib/source/test/lux/world/file.lux
@@ -12,8 +12,8 @@
["[0]" async (.only Async)]
["[0]" atom (.only Atom)]]]
[data
- ["[0]" binary (.only Binary) ("[1]#[0]" monoid)]
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" binary (.only Binary) (.open: "[1]#[0]" monoid)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" dictionary (.only Dictionary)]
["[0]" list]]]
diff --git a/stdlib/source/test/lux/world/file/watch.lux b/stdlib/source/test/lux/world/file/watch.lux
index af69350e0..9ab9e68ec 100644
--- a/stdlib/source/test/lux/world/file/watch.lux
+++ b/stdlib/source/test/lux/world/file/watch.lux
@@ -11,13 +11,13 @@
[concurrency
["[0]" async (.only Async)]]]
[data
- ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)]
- ["[0]" text ("[1]#[0]" equivalence)
+ ["[0]" binary (.only Binary) (.open: "[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)
["%" format (.only format)]]
[collection
["[0]" list]]]
[math
- ["[0]" random (.only Random) ("[1]#[0]" monad)]]]]
+ ["[0]" random (.only Random) (.open: "[1]#[0]" monad)]]]]
[\\library
["[0]" / (.only)
["/[1]" //]]]
diff --git a/stdlib/source/test/lux/world/input/keyboard.lux b/stdlib/source/test/lux/world/input/keyboard.lux
index f13e615a0..3ffd0edf6 100644
--- a/stdlib/source/test/lux/world/input/keyboard.lux
+++ b/stdlib/source/test/lux/world/input/keyboard.lux
@@ -7,7 +7,7 @@
[control
["[0]" maybe]]
[data
- ["[0]" bit ("[1]#[0]" equivalence)]
+ ["[0]" bit (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]
["[0]" set (.only Set)]]]
diff --git a/stdlib/source/test/lux/world/net/http/client.lux b/stdlib/source/test/lux/world/net/http/client.lux
index 21cbaa354..cf5005977 100644
--- a/stdlib/source/test/lux/world/net/http/client.lux
+++ b/stdlib/source/test/lux/world/net/http/client.lux
@@ -10,7 +10,7 @@
["[0]" try (.only Try)]
["[0]" function]
[concurrency
- ["[0]" async ("[1]#[0]" functor)]]]
+ ["[0]" async (.open: "[1]#[0]" functor)]]]
[data
["[0]" binary]
["[0]" product]
diff --git a/stdlib/source/test/lux/world/program.lux b/stdlib/source/test/lux/world/program.lux
index 3d7119229..390a77515 100644
--- a/stdlib/source/test/lux/world/program.lux
+++ b/stdlib/source/test/lux/world/program.lux
@@ -7,13 +7,13 @@
[control
["[0]" pipe]
["[0]" io]
- ["[0]" maybe ("[1]#[0]" functor)]
+ ["[0]" maybe (.open: "[1]#[0]" functor)]
["[0]" try]
["[0]" exception]
[parser
[environment (.only Environment)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" dictionary]
["[0]" list]]]
diff --git a/stdlib/source/test/lux/world/shell.lux b/stdlib/source/test/lux/world/shell.lux
index c9960e037..c30aef45d 100644
--- a/stdlib/source/test/lux/world/shell.lux
+++ b/stdlib/source/test/lux/world/shell.lux
@@ -13,7 +13,7 @@
[parser
["[0]" environment (.only Environment)]]]
[data
- ["[0]" text ("[1]#[0]" equivalence)]
+ ["[0]" text (.open: "[1]#[0]" equivalence)]
[collection
["[0]" list]]]
[math