Index: trunk/util/genref.sh =================================================================== --- trunk/util/genref.sh (revision 783) +++ trunk/util/genref.sh (revision 784) @@ -113,10 +113,11 @@ # source=load("'$fn'") + enums = gtx_find_results(TREE, "enums") + if (TREE[enums, C99F_CHILDREN] > 0) { print "

Enums

" print "
" print "

Enum values should be passed on as strings." - enums = gtx_find_results(TREE, "enums") for(r = 0; 1; r++) { if (gtx_get_map(TREE, MAP, enums, r) == "") break @@ -140,12 +141,13 @@ print "" } print "

" + } - + events = gtx_find_results(TREE, "events") + if (TREE[events, C99F_CHILDREN] > 0) { print "

Events

" print "
" print "

Events do not have return value. The first argument is always the even id" - events = gtx_find_results(TREE, "events") for(r = 0; 1; r++) { if (gtx_get_map(TREE, MAP, events, r) == "") break @@ -164,11 +166,13 @@ print "" } print "

" + } + funcs = gtx_find_results(TREE, "funcs") + if (TREE[funcs, C99F_CHILDREN] > 0) { print "

Functions

" print "
" print "

The following functions are registered in script context." - funcs = gtx_find_results(TREE, "funcs") for(r = 0; 1; r++) { if (gtx_get_map(TREE, MAP, funcs, r) == "") break @@ -193,11 +197,11 @@ if (TREE[luid, C99F_TWIN_PARENT] == "") luid = TREE[luid, C99F_CHILD, 0] -print "Luid=", luid "::" TREE[luid, C99F_TWIN_PARENT] > "/dev/stderr" print get_pre_comment(TREE, MAP["a"], luid) print "" } print "

" + } } '