diff --git a/src/program.c b/src/program.c
index 7e6288268c75087cb34efe8551a1c3da5471ab25..3ed1c485e8d074a9f7050be1ed7589a9d707a2fd 100644
--- a/src/program.c
+++ b/src/program.c
@@ -2,11 +2,11 @@
 || This file is part of Pike. For copyright information see COPYRIGHT.
 || Pike is distributed under GPL, LGPL and MPL. See the file COPYING
 || for more information.
-|| $Id: program.c,v 1.456 2002/11/14 14:48:54 grubba Exp $
+|| $Id: program.c,v 1.457 2002/11/17 15:31:20 grubba Exp $
 */
 
 #include "global.h"
-RCSID("$Id: program.c,v 1.456 2002/11/14 14:48:54 grubba Exp $");
+RCSID("$Id: program.c,v 1.457 2002/11/17 15:31:20 grubba Exp $");
 #include "program.h"
 #include "object.h"
 #include "dynamic_buffer.h"
@@ -975,6 +975,11 @@ static struct node_s *index_modules(struct pike_string *ident,
   return 0;
 }
 
+/*! @decl constant UNDEFINED
+ *!
+ *! The undefined value; ie a zero for which @[zero_type()] returns 1.
+ */
+
 struct node_s *resolve_identifier(struct pike_string *ident);
 
 struct node_s *find_module_identifier(struct pike_string *ident,
@@ -1103,6 +1108,22 @@ struct node_s *resolve_identifier(struct pike_string *ident)
   return 0;
 }
 
+/*! @decl constant this
+ *!
+ *! Builtin constant that evaluates to the current object.
+ *!
+ *! @seealso
+ *!   @[this_program], @[this_object()]
+ */
+
+/*! @decl constant this_program
+ *!
+ *! Builtin constant that evaluates to the current program.
+ *!
+ *! @seealso
+ *!   @[this], @[this_object()]
+ */
+
 /* If the identifier is recognized as one of the magic identifiers,
  * like "this", "this_program" or "`->" when preceded by ::, then a
  * suitable node is returned, NULL otherwise. inherit_num is -1 when