diff --git a/compiler/aasmtai.pas b/compiler/aasmtai.pas index 4347f0fd2b..841ce2555f 100644 --- a/compiler/aasmtai.pas +++ b/compiler/aasmtai.pas @@ -2187,7 +2187,10 @@ implementation typ:=ait_stab; stabtype:=_stabtype; getmem(str,length(s)+1); - move(s[1],str^,length(s)+1); + if length(s)>0 then + move(s[1],str^,length(s)+1) + else + str^:=#0; end; destructor tai_stab.destroy;