[pure-lang-svn] SF.net SVN: pure-lang:[670] pure/trunk/runtime.cc

[<ag...@us...>]

Revision: 670
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=670&view=rev
Author:   agraef
Date:     2008-08-30 20:58:44 +0000 (Sat, 30 Aug 2008)

Log Message:
-----------
Add sizes of complex types (requires gcc or ISO C99).

Modified Paths:
--------------
    pure/trunk/runtime.cc

Modified: pure/trunk/runtime.cc
===================================================================
--- pure/trunk/runtime.cc	2008-08-30 20:30:19 UTC (rev 669)
+++ pure/trunk/runtime.cc	2008-08-30 20:58:44 UTC (rev 670)
@@ -3109,6 +3109,8 @@
   cdf(interp, "SIZEOF_LONG",	pure_int(sizeof(long)));
   cdf(interp, "SIZEOF_FLOAT",	pure_int(sizeof(float)));
   cdf(interp, "SIZEOF_DOUBLE",	pure_int(sizeof(double)));
+  cdf(interp, "SIZEOF_COMPLEX_FLOAT",	pure_int(sizeof(_Complex float)));
+  cdf(interp, "SIZEOF_COMPLEX_DOUBLE",	pure_int(sizeof(_Complex double)));
   cdf(interp, "SIZEOF_POINTER",	pure_int(sizeof(void*)));
   // clock
   cdf(interp, "CLOCKS_PER_SEC",	pure_int(CLOCKS_PER_SEC));


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.