home *** CD-ROM | disk | FTP | other *** search
/ Programmer's ROM - The Computer Language Library / programmersrom.iso / ada / stubs / stub2.pro < prev    next >
Encoding:
Text File  |  1988-05-03  |  5.8 KB  |  127 lines
  1. -------- SIMTEL20 Ada Software Repository Prologue ------------
  2. --                                                           -*
  3. -- Unit name    : Body Stubber
  4. -- Version      : 2.0
  5. -- Author       : Joseph M. Orost
  6. --              : Concurrent Computer Corporation
  7. --              : 106 Apple St
  8. --              : Tinton Falls, NJ  07724
  9. -- DDN Address  : petsd!joe@RUTGERS.EDU
  10. -- Copyright    :
  11. -- Date created : 15 July 1983
  12. -- Release date :
  13. -- Last update  : 5 May 1987
  14. -- Machine/System Compiled/Run on : Concurrent Computer Corporation C3Ada R00-01
  15. --                                                           -*
  16. ---------------------------------------------------------------
  17. --                                                           -*
  18. -- Keywords     : 
  19. ----------------:
  20. --
  21. -- Abstract     : This program reads an Ada specification
  22. ----------------: and generates a corresponding Body with 
  23. ----------------: stubs for all subprograms.
  24. ----------------: All of the OS dependencies are contained in
  25. ----------------: the OS_DEPENDENCIES package.
  26. ----------------:
  27. ----------------: Version 1.0:
  28. ----------------: This tool was developed as a precursor for 
  29. ----------------: the WMCCS Information System (WIS).  An
  30. ----------------: executable version of the tool has been 
  31. ----------------: demonstrated.  This source code has sub-
  32. ----------------: sequently been recompiled but has not under-
  33. ----------------: gone extensive testing.
  34. ----------------:
  35. ----------------: Version 2.0:
  36. ----------------: Complete overhaul.  All non-Ansi Ada 
  37. ----------------: dependencies removed.  Bugs fixed/
  38. ----------------: Enhancements:
  39. ----------------:    Task specifications are now stubbed.
  40. ----------------:    Pragma INTERFACE now suppresses stubs.
  41. ----------------:    OUTPUT_LINE_LENGTH parameter - not
  42. ----------------:     exceeded.
  43. ----------------:    Output properly indented and aligned.
  44. ----------------:    Overwrite of output file now asks
  45. ----------------:     permission.
  46. ----------------:    Comments and declarations from spec
  47. ----------------:     included in stub.
  48. ----------------:    Spec is no longer duplicated in output.
  49. ----------------:    ID Comment is generated on "begin".
  50. ----------------:    Execution-time message now is fully
  51. ----------------:     qualified.
  52. ----------------:    Exception handler part is now a source
  53. ----------------:     parameter.
  54. ----------------:    Multiple specs in input file now works.
  55. ----------------:    Generic "with procedure" or "with
  56. ----------------:     function" now not taken as declaration 
  57. ----------------:     to be stubbed.
  58. ----------------: In addition, many code speed-ups are
  59. ----------------: included.
  60. ----------------: 
  61. ----------------: Rehosting is performed by modifying the
  62. ----------------: package OS_DEPENDENCIES: (file OSDEPxxx.ADA)
  63. ----------------:    Select the output line length.
  64. ----------------:    Select the indent amount and indent limit.
  65. ----------------:    Select the standard suffix for the
  66. ----------------:     input/output files.
  67. ----------------:    Code ADD_SUFFIX to insert the suffix into
  68. ----------------:     the filename.
  69. --                                                           -*
  70. ------------------ Revision history ---------------------------
  71. --                                                           -*
  72. -- DATE         VERSION AUTHOR                  HISTORY 
  73. -- 07/15/83     1.0     Steven E. Nameroff      Initial Release
  74. -- 05/05/87     2.0     Joseph M. Orost         Major rewrite
  75. --                                                           -*
  76. ------------------ Distribution and Copyright -----------------
  77. --                                                           -*
  78. -- This prologue must be included in all copies of this software.
  79. -- 
  80. -- This software is released to the Ada community.
  81. -- This software is released to the Public Domain (note:
  82. --   software released to the Public Domain is not subject
  83. --   to copyright protection).
  84. -- Restrictions on use or distribution:  NONE
  85. --                                                           -*
  86. ----------------- Disclaimer ----------------------------------
  87. --                                                           -*
  88. -- This software and its documentation are provided "AS IS" and
  89. -- without any expressed or implied warranties whatsoever.
  90. --
  91. -- No warranties as to performance, merchantability, or fitness
  92. -- for a particular purpose exist.
  93. --
  94. -- Because of the diversity of conditions and hardware under
  95. -- which this software may be used, no warranty of fitness for
  96. -- a particular purpose is offered.  The user is advised to 
  97. -- test the software thoroughly before relying on it.  The user
  98. -- must assume the entire risk and liability of using this 
  99. -- software.
  100. --
  101. -- In no event shall any person or organization of people be
  102. -- held responsible for any direct, indirect, consequential
  103. -- or inconsequential damages or lost profits.
  104. --                                                          -*
  105. ----------------- Known Problems -----------------------------
  106. --
  107. -- The stubber does not handle task declarations with entry
  108. -- families that are specified other than: 
  109. --         (integer_LB .. integer_UB)
  110. -- In this case, the body stub contains ACCEPT statements for
  111. -- all family members IN integer_LB .. integer_UB.
  112. --
  113. -- Entry families specified by 
  114. --         (TYPE_NAME) or 
  115. --         (TYPE_NAME'RANGE) 
  116. -- will cause a legal body to be generated, but only 1 accept
  117. -- statement (for TYPE_NAME'FIRST) is generated.  A warning
  118. -- message is produced.
  119. --
  120. -- Entry families of the form:
  121. --         (Expression .. Expression)
  122. -- causes illegal code produced in the body stub.  A warning
  123. -- message is produced.
  124. --
  125. ----------------- END-PROLOGUE -------------------------------
  126.  
  127.