Function s7_close_input_port 

pub unsafe extern "C" fn s7_close_input_port(
    sc: *mut s7_scheme,
    p: s7_pointer,
)