project_files/hwc/rtl/system.h
changeset 10131 4b4a043111f4
parent 10127 7f29a65aa1e4
child 10566 cc90ea6448c7
--- a/project_files/hwc/rtl/system.h	Tue Feb 11 22:05:03 2014 +0400
+++ b/project_files/hwc/rtl/system.h	Wed Feb 12 00:50:15 2014 +0400
@@ -30,7 +30,8 @@
  * and the length of the string is adjusted.
  */
 #define     fpcrtl_delete(s, index, count)                  fpcrtl_delete__vars(&(s), index, count)
-void        fpcrtl_delete__vars(string255 *s, SizeInt index, SizeInt count);
+void        __attribute__((overloadable))                   fpcrtl_delete__vars(string255 *s, SizeInt index, SizeInt count);
+void        __attribute__((overloadable))                   fpcrtl_delete__vars(astring *s, SizeInt index, SizeInt count);
 
 string255   fpcrtl_floatToStr(double n);
 
@@ -44,12 +45,15 @@
 Integer     __attribute__((overloadable))                   fpcrtl_pos(Char c, string255 str);
 Integer     __attribute__((overloadable))                   fpcrtl_pos(string255 substr, string255 str);
 Integer     __attribute__((overloadable))                   fpcrtl_pos(string255 substr, astring str);
+Integer     __attribute__((overloadable))                   fpcrtl_pos(Char c, astring str);
 
 Integer     fpcrtl_length(string255 s);
 #define     fpcrtl_Length                                   fpcrtl_length
 Integer     fpcrtl_lengthA(astring s);
 #define     fpcrtl_LengthA                                  fpcrtl_lengthA
 
+#define     fpcrtl_SetLengthA(s, l)                         do{(s).len = (l);}while(0)
+
 #define     fpcrtl_sqr(x)                                   ((x) * (x))
 
 #define     fpcrtl_odd(x)                                   ((x) % 2 != 0 ? true : false)