labelled types efficiency

Another question about labelled types, this time concerning about efficiency: is there any efficiency differences between functions f and g below?

data RType = R Int Char data Stype = S {x :: Int, y :: Char}

f :: RType -> Int f (R x _) = x

g :: SType -> Int g s = x s

Thanks again, -- Andre