[CM] libs7: inconsist naming of s7 optimizing registration

[jingkaimori]

Hi all,
    I found such definitions in s7 (about line 830):

typedef s7_int (*s7_i_7p_t)(s7_scheme *sc, s7_pointer p);
typedef s7_pointer (*s7_p_d_t)(s7_scheme *sc, s7_double x);

    Both function definitions has s7_scheme in argument list, but why
name of the first definition contains "7", the second not?