no real impact. add comments and enable building on sparc

Author: davidly

djl_os.hxx

@@ -67,11 +67,11 @@
 
 #else // Linux, MacOS, etc.
 
-    #if !defined( OLDGCC ) && !defined( M68K )
+    #if !defined( OLDGCC ) && !defined( __mc68000__ )
         #include <termios.h>
     #endif
 
-#ifdef M68K
+#ifdef __mc68000__
 extern "C" int nanosleep( const struct timespec * duration, struct timespec * rem );
 #endif
 
@@ -87,7 +87,7 @@ extern "C" int nanosleep( const struct timespec * duration, struct timespec * re
 
     inline void set_process_affinity( uint64_t processAffinityMask )
     {
-#if !defined(__APPLE__) && !defined( OLDGCC ) && !defined( M68K )
+#if !defined(__APPLE__) && !defined( OLDGCC ) && !defined( __mc68000__ )
         cpu_set_t mask;
         CPU_ZERO( &mask );
 
@@ -197,6 +197,10 @@ inline const char * target_platform()
         return "x86";
     #elif defined( __ARM_32BIT_STATE ) // ARM32 on Raspberry PI (and more)
         return "arm32";
+    #elif defined( __mc68000__ )
+        return "m68000";
+    #elif defined( sparc )
+        return "sparc";
     #else
         return "(other)";
     #endif
@@ -326,7 +330,7 @@ inline char printable( uint8_t x )
     return x;
 } //printable
 
-#if ( ( defined( __clang__ ) || defined( __GNUC__ ) ) && !defined( OLDGCC ) && !defined( M68K ) )
+#if ( ( defined( __clang__ ) || defined( __GNUC__ ) ) && !defined( OLDGCC ) && !defined( __mc68000__ ) )
 
     inline uint64_t flip_endian64( uint64_t x ) { return __builtin_bswap64( x ); }
     inline uint32_t flip_endian32( uint32_t x ) { return __builtin_bswap32( x ); }
@@ -358,3 +362,33 @@ inline char printable( uint8_t x )
 
 #endif
 
+#ifdef sparc // If using buildroot and wide strings weren't included...
+    inline size_t wcstombs( char * dst, const wchar_t * src, size_t len ) // simplistic ascii-only version
+    {
+        if ( 0 == dst || 0 == src )
+            return -1;
+
+        size_t i = 0;
+        while ( ( i < ( len - 1 ) ) && src[i] )
+        {
+            dst[ i ] = (char) src[ i ];
+            i++;
+        }
+
+        dst[ i ] = 0;
+        return i;
+    } //wcstombs
+
+    inline size_t wcslen(const wchar_t *str)
+    {
+        size_t len = 0;
+        while ( *str )
+        {
+            len++;
+            str++;
+        }
+        return len;
+    } //wcslen
+#endif
+
+

djltrace.hxx

@@ -29,7 +29,6 @@
 #endif
 
 #if !defined(_WIN32) && !defined(WATCOM)
-
     #include <sys/unistd.h>
     #ifdef __APPLE__
         #include <unistd.h>

ntvcm.cxx

@@ -1741,7 +1741,7 @@ void set_bdos_status()
     // CP/M 2.2 generally mandates L = A on return.
     // HiSoft C v3.09 and the apps it generates only look at HL for bdos results, not A or L.
     // So for HiSoft, H must be cleared so 16-bit HL checks just get the result in L.
-    // But Andre Adrian's Sargon chess fails if h is modified.
+    // But Andre Adrian's Sargon chess fails if h is modified. (the fix is to push and pop H in the character input macro)
 
     reg.l = reg.a;
     reg.b = 0;
@@ -3501,7 +3501,7 @@ int main( int argc, char * argv[] )
             exit( 1 );
         }
 
-        // this old Chess app fails if H is set to 0 during BDOS calls.
+        // this old Chess app fails if H is set to 0 during BDOS calls. Apparently it only ever ran on eumulators.
 
         if ( ends_with( acCOM, "sargon.com" ) )
             g_clearHOnBDOSReturn = false;

x80.cxx

@@ -1754,7 +1754,7 @@ not_inlined void x80_trace_state()
                       reg.pc, op, op2, op3, reg.a, reg.B(), reg.D(), reg.H(), reg.sp,
                       reg.renderFlags(), x80_render_operation( reg.pc ) );
 
-    //tracer.TraceBinaryData( & memory[ 0x1142 ], 16, 4 );
+//    tracer.TraceBinaryData( & memory[ 0x42c5 + 0x16 ], 2, 4 );
 } //x80_trace_state
 
 bool check_conditional( uint8_t op ) // checks for conditional jump, call, and return
@@ -1973,7 +1973,7 @@ uint16_t x80_emulate( uint16_t maxcycles )
             case 0xc7: case 0xd7: case 0xe7: case 0xf7: case 0xcf: case 0xdf: case 0xef: case 0xff: // rst
             {
                 // bits 5..3 are exp, which form an address 0000000000exp000 that is called.
-                // rst is generally invoked by hardware interrupts, which supply the one instruction rst.
+                // rst is generally invoked by DDT and hardware interrupts, which supply the one instruction rst.
 
                 pushword( reg.pc );
                 reg.pc = 0x38 & (uint16_t) op;