src/machine_misc.cpp
void Computer::executeSLA(const InstructionWord& instruction) {
    int32_t address = getIndexedAddress(instruction);
    int32_t shift = (address + 10000) % 5;
    if (shift) {
        for (int i = 1; i <= (5 - shift); ++i) {
            rA[i] = rA[i + shift];
        }
        for (int i = 6 - shift; i <=5; ++i) {
            rA[i] = 0;
        }
    }
}
/** Shift left rA padded with zeros. */
Shift left rA padded with zeros.
Shift left rA padded with zeros .
void Computer::executeSLA(const InstructionWord& instruction) {
    int32_t address = getIndexedAddress(instruction);
    int32_t shift = (address + 10000) % 5;
    if (shift) {
        for (int i = 1; i <= (5 - shift); ++i) {
            rA[i] = rA[i + shift];
        }
        for (int i = 6 - shift; i <=5; ++i) {
            rA[i] = 0;
        }
    }
}
void Computer :: executeSLA ( const InstructionWord & instruction ) { int32_t address = getIndexedAddress ( instruction ) ; int32_t shift = ( address + 10000 ) % 5 ; if ( shift ) { for ( int i = 1 ; i <= ( 5 - shift ) ; ++ i ) { rA [ i ] = rA [ i + shift ] ; } for ( int i = 6 - shift ; i <= 5 ; ++ i ) { rA [ i ] = 0 ; } } }
Shift left rA padded with zeros.
Shift left rA padded with zeros .