← Back to branch summary

~ubuntu-branches/debian/sid/ncurses/sid-200908151543

« back to all changes in this revision

Viewing changes to Ada95/samples/sample-keyboard_handler.adb

  • Committer: Bazaar Package Importer
  • Author(s): Daniel Baumann
  • Date: 2008-12-14 21:06:00 UTC
  • mfrom: (1.1.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20081214210600-2rdjwvpplgvh3zeb
Tags: 5.7+20081213-1
Merging upstream version 5.7+20081213.

Show diffs side-by-side

added added

removed removed

Lines of Context:
Ada95/samples/sample-keyboard_handler.adb
7
7
--                                 B O D Y                                  --
8
8
--                                                                          --
9
9
------------------------------------------------------------------------------
 
10
-- Copyright (c) 1998-2004,2006 Free Software Foundation, Inc.              --
10
11
--                                                                          --
11
12
-- Permission is hereby granted, free of charge, to any person obtaining a  --
12
13
-- copy of this software and associated documentation files (the            --
35
35
------------------------------------------------------------------------------
36
36
--  Author:  Juergen Pfeifer, 1996
37
37
--  Version Control
 
38
--  $Revision: 1.14 $
 
39
--  $Date: 2006/06/25 14:30:22 $
38
40
--  Binding Version 01.00
39
41
------------------------------------------------------------------------------
40
42
with Ada.Strings; use Ada.Strings;
70
70
 
71
71
      function Command return Real_Key_Code;
72
72
 
73
 
 
74
73
      function Command return Real_Key_Code
75
74
      is
76
75
         function My_Driver (F : Form;