OpenCores
URL https://opencores.org/ocsvn/thor/thor/trunk

Subversion Repositories thor

Compare Revisions

  • This comparison shows the changes necessary to convert path
    /thor/trunk/FT64v5/software/AS64/source
    from Rev 55 to Rev 59
    Reverse comparison

Rev 55 → Rev 59

/FT64.cpp
1312,9 → 1312,6
// So
// addi r1,r2,#$12345678
// Becomes:
// ldiq1 r52,#$00123
// oriq0 r52,#$45678
// addi r1,r2,r52
// ---------------------------------------------------------------------------
 
static void process_riop(int64_t opcode6)
4572,6 → 4569,7
case tk_ibne: process_ibne(0x26,2); break;
case tk_inc: process_inc(0x1A); break;
case tk_if: pif1 = inptr-2; doif(); break;
case tk_ifdef: pif1 = inptr - 5; doifdef(); break;
case tk_itof: process_itof(0x15); break;
case tk_iret: process_iret(0xC8000002); break;
case tk_isnull: process_rop(0x0C); break;
/main.cpp
1510,7 → 1510,7
 
// Cut out the if statement
p1 = pif1;
memmove(pif1,pif2,sizeof(masterFile)-(pif2-masterFile));
memmove(pif1,pif2,masterFileLength-(pif2-masterFile));
 
p1 = inptr = pif1;
while(*inptr) {
1526,13 → 1526,13
// If the if was false cut out the code between
// if and endif
if (val==0 && !codecut) {
memmove(pif1,p3,sizeof(masterFile)-(p3-masterFile));
memmove(pif1,p3,masterFileLength-(p3-masterFile));
inptr = pif1;
return;
}
else {
// remove endif but leave remaining text
memmove(p2,inptr,sizeof(masterFile)-(inptr-masterFile));
memmove(p2,inptr,masterFileLength-(inptr-masterFile));
inptr = p2;
}
}
1542,7 → 1542,7
// cut out code between if and else
// and keep going until endif
if (val==0) {
memmove(pif1,p2+4,sizeof(masterFile)-(p2+4-masterFile));
memmove(pif1,p2+4,masterFileLength-(p2+4-masterFile));
inptr = pif1;
codecut = true;
}
1549,7 → 1549,7
else {
// remove the else from text
// and keep going until endif
memmove(p2,inptr,sizeof(masterFile)-(inptr-masterFile));
memmove(p2,inptr,masterFileLength-(inptr-masterFile));
inptr = p2;
}
}
1576,11 → 1576,12
{
int64_t val;
 
SkipSpaces();
if (getIdentifier()==0)
printf("Expecting an identifier %d.\n", lineno);
val = (find_symbol(lastid)!=nullptr);
val = (find_symbol(lastid)!=nullptr);
pif2 = inptr;
ScanToEOL();
pif2 = inptr;
skipif(val);
}
 
1590,7 → 1591,7
 
if (getIdentifier()==0)
printf("Expecting an identifier %d.\n", lineno);
val = (find_symbol(lastid)==nullptr);
val = (find_symbol(lastid)==nullptr);
ScanToEOL();
pif2 = inptr;
skipif(val);
/proto.h
1,4 → 1,5
#pragma once
 
void process_macro();
 
void doif();
void doifdef();

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.