Przeglądaj źródła

Added generation of .def aliases. Fixes #352.

woollybah 7 lat temu
rodzic
commit
667071c165
1 zmienionych plików z 11 dodań i 1 usunięć
  1. 11 1
      ctranslator.bmx

+ 11 - 1
ctranslator.bmx

@@ -6199,9 +6199,19 @@ End If
 		Emit "EXPORTS"
 		
 		For Local decl:TFuncDecl=EachIn app.exportDefs
-			Emit "~t" + TransExportDef(decl, opt_arch = "x86")
+			Emit "~t" + TransExportDef(decl, False)
 		Next
 
+		If opt_arch = "x86" Then
+			Emit "~n"
+			
+			For Local decl:TFuncDecl=EachIn app.exportDefs
+				If decl.attrs & DECL_API_STDCALL Then
+					Emit "~t" + TransExportDef(decl, True) + " = " + TransExportDef(decl, False)
+				End If
+			Next
+		End If
+		
 		Emit "~n"
 	End Method