|
|
(l: loop): LIST[0:?] OF edge;
LOCAL
edges : LIST[0:?] OF edge := [];
END_LOCAL;
IF 'STRUCTURAL_FRAME_SCHEMA.EDGE_LOOP' IN TYPEOF(l) THEN
REPEAT i := 1 TO SIZEOF(l\path.edge_list);
edges := edges + (l\path.edge_list[i].edge_element);
END_REPEAT;
END_IF;
RETURN(edges);
|
|
|