01: package gnu.ecmascript; 02: 03: import gnu.mapping.*; 04: 05: class Prompter extends Procedure1 { 06: String prompt(InPort port) { 07: return "(EcmaScript:" + (port.getLineNumber() + 1) + ") "; 08: } 09: 10: public Object apply1(Object arg) { 11: return prompt((InPort) arg); 12: } 13: }