package kawa.standard;
import kawa.lang.*;

public class list_p extends Procedure1
{
  public kawa.standard.list_p()
  {
    super("list?");
  }

  public Object apply1 (Object arg1)
  {
    if (List.list_length (arg1) >= 0)
      return Interpreter.trueObject;
    else
      return Interpreter.falseObject;
  }
}

@@ -41,109 +41,104 @@
 *;%0A%0A
-public class list_p extends Procedure1%0A%7B%0A  public kawa.standard.list_p()%0A  %7B%0A    super(%22list?%22);%0A  %7D%0A
+/** Implement the standard Scheme function %22list?%22. */%0A%0Apublic class list_p extends Procedure1%0A%7B
 %0A  p

Remove redundant name qualification (which J++ complains about). Remove constructors. Generally remove verbosity.