<% USING: namespaces io kernel words generic sequences prettyprint furnace parser ; %> <% "model" get [ %> <% dup tuple-slots over class dup word-vocabulary use+ "slot-names" word-prop %> <% [ %><% ] 2each %>
<% write %>:<% write %>
<% dup crud-index swap class dup "crud-index" word-prop swap unparse %>

Edit | Delete | New | List

<% ] [ %>

No such tuple

<% ] if* %>