Skip to content
Closed
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 5 additions & 3 deletions boards/stm32_common/dma2d/stm32-dma2d_bitmap.adb
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
------------------------------------------------------------------------------
-- --
-- Copyright (C) 2015-2016, AdaCore --
-- Copyright (C) 2015-2026, AdaCore --
-- --
-- Redistribution and use in source and binary forms, with or without --
-- modification, are permitted provided that the following conditions are --
Expand Down Expand Up @@ -153,15 +153,17 @@ package body STM32.DMA2D_Bitmap is
X => Area.Position.X,
Y => Area.Position.Y,
Width => Area.Width,
Height => Area.Height);
Height => Area.Height,
Synchronous => True);
else
DMA2D_Fill_Rect
(DMA_Buf,
Color => Buffer.Native_Source,
X => Area.Position.Y,
Y => Buffer.Width - Area.Position.X - Area.Width,
Width => Area.Height,
Height => Area.Width);
Height => Area.Width,
Synchronous => True);
end if;
else
Parent (Buffer).Fill_Rect (Area);
Expand Down
9 changes: 8 additions & 1 deletion boards/stm32_common/ltdc/framebuffer_ltdc.adb
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
------------------------------------------------------------------------------
-- --
-- Copyright (C) 2015-2016, AdaCore --
-- Copyright (C) 2015-2026, AdaCore --
-- --
-- Redistribution and use in source and binary forms, with or without --
-- modification, are permitted provided that the following conditions are --
Expand Down Expand Up @@ -32,6 +32,7 @@
with STM32.DMA2D.Interrupt;
with STM32.DMA2D.Polling;
with STM32.SDRAM; use STM32.SDRAM;
with Cortex_M.Cache;

package body Framebuffer_LTDC is

Expand Down Expand Up @@ -377,12 +378,18 @@ package body Framebuffer_LTDC is
null;
when 1 =>
Display.Buffers (LCD_Layer, 2).Wait_Transfer;
Cortex_M.Cache.Clean_DCache
(Display.Buffers (LCD_Layer, 2).Addr,
Display.Buffers (LCD_Layer, 2).Buffer_Size);
STM32.LTDC.Set_Frame_Buffer
(Layer => LCD_Layer,
Addr => Display.Buffers (LCD_Layer, 2).Addr);
Display.Current (LCD_Layer) := 2;
when 2 =>
Display.Buffers (LCD_Layer, 1).Wait_Transfer;
Cortex_M.Cache.Clean_DCache
(Display.Buffers (LCD_Layer, 1).Addr,
Display.Buffers (LCD_Layer, 1).Buffer_Size);
STM32.LTDC.Set_Frame_Buffer
(Layer => LCD_Layer,
Addr => Display.Buffers (LCD_Layer, 1).Addr);
Expand Down
Loading