Added core ALGOL_60 language keyword mapping

2025-01-07 23:12:28 +01:00 · 2025-01-07 23:12:28 +01:00 · f08d72d757
parent bb8066e58c
commit f08d72d757
19 changed files with 56 additions and 25 deletions
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashA.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashA.java
@ -48,7 +48,7 @@ public enum FCDotCLK1KDashA implements FCDotCLKSourceCakePoints {
 	ALIAS(FCDotCLKSource.VHDL),
 	ALL(FCDotCLKSource.VHDL),
 	ARCHITECTURE(FCDotCLKSource.VHDL),
-	ARRAY(FCDotCLKSource.VHDL),
+	ARRAY(FCDotCLKSource.VHDL, FCDotCLKSource.ALGOL_60),
 	ASSERT(FCDotCLKSource.VHDL, FCDotCLKSource.JAVA, FCDotCLKSource.PYTHON),
 	ATTRIBUTE(FCDotCLKSource.VHDL),
 	ALIGNAS(FCDotCLKSource.CPP),
@ -65,6 +65,7 @@ public enum FCDotCLK1KDashA implements FCDotCLKSourceCakePoints {
 	ASYNC(FCDotCLKSource.RUST),
 	AWAIT(FCDotCLKSource.RUST, FCDotCLKSource.ES6),
 	ARGUMENTS(FCDotCLKSource.ES6),
+	ALPHA(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashB.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashB.java
@ -36,14 +36,14 @@ public enum FCDotCLK1KDashB implements FCDotCLKSourceCakePoints {
 	BASE(FCDotCLKSource.APL.toQNameAlias("⊥")),
 	BIND(FCDotCLKSource.APL.toQNameAlias("∘")),
 	BESIDE(FCDotCLKSource.APL.toQNameAlias("∘")),
-	BEGIN(FCDotCLKSource.VHDL),
+	BEGIN(FCDotCLKSource.VHDL, FCDotCLKSource.ALGOL_60),
 	BLOCK(FCDotCLKSource.VHDL),
 	BODY(FCDotCLKSource.VHDL),
 	BUFFER(FCDotCLKSource.VHDL),
 	BUS(FCDotCLKSource.VHDL),
 	BITAND(FCDotCLKSource.CPP, FCDotCLKSource.ERLANG.toQNameAlias("band")),
 	BITOR(FCDotCLKSource.CPP, FCDotCLKSource.ERLANG.toQNameAlias("bor")),
-	BOOL(FCDotCLKSource.CPP, FCDotCLKSource.JAVA.toQNameAlias("boolean")),
+	BOOL(FCDotCLKSource.CPP, FCDotCLKSource.JAVA.toQNameAlias("boolean"), FCDotCLKSource.ALGOL_60.toQNameAlias("BOOLEAN")),
 	BREAK(FCDotCLKSource.CPP,
 			FCDotCLKSource.JAVA,
 			FCDotCLKSource.RUST,
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashC.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashC.java
@ -45,7 +45,10 @@ public enum FCDotCLK1KDashC implements FCDotCLKSourceCakePoints {
 			FCDotCLKSource.RUST.toQNameAlias("const"),
 			FCDotCLKSource.ES6.toQNameAlias("const")
 			),
-	COMMENT(FCDotCLKSource.APL.toQNameAlias("⍝"), FCDotCLKSource.VHDL.toQNameAlias("rem"), FCDotCLKSource.ERLANG.toQNameAlias("rem")),
+	COMMENT(FCDotCLKSource.APL.toQNameAlias("⍝"),
+			FCDotCLKSource.VHDL.toQNameAlias("rem"),
+			FCDotCLKSource.ERLANG.toQNameAlias("rem"),
+			FCDotCLKSource.ALGOL_60),
 	COMMENT_BLOCK_BEGIN(FCDotCLKSource.APL.toQNameAlias("⟃")),
 	COMMENT_BLOCK_END(FCDotCLKSource.APL.toQNameAlias("⟄")),
 	CASE(FCDotCLKSource.VHDL,
@ -71,7 +74,8 @@ public enum FCDotCLK1KDashC implements FCDotCLKSourceCakePoints {
 			FCDotCLKSource.JAVA,
 			FCDotCLKSource.RUST,
 			FCDotCLKSource.PYTHON,
-			FCDotCLKSource.ES6),
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	CO_AWAIT(FCDotCLKSource.CPP),
 	CO_RETURN(FCDotCLKSource.CPP),
 	CO_YIELD(FCDotCLKSource.CPP),
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashD.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashD.java
@ -43,12 +43,17 @@ public enum FCDotCLK1KDashD implements FCDotCLKSourceCakePoints {
 	DECLTYPE(FCDotCLKSource.CPP),
 	DEFAULT(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
 	DELETE(FCDotCLKSource.CPP, FCDotCLKSource.PYTHON, FCDotCLKSource.ES6),
-	DO(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.RUST, FCDotCLKSource.ES6),
-	DOUBLE(FCDotCLKSource.CPP, FCDotCLKSource.JAVA),
+	DO(FCDotCLKSource.CPP,
+			FCDotCLKSource.JAVA,
+			FCDotCLKSource.RUST,
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
+	DOUBLE(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.ALGOL_60),
 	DYNAMIC_CAST(FCDotCLKSource.CPP),
 	DYNAMIC(FCDotCLKSource.RUST.toQNameAlias("dyn")),
 	DEFINE(FCDotCLKSource.PYTHON.toQNameAlias("def")),
 	DEBUGGER(FCDotCLKSource.ES6),
+	DIRECT(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashE.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashE.java
@ -47,9 +47,10 @@ public enum FCDotCLK1KDashE implements FCDotCLKSourceCakePoints {
 			FCDotCLKSource.ERLANG,
 			FCDotCLKSource.RUST,
 			FCDotCLKSource.PYTHON,
-			FCDotCLKSource.ES6),
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	ELSIF(FCDotCLKSource.VHDL, FCDotCLKSource.PYTHON.toQNameAlias("elif")),
-	END(FCDotCLKSource.VHDL, FCDotCLKSource.ERLANG),
+	END(FCDotCLKSource.VHDL, FCDotCLKSource.ERLANG, FCDotCLKSource.ALGOL_60),
 	ENTITY(FCDotCLKSource.VHDL),
 	EXIT(FCDotCLKSource.VHDL),
 	ENUM(FCDotCLKSource.CPP,
@ -63,6 +64,7 @@ public enum FCDotCLK1KDashE implements FCDotCLKSourceCakePoints {
 	EXTENDS(FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
 	EXCEPT(FCDotCLKSource.PYTHON),
 	EVAL(FCDotCLKSource.ES6),
+	EVENT(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashF.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashF.java
@ -35,7 +35,7 @@ public enum FCDotCLK1KDashF implements FCDotCLKSourceCakePoints {
 	FLOOR(FCDotCLKSource.APL.toQNameAlias("⌊")),
 	FACTORIAL(FCDotCLKSource.APL.toQNameAlias("!")),
 	FIND(FCDotCLKSource.APL.toQNameAlias("⍷")),
-	FORMAT(FCDotCLKSource.APL.toQNameAlias("⍕")),
+	FORMAT(FCDotCLKSource.APL.toQNameAlias("⍕"), FCDotCLKSource.ALGOL_60),
 	FUNCTION(FCDotCLKSource.APL.toQNameAlias("∇"),
 			FCDotCLKSource.APL.toQNameAlias("∆"),
 			FCDotCLKSource.APL.toQNameAlias("⍙"),
@ -43,18 +43,20 @@ public enum FCDotCLK1KDashF implements FCDotCLKSourceCakePoints {
 			FCDotCLKSource.ERLANG.toQNameAlias("fun"),
 			FCDotCLKSource.RUST.toQNameAlias("fn"),
 			FCDotCLKSource.ES6),
-	FILE(FCDotCLKSource.VHDL),
+	FILE(FCDotCLKSource.VHDL, FCDotCLKSource.ALGOL_60),
 	FOR(FCDotCLKSource.VHDL,
 			FCDotCLKSource.CPP,
 			FCDotCLKSource.JAVA,
 			FCDotCLKSource.RUST,
 			FCDotCLKSource.PYTHON,
-			FCDotCLKSource.ES6),
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	FALSE(FCDotCLKSource.CPP,
 			FCDotCLKSource.JAVA,
 			FCDotCLKSource.RUST,
 			FCDotCLKSource.PYTHON.toQNameAlias("False"),
-			FCDotCLKSource.ES6),
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	FLOAT(FCDotCLKSource.CPP, FCDotCLKSource.JAVA),
 	FRIEND(FCDotCLKSource.CPP),
 	FINAL(FCDotCLKSource.JAVA, FCDotCLKSource.RUST),
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashG.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashG.java
@ -42,6 +42,7 @@ public enum FCDotCLK1KDashG implements FCDotCLKSourceCakePoints {
 	GROUP(FCDotCLKSource.VHDL),
 	GUARDED(FCDotCLKSource.VHDL),
 	GLOBAL(FCDotCLKSource.PYTHON),
+	GO(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashI.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashI.java
@ -45,14 +45,15 @@ public enum FCDotCLK1KDashI implements FCDotCLKSourceCakePoints {
 			FCDotCLKSource.ERLANG,
 			FCDotCLKSource.RUST,
 			FCDotCLKSource.PYTHON,
-			FCDotCLKSource.ES6),
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	IMPURE(FCDotCLKSource.VHDL),
 	IN(FCDotCLKSource.VHDL, FCDotCLKSource.RUST, FCDotCLKSource.PYTHON, FCDotCLKSource.ES6),
 	INERTIAL(FCDotCLKSource.VHDL),
 	INOUT(FCDotCLKSource.VHDL),
 	IS(FCDotCLKSource.VHDL, FCDotCLKSource.PYTHON),
 	INLINE(FCDotCLKSource.CPP),
-	INT(FCDotCLKSource.CPP, FCDotCLKSource.JAVA),
+	INT(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.ALGOL_60.toQNameAlias("INTEGER")),
 	IMPLEMENTS(FCDotCLKSource.JAVA, FCDotCLKSource.RUST.toQNameAlias("impl"), FCDotCLKSource.ES6),
 	IMPORT(FCDotCLKSource.JAVA, FCDotCLKSource.PYTHON, FCDotCLKSource.ES6),
 	INSTANCEOF(FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashL.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashL.java
@ -37,14 +37,15 @@ public enum FCDotCLK1KDashL implements FCDotCLKSourceCakePoints {
 	LESS(FCDotCLKSource.APL.toQNameAlias("<")),
 	LESS_OR_EQUAL(FCDotCLKSource.APL.toQNameAlias("≤")),
 	LEFT(FCDotCLKSource.APL.toQNameAlias("⊣")),
-	LABEL(FCDotCLKSource.VHDL),
+	LABEL(FCDotCLKSource.VHDL, FCDotCLKSource.ALGOL_60),
 	LIBRARY(FCDotCLKSource.VHDL),
 	LINKAGE(FCDotCLKSource.VHDL),
 	LITERAL(FCDotCLKSource.VHDL),
 	LOOP(FCDotCLKSource.VHDL, FCDotCLKSource.RUST),
-	LONG(FCDotCLKSource.CPP, FCDotCLKSource.JAVA),
+	LONG(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.ALGOL_60),
 	LET(FCDotCLKSource.ERLANG, FCDotCLKSource.RUST, FCDotCLKSource.ES6),
 	LAMBDA(FCDotCLKSource.PYTHON),
+	LIST(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashO.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashO.java
@ -48,6 +48,7 @@ public enum FCDotCLK1KDashO implements FCDotCLKSourceCakePoints {
 	OR_EQ(FCDotCLKSource.CPP),
 	ORELSE(FCDotCLKSource.ERLANG),
 	OVERRIDE(FCDotCLKSource.RUST),
+	OWN(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashP.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashP.java
@ -39,13 +39,14 @@ public enum FCDotCLK1KDashP implements FCDotCLKSourceCakePoints {
 	PACKAGE(FCDotCLKSource.VHDL, FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
 	PORT(FCDotCLKSource.VHDL),
 	POSTPONED(FCDotCLKSource.VHDL),
-	PROCEDURE(FCDotCLKSource.VHDL),
+	PROCEDURE(FCDotCLKSource.VHDL, FCDotCLKSource.ALGOL_60),
 	PROCESS(FCDotCLKSource.VHDL),
 	PURE(FCDotCLKSource.VHDL),
 	PRIVATE(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.RUST.toQNameAlias("priv"), FCDotCLKSource.ES6),
 	PROTECTED(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
 	PUBLIC(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.RUST.toQNameAlias("pub"), FCDotCLKSource.ES6),
 	PASS(FCDotCLKSource.PYTHON),
+	POINTER(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashR.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashR.java
@ -67,6 +67,7 @@ public enum FCDotCLK1KDashR implements FCDotCLKSourceCakePoints {
 	RECEIVE(FCDotCLKSource.ERLANG),
 	REF(FCDotCLKSource.RUST),
 	RAISE(FCDotCLKSource.PYTHON),
+	REAL(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashS.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashS.java
@ -56,12 +56,16 @@ public enum FCDotCLK1KDashS implements FCDotCLKSourceCakePoints {
 	STATIC_ASSERT(FCDotCLKSource.CPP),
 	STATIC_CAST(FCDotCLKSource.CPP),
 	STRUCT(FCDotCLKSource.CPP, FCDotCLKSource.RUST),
-	SWITCH(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
+	SWITCH(FCDotCLKSource.CPP,
+			FCDotCLKSource.JAVA,
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	SYNCHRONIZED(FCDotCLKSource.CPP, FCDotCLKSource.JAVA),
 	STRICTFP(FCDotCLKSource.JAVA),
 	SUPER(FCDotCLKSource.JAVA, FCDotCLKSource.RUST, FCDotCLKSource.ES6),
 	STATIC_LIFE(FCDotCLKSource.RUST.toQNameAlias("'static")),
 	SAFE(FCDotCLKSource.RUST),
+	STEP(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashT.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashT.java
@ -37,7 +37,7 @@ public enum FCDotCLK1KDashT implements FCDotCLKSourceCakePoints {
 	TRANSPOSE(FCDotCLKSource.APL.toQNameAlias("⍉")),
 	TAKE(FCDotCLKSource.APL.toQNameAlias("↑")),
 	TALLY(FCDotCLKSource.APL.toQNameAlias("≢")),
-	THEN(FCDotCLKSource.VHDL),
+	THEN(FCDotCLKSource.VHDL, FCDotCLKSource.ALGOL_60),
 	TO(FCDotCLKSource.VHDL),
 	TRANSPORT(FCDotCLKSource.VHDL),
 	TYPE(FCDotCLKSource.VHDL, FCDotCLKSource.RUST),
@ -55,7 +55,8 @@ public enum FCDotCLK1KDashT implements FCDotCLKSourceCakePoints {
 			FCDotCLKSource.JAVA,
 			FCDotCLKSource.RUST,
 			FCDotCLKSource.PYTHON.toQNameAlias("True"),
-			FCDotCLKSource.ES6),
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	TRY(FCDotCLKSource.CPP,
 			FCDotCLKSource.JAVA,
 			FCDotCLKSource.ERLANG,
@ -69,6 +70,7 @@ public enum FCDotCLK1KDashT implements FCDotCLKSourceCakePoints {
 	TRANSIENT(FCDotCLKSource.JAVA),
 	TRAIT(FCDotCLKSource.RUST),
 	TYPEOF(FCDotCLKSource.RUST, FCDotCLKSource.ES6),
+	TASK(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashU.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashU.java
@ -37,7 +37,7 @@ public enum FCDotCLK1KDashU implements FCDotCLKSourceCakePoints {
 	UNION(FCDotCLKSource.APL.toQNameAlias("∪"), FCDotCLKSource.CPP, FCDotCLKSource.RUST),
 	UNAFFECTED(FCDotCLKSource.VHDL),
 	UNITS(FCDotCLKSource.VHDL),
-	UNTIL(FCDotCLKSource.VHDL),
+	UNTIL(FCDotCLKSource.VHDL, FCDotCLKSource.ALGOL_60),
 	USE(FCDotCLKSource.VHDL, FCDotCLKSource.RUST),
 	UNSIGNED(FCDotCLKSource.CPP),
 	USING(FCDotCLKSource.CPP),
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashV.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashV.java
@ -33,11 +33,13 @@ import org.x4o.o2o.fc18.FourCornerDotCake;
 public enum FCDotCLK1KDashV implements FCDotCLKSourceCakePoints {
 	
 	VARIANT(FCDotCLKSource.APL.toQNameAlias("⍠")),
-	VARIABLE(FCDotCLKSource.VHDL),
+	VARIABLE(FCDotCLKSource.VHDL,
+			FCDotCLKSource.JAVA.toQNameAlias("var"),
+			FCDotCLKSource.ES6.toQNameAlias("var")),
 	VIRTUAL(FCDotCLKSource.CPP, FCDotCLKSource.RUST),
 	VOID(FCDotCLKSource.CPP, FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
 	VOLATILE(FCDotCLKSource.CPP, FCDotCLKSource.JAVA),
-	VAR(FCDotCLKSource.JAVA, FCDotCLKSource.ES6),
+	VALUE(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups; 
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashW.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashW.java
@ -43,7 +43,8 @@ public enum FCDotCLK1KDashW implements FCDotCLKSourceCakePoints {
 			FCDotCLKSource.JAVA,
 			FCDotCLKSource.RUST,
 			FCDotCLKSource.PYTHON,
-			FCDotCLKSource.ES6),
+			FCDotCLKSource.ES6,
+			FCDotCLKSource.ALGOL_60),
 	WITH(FCDotCLKSource.VHDL, FCDotCLKSource.PYTHON, FCDotCLKSource.ES6),
 	WCHAR_T(FCDotCLKSource.CPP),
 	;
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashZ.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLK1KDashZ.java
@ -32,6 +32,7 @@ import org.x4o.o2o.fc18.FourCornerDotCake;
 */
 public enum FCDotCLK1KDashZ implements FCDotCLKSourceCakePoints {
 	
+	ZIP(FCDotCLKSource.ALGOL_60),
 	;
 	
 	final private FCDotCLKSourceLookup[] lookups;
--- a/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLKSource.java
+++ b/nx01-x4o-o2o/src/main/java/org/x4o/o2o/fc18/clk1k/FCDotCLKSource.java
@ -40,6 +40,7 @@ public enum FCDotCLKSource implements FCDotCLKSourceLookup {
 	RUST,
 	PYTHON,
 	ES6,
+	ALGOL_60
 	//BASIC,
 	//BASIC_MSX, // = disk-basic + msx stuff
 	//BASIC_MPI, // MPI-2 for BASIC