%
% stack: js-body
%
"/*globals" within?
{
%
% stack: body-text
%
 "/*globals" slice
 "*/" Str.Right
 sel@
 dup "Body" \!
}
{
%
% stack: body-text
%
 empty exch
} ifelse
%
% stack: before-globals after-globals
%

%
% stack: before-globals after-globals
%
_globsum -1 left

^"/*globals
"

&"
*/
"

%
% stack: before-globals after-globals globals
%
^ &