+ always use a mul helper on the Z80

git-svn-id: branches/z80@44989 -

compiler/z80/nz80add.pas

@@ -37,6 +37,7 @@ interface
          function NoEqual(anodetype:tnodetype):tnodetype;
          function GetResFlags(unsigned:Boolean;anodetype:tnodetype):TResFlags;
        protected
+         function use_mul_helper: boolean;override;
          function pass_1 : tnode;override;
          procedure second_cmpordinal;override;
          procedure second_cmpsmallset;override;
@@ -147,6 +148,12 @@ interface
       end;
 
 
+    function TZ80AddNode.use_mul_helper: boolean;
+      begin
+        result:=(nodetype=muln);
+      end;
+
+
     procedure TZ80AddNode.second_cmpsmallset;
 
       procedure gencmp(tmpreg1,tmpreg2 : tregister);