%
% stack: initial-inc
%
empty !jsxincs

emptyx

{
 trim
 isnull ?

%
% stack: inc-name
%
 _jsxincs second <?>
 {
%
% new entry in the incs table
%

  !jsxincs

  "/" "\" replall
  jsx_desk
  "//*" left$

  "//+"
%
% subject token
%
% skip limit start
%
  1 -1 1 split
  pop
  
 }
 {
%
% the include exists in the incs table
%
  pop
 } ifelse

} loop
pop