From c3feacc621b275ec3fe679a79cd720fe7116bf9e Mon Sep 17 00:00:00 2001 From: paltherr Date: Wed, 16 Apr 2003 14:27:58 +0000 Subject: - Added Tuple expander and template --- sources/meta/scala/MetaTuple.java | 51 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 51 insertions(+) create mode 100644 sources/meta/scala/MetaTuple.java (limited to 'sources/meta') diff --git a/sources/meta/scala/MetaTuple.java b/sources/meta/scala/MetaTuple.java new file mode 100644 index 0000000000..93530d6698 --- /dev/null +++ b/sources/meta/scala/MetaTuple.java @@ -0,0 +1,51 @@ +/* ____ ____ ____ ____ ______ *\ +** / __// __ \/ __// __ \/ ____/ SOcos COmpiles Scala ** +** __\_ \/ /_/ / /__/ /_/ /\_ \ (c) 2002, LAMP/EPFL ** +** /_____/\____/\___/\____/____/ ** +\* */ + +// $Id$ + +package meta.scala; + +public class MetaTuple extends AbstractScalaExpander { + + //######################################################################## + // Public Fields + + public final int arity; + + //######################################################################## + // Public Constructors + + public MetaTuple(int arity) { + this.arity = arity; + } + + //######################################################################## + // Public Methods + + public String getTargetBaseName() { + return super.getTargetBaseName() + arity; + } + + public void printn() { + writer.print(arity); + } + + public void printTParams() { + for (int i = 0; i < arity; i++) { + if (i > 0) writer.print(", "); + writer.print("?A").print(i); + } + } + + public void printVParams() { + for (int i = 0; i < arity; i++) { + if (i > 0) writer.print(", "); + writer.print("_").print(i).print(" ?A").print(i); + } + } + + //######################################################################## +} -- cgit v1.2.3