diff options
author | Eduardo Julian | 2017-10-26 14:48:05 -0400 |
---|---|---|
committer | Eduardo Julian | 2017-10-26 14:48:05 -0400 |
commit | 1fabe19f7eacb668ef26cccde681dce5e2f98072 (patch) | |
tree | ad2ead4ae5d7f997353e7b8223aa29725df40111 /stdlib | |
parent | 40e9eae7468af9b03f6c684171d83a521dd90e82 (diff) |
- WIP: Wiring everything to get the compiler to work fully.
- Fixed a bug when combining field/method/class modifiers.
Diffstat (limited to 'stdlib')
-rw-r--r-- | stdlib/source/lux.lux | 4 | ||||
-rw-r--r-- | stdlib/source/lux/meta.lux | 7 |
2 files changed, 6 insertions, 5 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index e61666570..384fb67b6 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -568,10 +568,10 @@ default-def-meta-exported))))) ## (type: Source -## [Cursor Text]) +## [Cursor Nat Text]) ("lux def" Source (#Named ["lux" "Source"] - (#Product Cursor Text)) + (#Product Cursor (#Product Nat Text))) (record$ default-def-meta-exported)) ## (type: Module-State diff --git a/stdlib/source/lux/meta.lux b/stdlib/source/lux/meta.lux index 0d5ac7c0f..6f1fb2720 100644 --- a/stdlib/source/lux/meta.lux +++ b/stdlib/source/lux/meta.lux @@ -226,7 +226,7 @@ (do-template [<name> <tag> <desc>] [(def: #export (<name> anns) - {#;doc (code;text ($_ text/compose "Looks up the arguments of a " <desc> "."))} + {#;doc <desc>} (-> Code (List Text)) (maybe;default (list) (do maybe;Monad<Maybe> @@ -234,8 +234,9 @@ args (parse-tuple _args)] (M;map @ parse-text args))))] - [func-args #;func-args "function"] - [type-args #;type-args "parameterized type"] + [func-args #;func-args "Looks up the arguments of a function."] + [type-args #;type-args "Looks up the arguments of a parameterized type."] + [declared-tags #;tags "Looks up the tags of a tagged (variant or record) type."] ) (def: (find-macro' modules this-module module name) |