+ STM32.CAN module

This commit is contained in:
Vovanium 2021-10-21 18:49:51 +03:00
parent 54322ecf4b
commit a4b81bc692
1 changed files with 4 additions and 4 deletions

View File

@ -1,4 +1,4 @@
package STM32.ADC is
package STM32.ADC with Pure is
-- SR
@ -319,7 +319,7 @@ package STM32.ADC is
end record;
type ADC1_Registers is record
type ADC_Registers is record
SR : Status_Register;
pragma Volatile_Full_Access (SR);
CR1 : Control_Register_1;
@ -361,7 +361,7 @@ package STM32.ADC is
DR : Integer range 0 .. 2**16 - 1 := 0;
pragma Volatile_Full_Access (DR);
end record;
for ADC1_Registers use record
for ADC_Registers use record
SR at 16#00# range 0 .. 31;
CR1 at 16#04# range 0 .. 31;
CR2 at 16#08# range 0 .. 31;
@ -517,7 +517,7 @@ package STM32.ADC is
pragma Volatile_Full_Access (CCR);
CDR : Common_Data_Register;
pragma Volatile_Full_Access (CDR);
end record;
end record with Volatile;
for Common_ADC_Registers use record
CSR at 16#00# range 0 .. 31;
CCR at 16#04# range 0 .. 31;