Преглед на файлове

+ OpenBSD i386 and x86_64 support in tcgx86.g_profilecode

git-svn-id: trunk@41760 -
nickysn преди 6 години
родител
ревизия
8f8aa70074
променени са 1 файла, в които са добавени 5 реда и са изтрити 2 реда
  1. 5 2
      compiler/x86/cgx86.pas

+ 5 - 2
compiler/x86/cgx86.pas

@@ -3229,13 +3229,11 @@ unit cgx86;
         {$endif}
         {$endif}
            system_i386_freebsd,
            system_i386_freebsd,
            system_i386_netbsd,
            system_i386_netbsd,
-//         system_i386_openbsd,
            system_i386_wdosx :
            system_i386_wdosx :
              begin
              begin
                 Case target_info.system Of
                 Case target_info.system Of
                  system_i386_freebsd : mcountprefix:='.';
                  system_i386_freebsd : mcountprefix:='.';
                  system_i386_netbsd : mcountprefix:='__';
                  system_i386_netbsd : mcountprefix:='__';
-//               system_i386_openbsd : mcountprefix:='.';
                 else
                 else
                  mcountPrefix:='';
                  mcountPrefix:='';
                 end;
                 end;
@@ -3263,6 +3261,11 @@ unit cgx86;
              begin
              begin
                a_call_name(list,'mcount',false);
                a_call_name(list,'mcount',false);
              end;
              end;
+           system_i386_openbsd,
+           system_x86_64_openbsd:
+             begin
+               a_call_name(list,'__mcount',false);
+             end;
         end;
         end;
       end;
       end;