Allow (re)setting all table values at once

[EwoutH]

It would be very useful to be able to set the values for all keys in a table at once, for example to reset counters.

Considering the following table:

let fruit table:make
table:put fruit "apple" 2
table:put fruit "orange" 5
table:put fruit "banana" 3

Something like table:set-all fruit 0 should set all the values to 0.

[LaCuneta]

I don't think this is a bad idea, but I wanted to add the "workaround" here you can already pretty easily do with NetLogo if you find yourself needing this a lot:

extensions [ table ]

to test
  let t table:make
  table:put t "apples" 1
  table:put t "oranges" 7
  table:put t "grapes" 22
  show t
  table-set-all t 0
  show t
end

to table-set-all [t value]
  foreach (table:keys t) [ k -> table:put t k value ] 
end

[EwoutH]

Thanks! This was exactly the command we currently use, so it's quite easy indeed.

However I think it has a broad enough use case that it would be useful to have a built-in function.