Changeset 2126


Ignore:
Timestamp:
Jan 20, 2011, 12:28:37 AM (3 years ago)
Author:
wmb
Message:

Mostly-cosmetic changes to the wrapper. You can turn on simulator sign-on chattiness by defining VERBOSE.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • forth/wrapper/wrapper.c

    r2118 r2126  
    348348 
    349349#if defined(PPCSIM) || defined (ARMSIM) 
    350   /* These are not INTERNAL because the PowerPC simulator uses then */ 
    351          long   c_key(); 
    352          long   s_bye(); 
    353          void   simulate(); 
    354          void   restoremode(); 
     350  /* These are not INTERNAL because the simulators use then */ 
     351           long c_key(); 
     352           long s_bye(); 
     353           void simulate(); 
     354           void restoremode(); 
    355355#else 
    356356  INTERNAL long c_key(); 
     
    10031003        dictsize += 16;         /* Allow for alignment */ 
    10041004 
    1005 # ifdef PPCSIM 
     1005# ifdef VERBOSE 
     1006#  ifdef PPCSIM 
    10061007        printf("PowerPC Instruction Set Simulator\n"); 
    10071008        printf("Copyright 1994 FirmWorks   All rights reserved\n"); 
     1009#  elif ARMSIM 
     1010        printf("ARM Instruction Set Simulator\n"); 
     1011        printf("Copyright 1994 FirmWorks   All rights reserved\n"); 
     1012        printf("Copyright 2010 Apple, Inc. All rights reserved\n"); 
     1013#  endif 
    10081014# endif 
    10091015 
     
    10641070                 argc, argv, 1 /* 0=POWER, 1=PowerPC */); 
    10651071#elif defined(ARMSIM) 
    1066         // printf("loadaddr = 0x%x\n",loadaddr); 
    10671072        simulate(0L, loadaddr, loadaddr, functions, 
    10681073         ((long)loadaddr+dictsize - 16) & ~15, argc, argv); 
Note: See TracChangeset for help on using the changeset viewer.