Fix remaining errors from HAL derived types change

AdaCore · Feb 21, 2017 · b788a8c · b788a8c
1 parent 551ec1b
commit b788a8c
Show file tree

Hide file tree

Showing 6 changed files with 9 additions and 17 deletions.
diff --git a/arch/ARM/Nordic/drivers/nrf51-events.adb b/arch/ARM/Nordic/drivers/nrf51-events.adb
@@ -29,7 +29,6 @@
 --                                                                          --
 ------------------------------------------------------------------------------
 
-with Interfaces; use Interfaces;
 with Ada.Unchecked_Conversion;
 
 package body nRF51.Events is

diff --git a/arch/ARM/Nordic/drivers/nrf51-rng.adb b/arch/ARM/Nordic/drivers/nrf51-rng.adb
@@ -30,7 +30,6 @@
 ------------------------------------------------------------------------------
 
 with NRF51_SVD.RNG; use NRF51_SVD.RNG;
-with Interfaces;    use Interfaces;
 
 package body nRF51.RNG is
 

diff --git a/arch/ARM/STM32/driver_demos/demo_dac_basic/src/demo_dac_basic.adb b/arch/ARM/STM32/driver_demos/demo_dac_basic/src/demo_dac_basic.adb
@@ -55,8 +55,6 @@ with LCD_Std_Out;  use LCD_Std_Out;
 
 procedure Demo_DAC_Basic is
 
-   use type UInt32;
-
    Output_Channel : constant DAC_Channel := Channel_1;  -- arbitrary
 
    procedure Configure_DAC_GPIO (Output_Channel : DAC_Channel);

diff --git a/arch/ARM/STM32/driver_demos/demo_dac_dma/src/demo_dac_dma.adb b/arch/ARM/STM32/driver_demos/demo_dac_dma/src/demo_dac_dma.adb
@@ -58,8 +58,6 @@ with System;
 
 procedure Demo_DAC_DMA is
 
-   use type UInt32;
-
    ---------------------------------  DMA  ------------------------------------
 
    --  Note that DAC channel 1 uses DMA controller 1, Stream 5, Channel 7

diff --git a/arch/ARM/cortex_m/src/cm0/cortex_m_svd-nvic.ads b/arch/ARM/cortex_m/src/cm0/cortex_m_svd-nvic.ads
@@ -5,7 +5,6 @@ pragma Ada_2012;
 pragma Style_Checks (Off);
 
 with HAL;
-with System;
 
 package Cortex_M_SVD.NVIC is
    pragma Preelaborate;

diff --git a/boards/stm32f469_discovery/src/audio.adb b/boards/stm32f469_discovery/src/audio.adb
@@ -32,16 +32,15 @@
 --   @author  MCD Application Team                                          --
 ------------------------------------------------------------------------------
 
-with Ada.Real_Time;        use Ada.Real_Time;
-with Interfaces;           use Interfaces;
-
-with HAL;                  use HAL;
-with STM32;                use STM32;
-with STM32.Board;          use STM32.Board;
-with STM32.Device;         use STM32.Device;
-with STM32.GPIO;           use STM32.GPIO;
-with STM32.DMA;            use STM32.DMA;
-with STM32.SAI;            use STM32.SAI;
+with Ada.Real_Time; use Ada.Real_Time;
+
+with HAL;           use HAL;
+with STM32;         use STM32;
+with STM32.Board;   use STM32.Board;
+with STM32.Device;  use STM32.Device;
+with STM32.GPIO;    use STM32.GPIO;
+with STM32.DMA;     use STM32.DMA;
+with STM32.SAI;     use STM32.SAI;
 
 package body Audio is