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 9 as of 2019-07-18 14:17:40
  • 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

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