Lines Matching refs:ControlMask
87 our $ControlMask = 4;
332 $result .= "+Ctrl" if ( $state & $ControlMask );
426 if ( $state & $ControlMask ) {
449 $modify_parm += 4 if ( $state & $ControlMask );
461 $state |= $ControlMask if ( $modify_parm & 4 );
470 my $result = $state & ( $ShiftMask | $AltMask | $ControlMask | $MetaMask );
477 and &Masked( $result, $ControlMask ) == 0 )
481 $result &= ~$ControlMask;
490 if ( &Masked( $result, ( $ControlMask | $ShiftMask ) ) == 0 ) {
492 $result = 0 if ( $state == $ControlMask );
502 if ( !( $result & $ControlMask ) ) {
526 my $state = shift; # mask of modifiers, e.g., ControlMask
552 # UIntClr(state, ControlMask);
574 if ( $state == $ControlMask or $state == $ShiftMask ) {
585 elsif ( &computeMaskedModifier( $state, $ControlMask ) )
603 # strip ControlMask as per IsBackarrowToggle()
605 if ( &computeMaskedModifier( $state, $ControlMask ) );
1452 my $alias = &IsControlAlias( $hex, $ControlMask ) ? "alias" : "";