RosettaCodeData/Task/Copy-a-string/Component-Pascal/copy-a-string-2.component
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

4 lines
199 B
Text

str1 := "abcdefghijklmnopqrstuvwxyz";
str3 := str1; (* don't compile, incompatible assignement *)
str3 := str1$; (* runtime error, string too long *)
str2 := str1$; (* OK *)