lets see if this works

Triangle.AbstractMachine.Disassembler/build.gradle

@@ -1,7 +1,7 @@
 apply plugin: 'java'
 apply plugin: 'application'
 
-sourceCompatibility = 11
+sourceCompatibility = 17
 
 dependencies {
 	implementation project(':Triangle.AbstractMachine')

Triangle.AbstractMachine.Interpreter/build.gradle

@@ -1,7 +1,7 @@
 apply plugin: 'java'
 apply plugin: 'application'
 
-sourceCompatibility = 11
+sourceCompatibility = 17
 
 dependencies {
 	implementation project(':Triangle.AbstractMachine')

Triangle.AbstractMachine/build.gradle

@@ -1,4 +1,4 @@
 apply plugin: 'java-library'
 apply plugin: 'eclipse'
 
-sourceCompatibility = 11
+sourceCompatibility = 17

Triangle.Compiler/build.gradle

@@ -1,21 +1,12 @@
 apply plugin: 'java'
 apply plugin: 'application'
 
-sourceCompatibility = 11
-
-repositories {
-    mavenCentral()
-}
-
+sourceCompatibility = 17
 
 dependencies {
 	implementation project(':Triangle.AbstractMachine')
-	testImplementation group: 'junit', name: 'junit', version: '4.13.2'
 }
 
 application {
 	mainClass = 'Triangle.Compiler'
 }
-
-// allow access to programs for unit tests
-sourceSets.test.resources.srcDir file("$rootDir/programs")

Triangle.Compiler/src/main/java/triangle/Compiler.java

@@ -34,8 +34,6 @@ public class Compiler {
 	/** The filename for the object program, normally obj.tam. */
 	static String objectName = "obj.tam";
 
-	static boolean showTree = false;
-
 	private static Scanner scanner;
 	private static Parser parser;
 	private static Checker checker;
@@ -73,7 +71,7 @@ public class Compiler {
 		}
 
 		scanner = new Scanner(source);
-		reporter = new ErrorReporter(false);
+		reporter = new ErrorReporter();
 		parser = new Parser(scanner, reporter);
 		checker = new Checker(reporter);
 		emitter = new Emitter(reporter);
@@ -82,7 +80,7 @@ public class Compiler {
 
 		// scanner.enableDebugging();
 		theAST = parser.parseProgram(); // 1st pass
-		if (reporter.getNumErrors() == 0) {
+		if (reporter.numErrors == 0) {
 			// if (showingAST) {
 			// drawer.draw(theAST);
 			// }
@@ -91,13 +89,13 @@ public class Compiler {
 			if (showingAST) {
 				drawer.draw(theAST);
 			}
-			if (reporter.getNumErrors() == 0) {
+			if (reporter.numErrors == 0) {
 				System.out.println("Code Generation ...");
 				encoder.encodeRun(theAST, showingTable); // 3rd pass
 			}
 		}
 
-		boolean successful = (reporter.getNumErrors() == 0);
+		boolean successful = (reporter.numErrors == 0);
 		if (successful) {
 			emitter.saveObjectProgram(objectName);
 			System.out.println("Compilation was successful.");
@@ -116,29 +114,16 @@ public class Compiler {
 	public static void main(String[] args) {
 
 		if (args.length < 1) {
-			System.out.println("Usage: tc filename [-o=outputfilename] [tree]");
+			System.out.println("Usage: tc filename [tree]");
 			System.exit(1);
 		}
 
-		parseArgs(args);
-
 		String sourceName = args[0];
+		boolean tree = (args.length > 1 && args[1].equalsIgnoreCase("tree"));
+		var compiledOK = compileProgram(sourceName, objectName, tree, false);
 
-		var compiledOK = compileProgram(sourceName, objectName, showTree, false);
-
-		if (!showTree) {
+		if (!tree) {
 			System.exit(compiledOK ? 0 : 1);
 		}
 	}
-	
-	private static void parseArgs(String[] args) {
-		for (String s : args) {
-			var sl = s.toLowerCase();
-			if (sl.equals("tree")) {
-				showTree = true;
-			} else if (sl.startsWith("-o=")) {
-				objectName = s.substring(3);
-			}
-		}
-	}
 }

Triangle.Compiler/src/main/java/triangle/ErrorReporter.java

@@ -18,44 +18,25 @@ import triangle.syntacticAnalyzer.SourcePosition;
 
 public class ErrorReporter {
 
-	private int numErrors;
+	int numErrors;
 
-	private boolean throwExceptions;
-
-	/**
-	 * @param throwExceptions if true, throw exceptions (good for unit tests) otherwise write to stdout
-	 */
-	public ErrorReporter(boolean throwExceptions) {
+	ErrorReporter() {
 		numErrors = 0;
-		this.throwExceptions = throwExceptions;
 	}
 
 	public void reportError(String message, String tokenName, SourcePosition pos) {
-
-		numErrors++;
-		
-		String s = ("ERROR: ");
+		System.out.print("ERROR: ");
 
 		for (int p = 0; p < message.length(); p++)
 			if (message.charAt(p) == '%')
-				s += tokenName;
+				System.out.print(tokenName);
 			else
-				s += message.charAt(p);
-		s += (" " + pos.start + ".." + pos.finish);
-		
-		if (throwExceptions) {
-			throw new RuntimeException(s);
-		} else {
-			System.out.println(s);
-		}
-		
+				System.out.print(message.charAt(p));
+		System.out.println(" " + pos.start + ".." + pos.finish);
+		numErrors++;
 	}
 
 	public void reportRestriction(String message) {
 		System.out.println("RESTRICTION: " + message);
 	}
-	
-	public int getNumErrors() {
-		return numErrors;
-	}
 }

Triangle.Compiler/src/main/java/triangle/abstractSyntaxTrees/formals/ConstFormalParameter.java

@@ -39,8 +39,8 @@ public class ConstFormalParameter extends FormalParameter implements ConstantDec
 
 	@Override
 	public boolean equals(Object fpAST) {
-		if (fpAST instanceof ConstFormalParameter) {
-			return T.equals(((ConstFormalParameter)fpAST).T);
+		if (fpAST instanceof ConstFormalParameter cfpAST) {
+			return T.equals(cfpAST.T);
 		} else {
 			return false;
 		}

Triangle.Compiler/src/main/java/triangle/abstractSyntaxTrees/formals/VarFormalParameter.java

@@ -39,8 +39,8 @@ public class VarFormalParameter extends FormalParameter implements VariableDecla
 
 	@Override
 	public boolean equals(Object fpAST) {
-		if (fpAST instanceof VarFormalParameter) {
-			return T.equals(((VarFormalParameter)fpAST).T);
+		if (fpAST instanceof VarFormalParameter vfpAST) {
+			return T.equals(vfpAST.T);
 		} else {
 			return false;
 		}

Triangle.Compiler/src/main/java/triangle/contextualAnalyzer/Checker.java

@@ -132,8 +132,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 	public Void visitCallCommand(CallCommand ast, Void arg) {
 		var binding = ast.I.visit(this);
 
-		if (binding instanceof ProcedureDeclaration) {
-			ProcedureDeclaration procedure = (ProcedureDeclaration)binding;
+		if (binding instanceof ProcedureDeclaration procedure) {
 			ast.APS.visit(this, procedure.getFormals());
 		} else {
 			reportUndeclaredOrError(binding, ast.I, "\"%\" is not a procedure identifier");
@@ -204,8 +203,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 		var e2Type = ast.E2.visit(this);
 		var binding = ast.O.visit(this);
 
-		if (binding instanceof BinaryOperatorDeclaration) {
-			BinaryOperatorDeclaration bbinding = (BinaryOperatorDeclaration)binding;
+		if (binding instanceof BinaryOperatorDeclaration bbinding) {
 			if (bbinding.ARG1 == StdEnvironment.anyType) {
 				// this operator must be "=" or "\="
 				checkAndReportError(e1Type.equals(e2Type), "incompatible argument types for \"%\"", ast.O, ast);
@@ -224,8 +222,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 	public TypeDenoter visitCallExpression(CallExpression ast, Void arg) {
 		var binding = ast.I.visit(this);
 
-		if (binding instanceof FunctionDeclaration) {
-			FunctionDeclaration function = (FunctionDeclaration)binding;
+		if (binding instanceof FunctionDeclaration function) {
 			ast.APS.visit(this, function.getFormals());
 			return ast.type = function.getType();
 		}
@@ -280,8 +277,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 		var eType = ast.E.visit(this);
 		var binding = ast.O.visit(this);
 
-		if (binding instanceof UnaryOperatorDeclaration) {
-			UnaryOperatorDeclaration ubinding = (UnaryOperatorDeclaration)binding;
+		if (binding instanceof UnaryOperatorDeclaration ubinding) {
 			checkAndReportError(eType.equals(ubinding.ARG), "wrong argument type for \"%\"", ast.O);
 			return ast.type = ubinding.RES;
 		}
@@ -476,9 +472,8 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 	@Override
 	public Void visitConstActualParameter(ConstActualParameter ast, FormalParameter arg) {
 		var eType = ast.E.visit(this);
-		if (arg instanceof ConstFormalParameter) {
-			ConstFormalParameter param = (ConstFormalParameter)arg;
-			checkAndReportError(eType.equals(((ConstFormalParameter)arg).T), "wrong type for const actual parameter", ast.E);
+		if (arg instanceof ConstFormalParameter param) {
+			checkAndReportError(eType.equals(param.T), "wrong type for const actual parameter", ast.E);
 		} else {
 			reportError("const actual parameter not expected here", ast);
 		}
@@ -488,12 +483,10 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 	@Override
 	public Void visitFuncActualParameter(FuncActualParameter ast, FormalParameter arg) {
 		var binding = ast.I.visit(this);
-		if (binding instanceof FunctionDeclaration) {
-			FunctionDeclaration function = (FunctionDeclaration)binding;
+		if (binding instanceof FunctionDeclaration function) {
 			var formals = function.getFormals();
 			var functionType = function.getType();
-			if (arg instanceof FuncFormalParameter) {
-				FuncFormalParameter param = (FuncFormalParameter)arg;
+			if (arg instanceof FuncFormalParameter param) {
 				if (!formals.equals(param.getFormals())) {
 					reportError("wrong signature for function \"%\"", ast.I);
 				} else if (!functionType.equals(param.T)) {
@@ -511,11 +504,9 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 	@Override
 	public Void visitProcActualParameter(ProcActualParameter ast, FormalParameter arg) {
 		var binding = ast.I.visit(this);
-		if (binding instanceof ProcedureDeclaration) {
-			ProcedureDeclaration procedure = (ProcedureDeclaration)binding;
+		if (binding instanceof ProcedureDeclaration procedure) {
 			var formals = procedure.getFormals();
-			if (arg instanceof ProcFormalParameter) {
-				ProcFormalParameter param = (ProcFormalParameter)arg;
+			if (arg instanceof ProcFormalParameter param) {
 				checkAndReportError(formals.equals(param.getFormals()), "wrong signature for procedure \"%\"", ast.I);
 			} else {
 				reportError("proc actual parameter not expected here", ast);
@@ -531,8 +522,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 		var vType = ast.V.visit(this);
 		if (!ast.V.variable) {
 			reportError("actual parameter is not a variable", ast.V);
-		} else if (arg instanceof VarFormalParameter) {
-			VarFormalParameter parameter = (VarFormalParameter)arg;
+		} else if (arg instanceof VarFormalParameter parameter) {
 			checkAndReportError(vType.equals(parameter.T), "wrong type for var actual parameter", ast.V);
 		} else {
 			reportError("var actual parameter not expected here", ast.V);
@@ -548,8 +538,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 
 	@Override
 	public Void visitMultipleActualParameterSequence(MultipleActualParameterSequence ast, FormalParameterSequence arg) {
-		if (arg instanceof MultipleFormalParameterSequence) {
-			MultipleFormalParameterSequence formals = (MultipleFormalParameterSequence)arg;
+		if (arg instanceof MultipleFormalParameterSequence formals) {
 			ast.AP.visit(this, formals.FP);
 			ast.APS.visit(this, formals.FPS);
 		} else {
@@ -560,8 +549,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 
 	@Override
 	public Void visitSingleActualParameterSequence(SingleActualParameterSequence ast, FormalParameterSequence arg) {
-		if (arg instanceof SingleFormalParameterSequence) {
-			SingleFormalParameterSequence formal = (SingleFormalParameterSequence)arg;
+		if (arg instanceof SingleFormalParameterSequence formal) {
 			ast.AP.visit(this, formal.FP);
 		} else {
 			reportError("incorrect number of actual parameters", ast);
@@ -604,8 +592,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 	@Override
 	public TypeDenoter visitSimpleTypeDenoter(SimpleTypeDenoter ast, Void arg) {
 		var binding = ast.I.visit(this);
-		if (binding instanceof TypeDeclaration) {
-			TypeDeclaration decl = (TypeDeclaration)binding;
+		if (binding instanceof TypeDeclaration decl) {
 			return decl.T;
 		}
 
@@ -692,8 +679,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 		ast.type = null;
 		var vType = ast.V.visit(this);
 		ast.variable = ast.V.variable;
-		if (vType instanceof RecordTypeDenoter) {
-			RecordTypeDenoter record = (RecordTypeDenoter)vType;
+		if (vType instanceof RecordTypeDenoter record) {
 			ast.type = checkFieldIdentifier(record.FT, ast.I);
 			checkAndReportError(ast.type != StdEnvironment.errorType, "no field \"%\" in this record type",
 					ast.I);
@@ -709,12 +695,10 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 		ast.type = StdEnvironment.errorType;
 
 		var binding = ast.I.visit(this);
-		if (binding instanceof ConstantDeclaration) {
-			ConstantDeclaration constant = (ConstantDeclaration)binding;
+		if (binding instanceof ConstantDeclaration constant) {
 			ast.variable = false;
 			return ast.type = constant.getType();
-		} else if (binding instanceof VariableDeclaration) {
-			VariableDeclaration variable = (VariableDeclaration)binding;
+		} else if (binding instanceof VariableDeclaration variable) {
 			ast.variable = true;
 			return ast.type = variable.getType();
 		}
@@ -730,8 +714,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 
 		var eType = ast.E.visit(this);
 		if (vType != StdEnvironment.errorType) {
-			if (vType instanceof ArrayTypeDenoter) {
-				ArrayTypeDenoter arrayType = (ArrayTypeDenoter)vType;
+			if (vType instanceof ArrayTypeDenoter arrayType) {
 				checkAndReportError(eType.equals(StdEnvironment.integerType), "Integer expression expected here",
 						ast.E);
 				ast.type = arrayType.T;
@@ -816,16 +799,14 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo
 	}
 
 	private static TypeDenoter checkFieldIdentifier(FieldTypeDenoter ast, Identifier I) {
-		if (ast instanceof MultipleFieldTypeDenoter) {
-			MultipleFieldTypeDenoter ft = (MultipleFieldTypeDenoter)ast;
+		if (ast instanceof MultipleFieldTypeDenoter ft) {
 			if (ft.I.spelling.compareTo(I.spelling) == 0) {
 				I.decl = ast;
 				return ft.T;
 			} else {
 				return checkFieldIdentifier(ft.FT, I);
 			}
-		} else if (ast instanceof SingleFieldTypeDenoter) {
-			SingleFieldTypeDenoter ft = (SingleFieldTypeDenoter)ast;
+		} else if (ast instanceof SingleFieldTypeDenoter ft) {
 			if (ft.I.spelling.compareTo(I.spelling) == 0) {
 				I.decl = ast;
 				return ft.T;

Triangle.Compiler/src/main/java/triangle/syntacticAnalyzer/SourceFile.java

@@ -14,36 +14,26 @@
 
 package triangle.syntacticAnalyzer;
 
-import java.net.URL;
-
 public class SourceFile {
 
 	public static final char EOL = '\n';
 	public static final char EOT = '\u0000';
 
 	java.io.File sourceFile;
-	java.io.InputStream source;
+	java.io.FileInputStream source;
 	int currentLine;
 
 	public static SourceFile ofPath(String pathname) {
 		try {
-			SourceFile sf = new SourceFile();
-			sf.sourceFile = new java.io.File(pathname);
-			sf.source = new java.io.FileInputStream(sf.sourceFile);
-			return sf;
+			return new SourceFile(pathname);
 		} catch (java.io.IOException s) {
 			return null;
 		}
 	}
 
-	public static SourceFile fromResource(String handle) {
-		SourceFile sf = new SourceFile();
-		//sf.sourceFile = new java.io.File(pathname);
-		sf.source = sf.getClass().getResourceAsStream(handle);
-		return sf;
-	}
-
-	private SourceFile() {
+	private SourceFile(String pathname) throws java.io.FileNotFoundException {
+		sourceFile = new java.io.File(pathname);
+		source = new java.io.FileInputStream(sourceFile);
 		currentLine = 1;
 	}
 

Triangle.Compiler/src/main/java/triangle/treeDrawer/Drawer.java

@@ -42,13 +42,6 @@ public class Drawer {
 
 		FontMetrics fontMetrics = frame.getFontMetrics(font);
 
-		// another class of visitor is used for drawing the tree: LayoutVisitor
-		// LayoutVisitor is passed to the AST which, in turn, calls visitProgram
-		// and then each AST node is visited. This ultimately constructs a 
-		// DrawingTree, which is structurally the same as the AST but is decorated
-		// with coordinates (and has only DrawingTree objects as nodes)
-		// Each DrawingTree object knows how to paint itself, so it's passed to a
-		// DrawerPanel and DrawerFrame for display 
 		LayoutVisitor layout = new LayoutVisitor(fontMetrics);
 		theDrawing = (DrawingTree) theAST.visit(layout, null);
 		theDrawing.position(new Point(2048, 10));

Triangle.Compiler/src/main/java/triangle/treeDrawer/Polyline.java

@@ -14,9 +14,6 @@
 
 package triangle.treeDrawer;
 
-/**
- * used to keep track of the position for components in the tree to be drawn
- */
 class Polyline {
 	int dx, dy;
 	Polyline link;

Triangle.Compiler/src/test/java/triangle/syntacticAnalyser/TestScanner.java

@@ -1,84 +0,0 @@
-package triangle.syntacticAnalyser;
-
-import static org.junit.Assert.assertEquals;
-import static org.junit.Assert.assertNotEquals;
-import static org.junit.Assert.assertThrows;
-
-import org.junit.Test;
-import org.junit.function.ThrowingRunnable;
-
-import triangle.ErrorReporter;
-import triangle.syntacticAnalyzer.Parser;
-import triangle.syntacticAnalyzer.Scanner;
-import triangle.syntacticAnalyzer.SourceFile;
-
-public class TestScanner {
-
-	@Test
-	public void testHi() {
-		compileExpectSuccess("/hi.tri");
-	}
-	
-
-	@Test
-	public void testHiNewComment() {
-		compileExpectFailure("/hi-newcomment.tri");
-	}
-	
-
-	@Test
-	public void testHiNewComment2() {
-		compileExpectFailure("/hi-newcomment2.tri");
-	}
-	
-
-	@Test
-	public void testBarDemo() {
-		compileExpectFailure("/bardemo.tri");
-	}
-	
-
-	@Test
-	public void testRepeatUntil() {
-		compileExpectFailure("/repeatuntil.tri");
-	}
-	
-	
-	
-	private void compileExpectSuccess(String filename) {
-		// build.gradle has a line sourceSets.test.resources.srcDir file("$rootDir/programs")
-		// which adds the programs directory to the list of places Java can easily find files
-		// getResource() below searches for a file, which is in /programs 
-		//SourceFile source = SourceFile.ofPath(this.getClass().getResource(filename).getFile().toString());
-		SourceFile source = SourceFile.fromResource(filename);
-		
-		Scanner scanner = new Scanner(source);
-		ErrorReporter reporter = new ErrorReporter(true);
-		Parser parser = new Parser(scanner, reporter);
-		
-		parser.parseProgram();
-		
-		// we should get to here with no exceptions
-		
-		assertEquals("Problem compiling " + filename, 0, reporter.getNumErrors());
-	}
-	
-	private void compileExpectFailure(String filename) {
-		//SourceFile source = SourceFile.ofPath(this.getClass().getResource(filename).getFile().toString());
-		SourceFile source = SourceFile.fromResource(filename);
-		Scanner scanner = new Scanner(source);
-		ErrorReporter reporter = new ErrorReporter(true);
-		Parser parser = new Parser(scanner, reporter);
-
-		// we expect an exception here as the program has invalid syntax
-		assertThrows(RuntimeException.class, new ThrowingRunnable() {
-			public void run(){
-				parser.parseProgram();
-			}
-		});
-		
-		// currently this program will fail
-		assertNotEquals("Problem compiling " + filename, 0, reporter.getNumErrors());
-	}
-
-}

build.gradle

@@ -1,11 +0,0 @@
-apply plugin: 'java'
-
-sourceCompatibility = 11
-
-subprojects.each { subproject ->
-  evaluationDependsOn(subproject.path)
-}
-
-jar {
-  from subprojects.sourceSets.main.output
-}

programs/bardemo.tri

@@ -1,15 +0,0 @@
-! this won't work until after some work in the practicals
-let
-    var a : Integer;
-    var b : Integer
-
-in
-    begin
-        a := 1;
-        b := 2;
-        
-        putint(a);
-        putint(b);
-        putint(|a);
-        putint(|b)
-    end

programs/hi-newcomment.tri

@@ -1,7 +0,0 @@
-! this won't work until after some work in the practicals
-
-# new comment
-
-begin
- put('H'); put('i'); put('!')
-end

programs/hi-newcomment2.tri

@@ -1,11 +0,0 @@
-! this won't work until after some work in the practicals
-
-# new comment
-
-$
-another new comment
-$
-
-begin
- put('H'); put('i'); put('!')
-end

programs/repeatuntil.tri

@@ -1,14 +0,0 @@
-! this won't work until after some lab work
-
-let
-  var a : Integer
-in
-begin
-  a := 0;
-  repeat
-  begin
-    put('a');
-    a := a + 1;
-  end
-  until a < 5
-end

programs/while.tri

@@ -1,11 +0,0 @@
-let
-  var a : Integer
-in
-begin
-  a := 0;
-  while a < 5 do
-  begin
-    put('a');
-    a := a + 1;
-  end
-end