move-string bug?

hi Frank is this a miss-use of move, a bug, or something that has already been fixed? gpc version 19990118, based on gcc-2.8.1 program as follows: program astrings; { show string bug } var srcstr : string(255); temp : string(120); begin srcstr := 'abcdefghi'; writeln( srcstr.capacity, ' ', length(srcstr), ' ', srcstr); writeln( temp.capacity ); move( srcstr, temp, length(srcstr)); writeln( temp.capacity, ' ', length(temp), ' ', temp); move( srcstr, temp, length(srcstr)+8); writeln( temp.capacity, ' ', length(temp), ' ', temp); end. Output is as follows: 255 9 abcdefghi 120 255 9 a 255 9 abcdefghi thanks, russ