GNAT: The GNU New York University Ada Translator

By Gavin Smyth

Dr. Dobb's Journal December 1997

Keys_Pressed: array( Scan_Code ) of Scan_Code;
pragma Import( Asm, Keys_Pressed, "keys" );
pragma Volatile( Keys_Pressed );
Most_Recent_Key: Scan_Code renames Keys_Pressed( 0 );

Example 5: Interfacing to the keyboard handler common variables.

Back to Article