ref: 71af8b2acb1e7eefa2101f0074e4fe0a631a6220 dir: /lib/std/slpop.myr/
use "types" use "alloc" pkg std = generic slpop : (sl : @a[:]# -> @a) ;; generic slpop = {sl var elt elt = sl#[sl#.len - 1] slgrow(sl, sl#.len - 1) -> elt }