+ -- ergebnis string richtig formatieren
+ hstrtmp := expectedresult;
+ expectedresult := (HSPALTE_MAX+1 => nul, others => ' ');
+ for x in 1 to HSPALTE_MAX loop
+ if hstrtmp(x) /= nul then
+ expectedresult((HSPALTE_MAX-y) + x) := hstrtmp(x);
+ end if;
+ end loop;
+
+