home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / dev / obero / oberon-a / source / fpe / helloworld.mod < prev    next >
Encoding:
Text File  |  1995-06-29  |  960 b   |  40 lines
  1. (***************************************************************************
  2.  
  3.      $RCSfile: HelloWorld.mod $
  4.   Description: An absolutely minimal "hello world" program.
  5.  
  6.    Created by: fjc (Frank Copeland)
  7.     $Revision: 1.3 $
  8.       $Author: fjc $
  9.         $Date: 1994/09/25 18:20:54 $
  10.  
  11.   Log entries are at the end of the file.
  12.  
  13. ***************************************************************************)
  14.  
  15. MODULE HelloWorld;
  16.  
  17. (*<*STANDARD-*>*)
  18.  
  19. IMPORT Dos;
  20.  
  21. BEGIN
  22.   IF Dos.base.PutStr ("Hello world, from Oberon-A\n") = 0 THEN END;
  23. END HelloWorld.
  24.  
  25. (***************************************************************************
  26.  
  27.   $Log: HelloWorld.mod $
  28. # Revision 1.3  1994/09/25  18:20:54  fjc
  29. # - Uses new syntax for external code declarations
  30. #
  31. # Revision 1.2  1994/06/17  17:33:11  fjc
  32. # - Updated for release
  33. #
  34. # Revision 1.1  1994/06/09  13:39:44  fjc
  35. # Initial revision
  36. #
  37.  
  38. ***************************************************************************)
  39.