| WritersLight-weight text output file writers. 
|  |  | type Writer |  |  |  | Light-weight text output file writer.
File access.
Behaviour. |  |  
|  |  | type Writer_Access |  |  |  | Type for class-wide instance variables. |  |  Internal initialization and finalization
|  |  | procedure Initialize |  |  |  | Initialize a newly created writer instance. |  |  |  |  
|  |  | procedure Initialize |  |  |  | Initialize a newly created writer instance with a file to write. |  |  |  |  
|  |  | procedure Finalize |  |  |  | Close the output file. |  |  |  |  Creating writers
|  |  | function Current_Output |  |  |  | Create a writer for current output (stdout). |  |  |  |  
|  |  | function Create |  |  |  | Create a writer for file output. |  |  |  |  
|  |  | procedure Close |  |  |  | Close a writer's output file. |  |  | 
| Param | Type | Description | 
|---|
 | | in out This | Writer_Access | 
 |  |  Error handling
|  |  | procedure Unknown_Tag_Error |  |  |  | Writing this tagged object is not implemented. Print an error
message and raise Program_Error. |  |  |  |  Wrappers for file output
|  |  | procedure Put |  |  |  | Output a character to the file. |  |  |  |  
|  |  | procedure Put |  |  |  | Output a string to the file. |  |  |  |  
|  |  | procedure Put_Line |  |  |  | Output a string to the file, followed by a newline. |  |  |  |  
|  |  | procedure New_Line |  |  |  | Output a newline to the file. |  |  |  |  Writing
|  |  | procedure Write_Whitespace |  |  |  | Write whitespace. |  |  |  |  
|  |  | procedure Write_Word |  |  |  | Write a word. |  |  |  |  
|  |  | procedure Write_String |  |  |  | Write a string plus quotes. |  |  |  |  |