Fixed typo for the Fortran generation.

Author: isazi

kernel_tuner/utils/directives.py

@@ -571,7 +571,7 @@ def generate_directive_function(
         if data is not None:
             body = wrap_data(body + "\n", langs, data, preprocessor, user_dimensions)
         name = signature.split(" ")[1].split("(")[0]
-        code = code.replace("<!?NAME!?>", name)
+        code = code.replace("<!?NAME?!>", name)
     code = code.replace("<!?PREPROCESSOR?!>", "\n".join(preprocessor))
     # if present, add user specific dimensions as defines
     if user_dimensions is not None: