summaryrefslogtreecommitdiff
path: root/scope.c
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2004-07-31 16:21:50 +0000
committerDave Mitchell <davem@fdisolutions.com>2004-07-31 16:21:50 +0000
commit166f8a29442475f7fe0e9216f957512a793bc4ed (patch)
tree8e8ad9e187566d63a5ce23b4a3f7591a036f3d69 /scope.c
parentd75b63cf816cfa51767ad10e3bdb7a0c01242457 (diff)
downloadperl-166f8a29442475f7fe0e9216f957512a793bc4ed.tar.gz
Add comment to the top of most .c files explaining their purpose
p4raw-id: //depot/perl@23176
Diffstat (limited to 'scope.c')
-rw-r--r--scope.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/scope.c b/scope.c
index 54d0ac1755..d5b8b7fbad 100644
--- a/scope.c
+++ b/scope.c
@@ -13,6 +13,13 @@
* levels..."
*/
+/* This function contains functions to manipluate various of perl's stacks;
+ * in particular it contains code to push various types of things onto
+ * the savestack, then to pop them off and perform the correct restorative
+ * action for each one. This corresponds to the cleanup Perl does at
+ * each scope exit.
+ */
+
#include "EXTERN.h"
#define PERL_IN_SCOPE_C
#include "perl.h"