浏览代码

+ 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: