From 85e2726ddedd2981425c5ac07f7257bce1a6ddbf Mon Sep 17 00:00:00 2001
From: jwansek <eddie.atten.ea29@gmail.com>
Date: Mon, 1 Nov 2021 14:51:47 +0000
Subject: started work on translation to c

---
 code/FORTRAN2C/fortran2c/CWriter.java | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 code/FORTRAN2C/fortran2c/CWriter.java

(limited to 'code/FORTRAN2C/fortran2c/CWriter.java')

diff --git a/code/FORTRAN2C/fortran2c/CWriter.java b/code/FORTRAN2C/fortran2c/CWriter.java
new file mode 100644
index 0000000..fec748a
--- /dev/null
+++ b/code/FORTRAN2C/fortran2c/CWriter.java
@@ -0,0 +1,26 @@
+package fortran2c;
+
+import java.io.*;
+import java.util.HashSet;
+
+public class CWriter {
+    
+    private String filePath;
+    private File theFile;
+    private FileWriter theFileWriter;
+    private HashSet<String> functions;
+
+    public CWriter(String filePath) throws IOException {
+        this.filePath = filePath;
+        File theFile = new File(filePath);
+
+        if (theFile.createNewFile()) {
+            FileWriter theFileWriter = new FileWriter(filePath);
+            theFileWriter.write("#include <stdio.h>\n#include <stdlib.h>\n\nint main(int argc, char** argv) {\n}");
+            theFileWriter.close();
+            functions.add("main");
+        } else {
+            throw new IOException("The file already exists");
+        }
+    }
+}
-- 
cgit v1.2.3