--- a/project_files/hwc/rtl/system.c	Mon May 04 17:48:57 2015 +0300
+++ b/project_files/hwc/rtl/system.c	Mon May 04 17:49:15 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;