Parses simple_wall. No idea if correct though

spec/btl.ast

@@ -55,6 +55,7 @@ ListName : Declaration ;
 Material : Declaration;
 OrderNumber : Declaration;
 BTLPackage : Declaration;
+ProcessIdent : Declaration;
 ProcessingQuality : Declaration;
 ProcessKey : Declaration ;
 ProcessParameters : Declaration ;

spec/btl.flex

@@ -40,7 +40,7 @@ import beaver.Scanner;
 
 WhiteSpace = [ ] | \t | \f | \n | \r | \r\n
 Identifier = [:jletter:][:jletterdigit:]*
-IntLiteral = "-"?[0-9][0-9]*
+	IntLiteral = "-"?[0-9][0-9,"-"]*
 
 	
 %state YYINITIAL
@@ -95,6 +95,7 @@ IntLiteral = "-"?[0-9][0-9]*
 	"ORDERNUMBER" { return symbol(Terminals.ORDERNUMBER); }
 	"PACKAGE" { return symbol(Terminals.PACKAGE); }
 	"PART" { return symbol(Terminals.PART); }
+	"PROCESSIDENT" { return symbol(Terminals.PROCESSIDENT); }
 	"PROCESSINGQUALITY" { return symbol(Terminals.PROCESSINGQUALITY); }
 	"PROCESSKEY" { yybegin(SPECIAL);string.setLength(0);return symbol(Terminals.PROCESSKEY); }
 	"PROCESSPARAMETERS" { yybegin(SPECIAL);string.setLength(0);return symbol(Terminals.PROCESSPARAMETERS); }

spec/btl.parser

@@ -51,6 +51,7 @@ Declaration declaration =
   | MATERIAL COLON value.v     {: return new Material(v); :}
   | ORDERNUMBER COLON value.v     {: return new OrderNumber(v); :}
   | PACKAGE COLON value.v     {: return new BTLPackage(v); :}
+  | PROCESSIDENT COLON value.v     {: return new ProcessIdent(v); :}
   | PROCESSINGQUALITY COLON value.v     {: return new ProcessingQuality(v); :}
   | PROCESSKEY  special_value.v     {: return new ProcessKey(v); :}
   | PROCESSPARAMETERS  special_value.v     {: return new ProcessParameters(v); :}