From 431f8bcd3db4fdc3ce30555403cca1900352d0a1 Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Sat, 13 Dec 2014 23:26:15 -0800
Subject: 415

---
 mu.arc   | 2 +-
 mu.arc.t | 2 ++
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/mu.arc b/mu.arc
index 455a3cf1..1eeeeeff 100644
--- a/mu.arc
+++ b/mu.arc
@@ -1372,7 +1372,7 @@
     (= function*.name (convert-names:convert-labels:convert-braces:tokenize-args:insert-code body name))))
 
 (def tokenize-arg (arg)
-  (if (is arg '<-)
+  (if (in arg '<- '_)
     arg
     (map [map [fromstring _ (read)] _]
          (map [tokens _ #\:]
diff --git a/mu.arc.t b/mu.arc.t
index da30bd21..a9b67597 100644
--- a/mu.arc.t
+++ b/mu.arc.t
@@ -3311,6 +3311,8 @@
             (tokenize-arg 'a:b/1:d))
 (assert:iso '<-
             (tokenize-arg '<-))
+(assert:iso '_
+            (tokenize-arg '_))
 
 ; support labels
 (assert:iso '((((default-scope scope-address)) <- ((new)) ((scope literal)) ((30 literal)))
-- 
cgit 1.4.1-2-gfad0