BEGIN
! CHECKS THAT ASSIGNMENT OF STRINGS OF FIXED LENGTH WITH 
! L>128 DO NOT LOES CHARARCTERS
STRING(255)ARRAY L(0:1)
      L(1)="
0123456789012345678901234567890123456789012345678901234567890
0123456789012345678901234567890123456789012345678901234567890
0123456789012345678901234567890123456789012345678901234567890
TEST OK"
PRINTSTRING("L1=".L(1)."
")
ENDOFPROGRAM