Changeset 3ac5fd8 for tests/.in

Timestamp:

Aug 17, 2024, 3:15:21 PM (3 months ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

df2e00f

Parents:

afb15cf

Message:

first attempt changing end-of-file to an exception

File:

• tests/.in/copyfile.txt (modified) (3 diffs)

tests/.in/copyfile.txt

@@ -10 +10 @@
 // Created On       : Fri Jun 19 13:44:05 2020
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Mon Jun  5 21:20:07 2023
-// Update Count     : 5
+// Last Modified On : Sat Aug 17 14:18:47 2024
+// Update Count     : 11
 // 
 
@@ -22 +22 @@
 
         try {
-                choose ( argc ) {
-                  case 2, 3:
+                choose ( argc ) {                                                               // terminate if command-line errors
+                  case 3, 2:
                         open( in, argv[1] );                                            // open input file first as output creates file
                         if ( argc == 3 ) open( out, argv[2] );          // do not create output unless input opens
                   case 1: ;                                                                             // use default files
-                  default:
+                  default:                                                                              // wrong number of options
                         exit | "Usage" | argv[0] | "[ input-file (default stdin) [ output-file (default stdout) ] ]";
                 } // choose
@@ -41 +41 @@
 
         char ch;
-        for () {                                                                                        // read all characters
-                in | ch;
-          if ( eof( in ) ) break;                                                       // eof ?
-                out | ch;
-        } //for
+        try {
+                for () {                                                                                // read all characters
+                        in | ch;
+                        out | ch;
+                } // for
+        } catch( end_of_file * ) {
+        } // try
 } // main
-
-// Local Variables: //
-// tab-width: 4 //
-// compile-command: "cfa copyfile.cfa" //
-// End: //