司馬程（？—？），西晉初期醫(yī)學(xué)家，為西晉武帝司馬炎的太醫(yī)，有一次向武帝獻(xiàn)上了雉頭裘，當(dāng)時(shí)禮法禁止奇裝異服，武帝在大殿前將其焚燒。

《晉書(shū)·武帝紀(jì)》：太醫(yī)司馬程據(jù)獻(xiàn)雉頭裘，帝以奇技異服典禮所禁，焚之于殿前。