From ba93cf9e139770ca3d95b9078857f8fd9aafd238 Mon Sep 17 00:00:00 2001 From: Nicolas Setton Date: Mon, 20 Nov 2017 16:02:14 -0500 Subject: [PATCH] Add missing example files --- resources/example/hello_world/hello.adb | 8 ++++++++ resources/example/hello_world/main.gpr | 22 ++++++++++++++++++++++ 2 files changed, 30 insertions(+) create mode 100644 resources/example/hello_world/hello.adb create mode 100644 resources/example/hello_world/main.gpr diff --git a/resources/example/hello_world/hello.adb b/resources/example/hello_world/hello.adb new file mode 100644 index 0000000..9f6fa6e --- /dev/null +++ b/resources/example/hello_world/hello.adb @@ -0,0 +1,8 @@ +-- A simple Hello, World program + +with Ada.Text_IO; use Ada.Text_IO; + +procedure Hello is +begin + Put_Line ("Hello, World"); +end Hello; diff --git a/resources/example/hello_world/main.gpr b/resources/example/hello_world/main.gpr new file mode 100644 index 0000000..481f52a --- /dev/null +++ b/resources/example/hello_world/main.gpr @@ -0,0 +1,22 @@ +project Main is + + for Main use ("hello.adb"); + + package Compiler is + for Switches ("ada") use ("-g", "-gnatwa", "-gnatQ"); + end Compiler; + + package Builder is + for Switches ("ada") use ("-g", "-O0"); + for Global_Compilation_Switches ("Ada") use + ("-gnateT=/export/work/setton/src/ANCR/src/code_examples_server/resources/example/hello_world/tdf"); + end Builder; + + for Runtime ("Ada") use "ravenscar-sfp-stm32f4"; + for Target use "arm-eabi"; + + package Emulator is + for Board use "STM32F4"; + end Emulator; + +end Main;