--- a/project_files/hwc/rtl/system.c	Sat Apr 11 15:34:07 2015 +0300
+++ b/project_files/hwc/rtl/system.c	Sat Apr 11 17:37:43 2015 +0300
@@ -300,6 +300,10 @@
     return (int) n;
 }
 
+Integer fpcrtl_ceil(extended n) {
+    return (int) (ceil(n));
+}
+
 LongInt str_to_int(char *src)
 {
     int i;