--- a/hedgewars/pas2c.h	Fri May 11 23:22:01 2012 +0400
+++ b/hedgewars/pas2c.h	Fri May 11 23:34:35 2012 +0400
@@ -87,6 +87,9 @@
 
 #define STRINIT(a) {.len = sizeof(a) - 1, .str = a}
 
+
+int length_ar(void * a);
+
 typedef int file;
 typedef int TextFile;
 extern int FileMode;
@@ -131,3 +134,5 @@
 
 #define val(a, b) _val(a, (LongInt*)&(b))
 void _val(string255 str, LongInt * a);
+
+extern double pi;