parent $libraries
object $buffer

var $root child_index 0
var $root fertile 0
var $root manager $buffer
var $root owners [$buffer, $core]
var $root writable [$buffer, $core]
var $root readable ['parameters, 'methods, 'code]
var $root trusted []
var $root owned [$buffer]
var $root inited 1
var $root dbref 'buffer

method to_list
    arg buf;
    var idx, list;
    
    list = [];
    for idx in [1 .. buffer_len(buf)]
        list = list + [buffer_retrieve(buf, idx)];
    return list;
.

method from_list
    arg list;
    var buf, x;
    
    buf = `[];
    for x in [1 .. listlen(list)]
        buf = buffer_add(buf, list[x]);
    return buf;
.