Fix clear behaviour on Linux 64b. 76/10676/1
Bruno JOFRET [Mon, 4 Mar 2013 12:47:00 +0000 (13:47 +0100)]
Change-Id: I81f5f3b6baef20328521862d4802a47e682cc5d7

scilab/modules/core/sci_gateway/c/sci_clear.c

index dec6b50..a0697dc 100644 (file)
@@ -57,7 +57,7 @@ static int sci_clear_no_rhs(const char *fname)
         }
         /* clear within a macro, an execstr, an exec or a pause */
         k = C2F(iop).lpt[0] - 19;
-        if (C2F(iop).lin[k + 6] != 0 && ((int *)&C2F(stack))[C2F(iop).lin[k + 5] - 1] == 10)
+        if (C2F(iop).lin[k + 6] != 0 && *istk(C2F(iop).lin[k + 5]) == 10)
         {
             PutLhsVar();
             return 0;