diff --git a/include/libopencm3/stm32/common/flash_common_f24.h b/include/libopencm3/stm32/common/flash_common_f24.h
index 2a762a30..e977333a 100644
--- a/include/libopencm3/stm32/common/flash_common_f24.h
+++ b/include/libopencm3/stm32/common/flash_common_f24.h
@@ -143,6 +143,7 @@ void flash_program_double_word(u32 address, u64 data);
 void flash_program_word(u32 address, u32 data);
 void flash_program_half_word(u32 address, u16 data);
 void flash_program_byte(u32 address, u8 data);
+void flash_program(u32 address, u8* data, u32 len);
 void flash_wait_for_last_operation(void);
 void flash_program_option_bytes(u32 data);
 
diff --git a/lib/stm32/common/flash_common_f24.c b/lib/stm32/common/flash_common_f24.c
index 6abff49d..17cc561d 100644
--- a/lib/stm32/common/flash_common_f24.c
+++ b/lib/stm32/common/flash_common_f24.c
@@ -218,6 +218,15 @@ void flash_program_byte(u32 address, u8 data)
 	FLASH_CR &= ~FLASH_CR_PG;		/* Disable the PG bit. */
 }
 
+void flash_program(u32 address, u8* data, u32 len)
+{
+  /* TODO: Use dword and word size program operations where possible for turbo
+   * speed. */
+  u32 i;
+  for (i=0; i<len; i++)
+    flash_program_byte(address+i, data[i]);
+}
+
 void flash_erase_sector(u8 sector, u32 program_size)
 {
 	flash_wait_for_last_operation();