[Turn off line numbering]
1: arg anc, method;
2: var code, lines, dis_flag, meth_args, flags, first_comment;
3:
4: code = anc.list_method(method);
5: lines = code.length();
6: if (lines > 5)
7: code = code.subrange(1, 5);
8: flags = anc.method_flags(method);
9: if (code) {
10: meth_args = regexp(code[1], "arg ([^;]);");
11: if (meth_args) {
12: meth_args = meth_args[1];
13: code = code.delete(1);
14: } else {
15: meth_args = "";
16: }
17: if (code && (!code[1] || code[1][1] == "v"))
18: code = code.delete(1);
19: if (code && (!code[1] || code[1][1] == "v"))
20: code = code.delete(1);
21: first_comment = code ? code[1] + " " : " ";
22: first_comment = first_comment[1] == "/" || first_comment[1] == "r" ? first_comment : "";
23: } else {
24: meth_args = "";
25: first_comment = "";
26: }
27: return [anc, method, meth_args, flags, lines, first_comment];
["// Created as a part of ColdCore, see: @help Credit"]