← Back to branch summary

~ubuntu-branches/ubuntu/precise/ncurses/precise

« back to all changes in this revision

Viewing changes to Ada95/samples/ncurses2-acs_display.adb

  • Committer: Bazaar Package Importer
  • Author(s): Scott James Remnant
  • Date: 2008-11-11 16:40:32 UTC
  • mfrom: (1.1.6 upstream)
  • Revision ID: james.westby@ubuntu.com-20081111164032-dudxd0hy2im0f2bj
Tags: 5.7-2ubuntu1
* Merge from debian unstable, remaining changes:
  - On amd64, use /{,usr/}lib32 instead of /emul/ia32-linux/.
  - Link using -Bsymbolic-functions.
  - Don't install the upstream changelog in the runtime library packages.

* Install wide-character patches into /{,usr/}lib32 as well.

Show diffs side-by-side

added added

removed removed

Lines of Context:
Ada95/samples/ncurses2-acs_display.adb
7
7
--                                 B O D Y                                  --
8
8
--                                                                          --
9
9
------------------------------------------------------------------------------
 
10
-- Copyright (c) 2000-2006,2008 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: Eugene V. Melaragno <aldomel@ix.netcom.com> 2000
37
37
--  Version Control
 
38
--  $Revision: 1.6 $
 
39
--  $Date: 2008/07/26 18:47:34 $
38
40
--  Binding Version 01.00
39
41
------------------------------------------------------------------------------
40
42
with ncurses2.util; use ncurses2.util;
203
203
      n := show_1_acs (n, "ACS_Not_Equal", ACS_Map (ACS_Not_Equal));
204
204
      n := show_1_acs (n, "ACS_Sterling", ACS_Map (ACS_Sterling));
205
205
 
 
206
      if n = 0 then
 
207
         raise Constraint_Error;
 
208
      end if;
206
209
   end show_acs_chars;
207
210
 
208
211
   c1 : Key_Code;