diff --git a/control/morse_f77.h b/control/morse_f77.h
index 02cc905882222c96b95f001643d3b0605d5197f1..ed898be11aa9ba076492395540438b476703423d 100644
--- a/control/morse_f77.h
+++ b/control/morse_f77.h
@@ -35,20 +35,20 @@
 #define MORSE_WS_FNAME(lcname, UCNAME) MORSE_GLOBAL(morse_alloc_workspace_##lcname, MORSE_ALLOC_WORKSPACE_##UCNAME)
 #define MORSE_WST_FNAME(lcname, UCNAME) MORSE_GLOBAL(morse_alloc_workspace_##lcname##_tile, MORSE_ALLOC_WORKSPACE_##UCNAME##_TILE)
 
-#define MORSE_INIT MORSE_GLOBAL_(morse_init, MORSE_INIT)
-#define MORSE_FINALIZE MORSE_GLOBAL_(morse_finalize, MORSE_FINALIZE)
-#define MORSE_ENABLE MORSE_GLOBAL_(morse_enable, MORSE_ENABLE)
-#define MORSE_DISABLE MORSE_GLOBAL_(morse_disable, MORSE_DISABLE)
-#define MORSE_SET MORSE_GLOBAL_(morse_set, MORSE_SET)
-#define MORSE_GET MORSE_GLOBAL_(morse_get, MORSE_GET)
-#define MORSE_DEALLOC_HANDLE MORSE_GLOBAL_(morse_dealloc_handle, MORSE_DEALLOC_HANDLE)
-#define MORSE_VERSION MORSE_GLOBAL_(morse_version, MORSE_VERSION)
-#define MORSE_DESC_CREATE MORSE_GLOBAL_(morse_desc_create, MORSE_DESC_CREATE)
-#define MORSE_DESC_CREATE_OOC MORSE_GLOBAL_(morse_desc_create_ooc, MORSE_DESC_CREATE_OOC)
-#define MORSE_DESC_CREATE_USER MORSE_GLOBAL_(morse_desc_create_user, MORSE_DESC_CREATE_USER)
-#define MORSE_DESC_CREATE_OOC_USER MORSE_GLOBAL_(morse_desc_create_ooc_user, MORSE_DESC_CREATE_OOC_USER)
-#define MORSE_DESC_DESTROY MORSE_GLOBAL_(morse_desc_destroy, MORSE_DESC_DESTROY)
-#define MORSE_LAPACK_TO_TILE MORSE_GLOBAL_(morse_lapack_to_tile, MORSE_LAPACK_TO_TILE)
-#define MORSE_TILE_TO_LAPACK MORSE_GLOBAL_(morse_tile_to_lapack, MORSE_TILE_TO_LAPACK)
+#define MORSE_INIT MORSE_GLOBAL(morse_init, MORSE_INIT)
+#define MORSE_FINALIZE MORSE_GLOBAL(morse_finalize, MORSE_FINALIZE)
+#define MORSE_ENABLE MORSE_GLOBAL(morse_enable, MORSE_ENABLE)
+#define MORSE_DISABLE MORSE_GLOBAL(morse_disable, MORSE_DISABLE)
+#define MORSE_SET MORSE_GLOBAL(morse_set, MORSE_SET)
+#define MORSE_GET MORSE_GLOBAL(morse_get, MORSE_GET)
+#define MORSE_DEALLOC_HANDLE MORSE_GLOBAL(morse_dealloc_handle, MORSE_DEALLOC_HANDLE)
+#define MORSE_VERSION MORSE_GLOBAL(morse_version, MORSE_VERSION)
+#define MORSE_DESC_CREATE MORSE_GLOBAL(morse_desc_create, MORSE_DESC_CREATE)
+#define MORSE_DESC_CREATE_OOC MORSE_GLOBAL(morse_desc_create_ooc, MORSE_DESC_CREATE_OOC)
+#define MORSE_DESC_CREATE_USER MORSE_GLOBAL(morse_desc_create_user, MORSE_DESC_CREATE_USER)
+#define MORSE_DESC_CREATE_OOC_USER MORSE_GLOBAL(morse_desc_create_ooc_user, MORSE_DESC_CREATE_OOC_USER)
+#define MORSE_DESC_DESTROY MORSE_GLOBAL(morse_desc_destroy, MORSE_DESC_DESTROY)
+#define MORSE_LAPACK_TO_TILE MORSE_GLOBAL(morse_lapack_to_tile, MORSE_LAPACK_TO_TILE)
+#define MORSE_TILE_TO_LAPACK MORSE_GLOBAL(morse_tile_to_lapack, MORSE_TILE_TO_LAPACK)
 
 #endif