* peripherial globals to chip file
This commit is contained in:
parent
018ee62d2f
commit
84e75b1c04
|
@ -1,10 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
|
||||
package STM32.FSMC.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
FSMC : FSMC_Registers
|
||||
with Volatile, Import, Address => System'To_Address (STM32.Address_Map.FMC_FSMC);
|
||||
|
||||
end STM32.FSMC.Units;
|
|
@ -1,27 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
|
||||
package STM32.GPIO.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
package Address_Map renames STM32.Address_Map;
|
||||
|
||||
GPIOA : GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOA);
|
||||
|
||||
GPIOC : GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOC);
|
||||
|
||||
GPIOD : GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOD);
|
||||
|
||||
GPIOE : GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOE);
|
||||
|
||||
GPIOF : GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOF);
|
||||
|
||||
GPIOG : GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOG);
|
||||
|
||||
end STM32.GPIO.Units;
|
|
@ -1,5 +0,0 @@
|
|||
-- BUG: need to make separate unit for F407 etc.
|
||||
|
||||
with STM32.F42x.RCC;
|
||||
|
||||
package STM32.RCC renames STM32.F42x.RCC;
|
|
@ -1,27 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
|
||||
package STM32.USART.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
package Address_Map renames STM32.Address_Map;
|
||||
|
||||
USART1 : USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address (Address_Map.USART1);
|
||||
|
||||
USART2 : USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address (Address_Map.USART2);
|
||||
|
||||
USART3 : USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address (Address_Map.USART3);
|
||||
|
||||
UART4 : USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address (Address_Map.UART4);
|
||||
|
||||
UART5 : USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address (Address_Map.UART5);
|
||||
|
||||
USART6 : USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address (Address_Map.USART6);
|
||||
|
||||
end STM32.USART.Units;
|
|
@ -1,42 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
|
||||
package STM32.GPIO.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
package Address_Map renames STM32.Address_Map;
|
||||
|
||||
GPIOA: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOA);
|
||||
|
||||
GPIOB: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOB);
|
||||
|
||||
GPIOC: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOC);
|
||||
|
||||
GPIOD: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOD);
|
||||
|
||||
GPIOE: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOE);
|
||||
|
||||
GPIOF: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOF);
|
||||
|
||||
GPIOG: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOG);
|
||||
|
||||
GPIOH: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOH);
|
||||
|
||||
GPIOI: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOI);
|
||||
|
||||
GPIOJ: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOJ);
|
||||
|
||||
GPIOK: GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOK);
|
||||
|
||||
end STM32.GPIO.Units;
|
|
@ -1,32 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
package STM32.USART.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
package Address_Map renames STM32.Address_Map;
|
||||
|
||||
USART1: USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.USART1);
|
||||
|
||||
USART2: USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.USART2);
|
||||
|
||||
USART3: USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.USART3);
|
||||
|
||||
UART4: USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.UART4);
|
||||
|
||||
UART5: USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.UART5);
|
||||
|
||||
USART6: USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.USART6);
|
||||
|
||||
UART7: USART.USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.UART7);
|
||||
|
||||
UART8: USART.USART_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.UART8);
|
||||
|
||||
end STM32.USART.Units;
|
|
@ -1,12 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
|
||||
package STM32.EXTI.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
package Address_Map renames STM32.Address_Map;
|
||||
|
||||
EXTI : EXTI_Registers
|
||||
with Volatile, Import, Address => System'To_Address (STM32.Address_Map.EXTI);
|
||||
|
||||
end STM32.EXTI.Units;
|
|
@ -1,5 +1,7 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
with STM32.EXTI;
|
||||
with STM32.FSMC;
|
||||
with STM32.GPIO;
|
||||
with STM32.RCC;
|
||||
with STM32.PWR;
|
||||
|
@ -9,6 +11,14 @@ with STM32.USART;
|
|||
package STM32.F407.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
EXTI : STM32.EXTI.EXTI_Registers
|
||||
with Volatile, Import, Address => System'To_Address (STM32.Address_Map.EXTI);
|
||||
|
||||
FSMC : STM32.FSMC.FSMC_Registers
|
||||
with Volatile, Import, Address => System'To_Address (STM32.Address_Map.FMC_FSMC);
|
||||
|
||||
---
|
||||
|
||||
GPIOA: STM32.GPIO.GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOA);
|
||||
|
||||
|
|
|
@ -1,5 +1,6 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
with STM32.EXTI;
|
||||
with STM32.GPIO;
|
||||
with STM32.LTDC;
|
||||
with STM32.RCC;
|
||||
|
@ -10,6 +11,11 @@ with STM32.USART;
|
|||
package STM32.F429.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
EXTI : STM32.EXTI.EXTI_Registers
|
||||
with Volatile, Import, Address => System'To_Address (STM32.Address_Map.EXTI);
|
||||
|
||||
---
|
||||
|
||||
GPIOA: STM32.GPIO.GPIO_Registers
|
||||
with Volatile, Import, Address => System'To_Address(Address_Map.GPIOA);
|
||||
|
||||
|
|
|
@ -1,10 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
|
||||
package STM32.PWR.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
PWR: PWR_Registers
|
||||
with Volatile, Import, Address => System'To_Address(STM32.Address_Map.PWR);
|
||||
|
||||
end STM32.PWR.Units;
|
|
@ -1,10 +0,0 @@
|
|||
with System;
|
||||
with STM32.Address_Map;
|
||||
|
||||
package STM32.SYSCFG.Units is
|
||||
pragma Preelaborate;
|
||||
|
||||
SYSCFG : SYSCFG_Registers
|
||||
with Volatile, Import, Address => System'To_Address (STM32.Address_Map.SYSCFG);
|
||||
|
||||
end STM32.SYSCFG.Units;
|
Loading…
Reference in New Issue