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.
Copyright © 1997, Dr. Dobb's Journal