[pure-lang-svn] SF.net SVN: pure-lang:[684] pure/trunk/interpreter.cc

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

Revision: 684
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=684&view=rev
Author:   agraef
Date:     2008-09-01 16:31:02 +0000 (Mon, 01 Sep 2008)

Log Message:
-----------
Bugfixes.

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

Modified: pure/trunk/interpreter.cc
===================================================================
--- pure/trunk/interpreter.cc	2008-09-01 16:23:30 UTC (rev 683)
+++ pure/trunk/interpreter.cc	2008-09-01 16:31:02 UTC (rev 684)
@@ -3548,7 +3548,7 @@
   for (size_t i = 0; i < n; i++) {
     Value *x = args[i];
     // check for thunks which must be forced
-    {
+    if (argt[i] != ExprPtrTy) {
 #if 1
       // do a quick check on the tag value
       Value *idx[2] = { Zero, Zero };


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