create$buf$pool: PROCEDURE(max_bufs, init_num_bufs, attrs, status_ptr) TOKEN EXTERNAL; DECLARE /* Parameters */ max_bufs WORD, /* maximum number of buffers in buffer pool */ init_num_bufs WORD, /* initial number of buffers in pool */ attrs WORD, /* buffer pool creation attributes */ status_ptr POINTER; /* exception pointer */ END create$buf$pool; get$dport: PROCEDURE(port_id,buf_pool_ptr,b_attrs,status_ptr) TOKEN EXTERNAL; DECLARE /* Parameters */ port_id WORD, buf_pool_ptr POINTER, b_attrs WORD, status_ptr POINTER; END get$dport;