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

+ also support the 8-bit mul helpers in the generic code of nadd

git-svn-id: branches/z80@44990 -
nickysn преди 5 години
родител
ревизия
c0ea4d826c
променени са 1 файла, в които са добавени 4 реда и са изтрити 0 реда
  1. 4 0
      compiler/nadd.pas

+ 4 - 0
compiler/nadd.pas

@@ -4003,6 +4003,10 @@ implementation
                      result := nil;
 
                      case torddef(resultdef).ordtype of
+                       s8bit:
+                         procname := 'fpc_mul_shortint';
+                       u8bit:
+                         procname := 'fpc_mul_byte';
                        s16bit:
                          procname := 'fpc_mul_integer';
                        u16bit: