MoinMoin Logo
  • Comments
  • Immutable Page
  • Menu
    • Navigation
    • RecentChanges
    • FindPage
    • Local Site Map
    • Help
    • HelpContents
    • HelpOnMoinWikiSyntax
    • Display
    • Attachments
    • Info
    • Raw Text
    • Print View
    • Edit
    • Load
    • Save
  • Login

Navigation

  • Start
  • Sitemap
Revision 11 as of 2019-07-18 20:52:56
  • Ada

Ada

  • https://en.wikibooks.org/wiki/Ada_Programming

  • https://en.wikibooks.org/wiki/Ada_Programming/Basic

  • https://craftofcoding.files.wordpress.com/2013/07/ada_strings.pdf

  • https://www.adaic.org/resources/add_content/standards/05rm/html/RM-TOC.html

  • https://ada-util.readthedocs.io/en/latest/Util_Dates/

  • https://en.wikibooks.org/wiki/Ada_Programming/Libraries/GNAT.Calendar.Time_IO

  • https://www.tutorialspoint.com/compile_ada_online.php

  • https://docs.adacore.com/gnat_rm-docs/html/gnat_rm/gnat_rm/the_gnat_library.html

Hello world

hello.adb

   1 with Ada.Text_IO;
   2 -- comment 
   3 procedure Hello is
   4 begin
   5    Ada.Text_IO.Put_Line("Hello, world!");
   6 end Hello;
  • gnat make hello.adb

Hello date

hellodate.adb

   1 with ada.text_io;
   2 use ada.text_io;
   3 with gnat.calendar.time_io;
   4 use gnat.calendar.time_io;
   5 with ada.calendar;
   6 use ada.calendar;
   7 
   8 procedure HelloDate is
   9     datetime: string(1..26); -- has exactly 26 chars
  10 begin
  11     -- gets date to string with milliseconds
  12     datetime := image( clock, "[%Y-%m-%dT%H:%M:%S.%i] " );
  13     -- concatenetas string and shows date
  14     put_line( datetime & "stuff " );  
  15 end HelloDate;
  • gnat make hellodate.adb
  • MoinMoin Powered
  • Python Powered
  • GPL licensed
  • Valid HTML 4.01