
project Test is

   Tool := external ("GPR_TOOL", "");

   case Tool is
      when "gnatdoc" =>
         for Object_Dir use ".docs";

      when others =>
         for Object_Dir use ".objs";
   end case;

end Test;
