# HG changeset patch
# User Mario de Sousa <msousa@fe.up.pt>
# Date 1307365528 -3600
# Node ID 90c3772e6547bf39455d0ca3d93dc18f0f9fb0aa
# Parent  29add821207d85bdec9ad09eeb8f6c2f47631d89
fixing INSERT function: was inserting into incorrect position. (submitted by Manuele)

diff -r 29add821207d -r 90c3772e6547 lib/iec_std_lib.h
--- a/lib/iec_std_lib.h	Mon Jun 06 11:01:47 2011 +0200
+++ b/lib/iec_std_lib.h	Mon Jun 06 14:05:28 2011 +0100
@@ -385,7 +385,7 @@
     TEST_EN_COND(STRING, P < 0)
     res = __INIT_STRING;
 
-    to_copy = P > IN1.len ? IN1.len : P - 1;
+    to_copy = P > IN1.len ? IN1.len : P;
     memcpy(&res.body, &IN1.body , to_copy);
     P = res.len = to_copy;