(bind-func sys_file_link (lambda (from_path to_path) (apr_file_link (cstring from_path) (cstring to_path))))