mdsetitem
;;; -*- logo -*-
to mdsetitem :index :array :val
setitem last :index (mditem bl :index :array) :val
end
bury "mdsetitem
;;; -*- logo -*-
to mdsetitem :index :array :val
setitem last :index (mditem bl :index :array) :val
end
bury "mdsetitem