[armedbear-cvs] r12033 - trunk/abcl/src/org/armedbear/lisp

[Mark Evenson]

Author: mevenson
Date: Mon Jul  6 05:24:59 2009
New Revision: 12033

Log:
Documentation correction for Gates interface (secs. not ms.!).


Modified:
   trunk/abcl/src/org/armedbear/lisp/Gate.java

Modified: trunk/abcl/src/org/armedbear/lisp/Gate.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Gate.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Gate.java	Mon Jul  6 05:24:59 2009
@@ -1,5 +1,5 @@
 /*
- * AbstractArray.java
+ * Gate.java
  *
  * Copyright (C) 2009 Tobias Rittweiler
  * $Id$
@@ -158,7 +158,7 @@
   private static final Primitive WAIT_OPEN_GATE 
     = new Primitive("wait-open-gate", PACKAGE_EXT, true, 
 		    "gate &optional timeout",
-		    "Wait for GATE to be open with an optional TIMEOUT in ms." ) {
+		    "Wait for GATE to be open with an optional TIMEOUT in seconds." ) {
 	@Override
 	public LispObject execute(LispObject gate) 
 	  throws ConditionThrowable