Index: ncginl.pas
===================================================================
--- ncginl.pas	(revision 9325)
+++ ncginl.pas	(working copy)
@@ -435,6 +435,8 @@
               { when constant, just multiply the addvalue }
               if is_constintnode(tcallparanode(tcallparanode(left).right).left) then
                  addvalue:=addvalue*get_ordinal_value(tcallparanode(tcallparanode(left).right).left)
+              else if (tcallparanode(tcallparanode(left).right).left.nodetype = pointerconstn) then
+                 addvalue := addvalue*tpointerconstnode(tcallparanode(tcallparanode(left).right).left).value
               else
                 begin
                   location_force_reg(current_asmdata.CurrAsmList,tcallparanode(tcallparanode(left).right).left.location,cgsize,addvalue<=1);
