Ratios of prompt D-meson production cross sections as a function of $\pt$ in pp collisions at $\sqrt s=7 \tev$ ($|y_{\rm cms}|< 0.5$) and p--Pb collisions at $\sqrtsNN=5.02 \tev$ ($-0.96< y_{\rm cms}< 0.04$).