The European Union heaped more pressure on Switzerland to clinch a new bilateral treaty cementing ties, threatening to cut off cross-border stock trading by year’s end if no deal emerges.