changeset 13880 | 5f819b90d479 |
parent 13878 | 0ce8aad17c24 |
child 13967 | a04c86dc685f |
13879:6b2c87490f0a | 13880:5f819b90d479 |
---|---|
195 if (p = 0) then |
195 if (p = 0) then |
196 break |
196 break |
197 else |
197 else |
198 begin |
198 begin |
199 delete(tempstr, p, 2); |
199 delete(tempstr, p, 2); |
200 //FIXME rtl/system needs an ansi insert |
|
201 {$IFNDEF PAS2C} |
|
202 insert(curArg, tempstr, p); |
200 insert(curArg, tempstr, p); |
203 {$ENDIF} |
|
204 end; |
201 end; |
205 end; |
202 end; |
206 FormatA:= tempstr; |
203 FormatA:= tempstr; |
207 end; |
204 end; |
208 |
205 |