Removed diagnostics
git-svn-id: http://picoc.googlecode.com/svn/trunk@225 21eae674-98b7-11dd-bd71-f92a316d2d60
This commit is contained in:
parent
15aa51e08d
commit
8038424d1a
|
@ -274,10 +274,7 @@ int ExpressionParse(struct ParseState *Parser, struct Value **Result)
|
||||||
ProgramFail(Parser, "can't assign incompatible types");
|
ProgramFail(Parser, "can't assign incompatible types");
|
||||||
|
|
||||||
if (TotalValue->Typ->Base != TypeArray)
|
if (TotalValue->Typ->Base != TypeArray)
|
||||||
{
|
|
||||||
// XXX printf("assigning to 0x%lx\n", (long)TotalValue->Val);
|
|
||||||
memcpy((void *)TotalValue->Val, (void *)CurrentValue->Val, TotalValue->Typ->Sizeof);
|
memcpy((void *)TotalValue->Val, (void *)CurrentValue->Val, TotalValue->Typ->Sizeof);
|
||||||
}
|
|
||||||
else
|
else
|
||||||
{ /* array assignment */
|
{ /* array assignment */
|
||||||
if (TotalValue->Val->Array.Size != CurrentValue->Val->Array.Size)
|
if (TotalValue->Val->Array.Size != CurrentValue->Val->Array.Size)
|
||||||
|
|
|
@ -63,7 +63,7 @@ void Cpeek(struct ParseState *Parser, struct Value *ReturnValue, struct Value **
|
||||||
break;
|
break;
|
||||||
case 4: // int *
|
case 4: // int *
|
||||||
ip = (unsigned int *)(ptr & 0xFFFFFFFC); // aling with quad boundary
|
ip = (unsigned int *)(ptr & 0xFFFFFFFC); // aling with quad boundary
|
||||||
ReturnValue->Val->Integer = 0 /*(int)*ip*/;
|
ReturnValue->Val->Integer = (int)*ip;
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
ReturnValue->Val->Integer = 0;
|
ReturnValue->Val->Integer = 0;
|
||||||
|
@ -110,7 +110,7 @@ void Cpoke(struct ParseState *Parser, struct Value *ReturnValue, struct Value **
|
||||||
struct LibraryFunction PlatformLibrary[] =
|
struct LibraryFunction PlatformLibrary[] =
|
||||||
{
|
{
|
||||||
{ ShowComplex, "void ShowComplex(struct complex *)" },
|
{ ShowComplex, "void ShowComplex(struct complex *)" },
|
||||||
{ Cpeek, "int peak(int, int)" },
|
{ Cpeek, "int peek(int, int)" },
|
||||||
{ Cpoke, "void poke(int, int, int)" },
|
{ Cpoke, "void poke(int, int, int)" },
|
||||||
{ Crandom, "int random(int, int)" },
|
{ Crandom, "int random(int, int)" },
|
||||||
{ NULL, NULL }
|
{ NULL, NULL }
|
||||||
|
|
Loading…
Reference in a new issue