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

Subversion Repositories raptor64

[/] [raptor64/] [trunk/] [software/] [c64/] [source/] [Initializers.c] - Diff between revs 37 and 51

Show entire file | Details | Blame | View Log

Rev 37 Rev 51
Line 38... Line 38...
void endinit();
void endinit();
int InitializeArray(TYP *tp);
int InitializeArray(TYP *tp);
 
 
void doinit(SYM *sp)
void doinit(SYM *sp)
{
{
        dseg();                 /* initialize into data segment */
        if (sp->storage_class == sc_static || lastst==assign) {
 
                seg(dataseg);          /* initialize into data segment */
    nl();                   /* start a new line in object */
    nl();                   /* start a new line in object */
        if(sp->storage_class == sc_static)
        }
 
        else {
 
                seg(bssseg);            /* initialize into data segment */
 
                nl();                   /* start a new line in object */
 
        }
 
        if(sp->storage_class == sc_static) {
                put_label(sp->value.i);
                put_label(sp->value.i);
        else
        }
 
        else {
                gen_strlab(sp->name);
                gen_strlab(sp->name);
 
        }
        if( lastst != assign) {
        if( lastst != assign) {
                genstorage(sp->tp->size);
                genstorage(sp->tp->size);
        }
        }
        else {
        else {
                NextToken();
                NextToken();

powered by: WebSVN 2.1.0

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