assocs: M\ enum >alist can be no-op because it's a sequence.

char-rename
John Benediktsson 2016-12-29 11:58:55 -08:00
parent a153d9f6ad
commit 000aa1f5a6
1 changed files with 1 additions and 2 deletions

View File

@ -293,8 +293,7 @@ M: enum set-at seq>> set-nth ; inline
M: enum delete-at seq>> remove-nth! drop ; inline
M: enum >alist ( enum -- alist )
seq>> [ length iota ] keep zip ; inline
M: enum >alist ( enum -- alist ) ; inline
M: enum keys seq>> length iota >array ; inline