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/Compiler.java | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 code/FORTRAN2C/fortran2c/Compiler.java

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

diff --git a/code/FORTRAN2C/fortran2c/Compiler.java b/code/FORTRAN2C/fortran2c/Compiler.java
new file mode 100644
index 0000000..7b124fa
--- /dev/null
+++ b/code/FORTRAN2C/fortran2c/Compiler.java
@@ -0,0 +1,28 @@
+package fortran2c;
+import fortran2c.parser.*;
+import fortran2c.lexer.*;
+import fortran2c.node.*;
+import java.io.*;
+
+public class Compiler
+{
+    public static void main(String[] args)
+    {
+        try
+        {
+            System.out.println("Using source file: " + args[0]);
+            // Create a Parser instance.
+            Parser p = new Parser(new Lexer(new PushbackReader(new InputStreamReader(new FileInputStream(args[0])), 1024)));
+            // Parse the input.
+            Start tree = p.parse();
+            // Apply the translation.
+            CWriter cWriter = new CWriter("build/out.c");
+
+            tree.apply(new Translation(cWriter));
+        }
+        catch(Exception e)
+        {
+            System.out.println(e.getMessage());
+        }
+    }
+}
\ No newline at end of file
-- 
cgit v1.2.3