⟦c8479f3d4⟧

E3 Source Code



package body Help_Text is

    function Define return String is

    begin
        return  
           "-# identifier type value.  " &
              "Define an identifier of a specified type and value. " &
              "See Chapter ," & "VADS ADA PREPROCESSOR REFERENCE.";
    end Define;


    function Error_Output return String is
    begin
        return  
           "-E, " & "-E file, " & "-E directory.  " &
              "Without a file or directory argument, ada processes error " &
              "messages using a.error and directs a brief output to " &
              "standard output; the raw error messages are left in " &
              "ada_source.err.  If a file pathname is given, the raw " &
              "error messages are placed in that file. If a directory " &
              "argument is supplied, the raw error output is placed in " &
              "dir/source.err.  The file of raw error messages can be used " &
              "as input to a.error.";
    end Error_Output;


    function Error_Listing return String is
    begin
        return  
           "-El, " & "-El file, " & "-El directory.  " &
              "Same as the -E option, except that source listing " &
              "with errors is produced.";  
    end Error_Listing;


    function Main return String is
    begin
        return  
           "-M unit_name, -M source_file.  " & "-M unit name -- " &
              "produces an executable program by linking the named unit " &
              "as the main program. unit_name must already be compiled. " &
              "It must be either a parameterless procedure or a " &
              "parameterless function returning an integer.  The " &
              "executable program will be named a.out " &
              "unless overridden with the -o option.  " &

              "-M source_file -- " &
              "produces an executable program by compiling and linking " &
              "source_file. The main unit of the program is assumed to " &
              "be the root name of the .a file (for foo.a the unit is " &
              "foo). Only one .a file may be preceded by -M. The " &
              "executable program will be named " &
              "a.out unless overridden with the -o option.";
    end Main;


    function Output return String is
    begin
        return  
           "-o executable_file.  " &
              "(output) This option is to be used in conjunction with " &
              "the -M option. executable_file is the name of the " &
              "executable rather than the default a.out.";
    end Output;


    function Optimize return String is
    begin
        return  
           "-O[0-9].  (optimize) Invoke the code optimizer (OPTIM3). An " &
              "optional digit (there is no space before the digit) provides " &
              "the level of optimization. The default is -O4.  " &
              "The user will supply a string with the correct " &
              "optimization switch " &
              "in the range O0 - O9.  When the null string is specified " &
              "the default is used by the compiler (O4).";
    end Optimize;


    function Preprocess return String is
    begin
        return  
           "-P  " & "Invoke the Ada Preprocessor. See Chapter , VADS ADA " &
              "PREPROCESSOR REFERENCE.";
    end Preprocess;


    function Suppress return String is
    begin
        return  
           "-S  " &
              "(suppress) Apply pragma SUPPRESS to the entire compilation " &
              "for all suppressible checks. (See also pragma " &
              "SUPPRESS(ALL_CHECKS))";
    end Suppress;


    function Show_Tool return String is
    begin
        return  
           "-sh  " & "(show) Display the name of the tool executable but do " &
              "not execute it.";
    end Show_Tool;


    function Timing return String is
    begin
        return  
           "-T  " & "(timing) Print timing information for the compilation.";
    end Timing;


    function Verbose return String is
    begin
        return  
           "-v  " & "(verbose) Print compiler version number, date and time " &
              "of compilation, name of file compiled, command input line, " &
              "total compilation time, and error summary line. Storage " &
              "usage information about the object file is provided. With " &
              "OPTIM3 the output format of compression (the size of " &
              "optimized instructions) is as a percentage of input " &
              "(unoptimized instructions).";
    end Verbose;


    function Warning return String is
    begin
        return  
           "-w (warnings) Suppress warning diagnostics.";
    end Warning;


    function Other_Compiler_Options return String is
    begin
        return  
           "Use this switch to add an option to the command line not " &
              "defined by one of the other compiler switches.  " &
              "The string value of this switch will be added to the ada " &
              "command line before the file name being compiled.";
    end Other_Compiler_Options;


    function Other_Linker_Options return String is
    begin
        return  
           "Use this switch to add an option to the a.ld link command.  " &
              "The string value of this switch will be added to the a.ld " &
              "command line before the file name being linked.";
    end Other_Linker_Options;

    function Remote_Parent_Library return String is
    begin
        return "Use this switch to specify the name of the program" &
                  "library on the remote host that corresponds to the " &
                  "parent of the library being created.";
    end Remote_Parent_Library;
end Help_Text;
DataMuseum.dk

Rational R1000/400

⟦c8479f3d4⟧ Ada Source

Derivation

E3 Source Code

E3 Meta Data
