external set_color : t -> Vec4.t -> unit = "fog_set_color"