summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-01-05 13:13:36 +0000
committerNicholas Clark <nick@ccl4.org>2008-01-05 13:13:36 +0000
commit5a51db0500cb91f11a554807ca60350bc43f0e5b (patch)
treefe51df528f6cbc453d89c1fb790694c68e15f00b /embed.fnc
parent69240efd70fee399a5232ed995c383b154000a08 (diff)
downloadperl-5a51db0500cb91f11a554807ca60350bc43f0e5b.tar.gz
Protect me (and my fellow muppets) from screens of "syntax errors" if
one accidentally feeds embed.fnc or t/op/re_tests to the perl interpreter. p4raw-id: //depot/perl@32839
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc2
1 files changed, 2 insertions, 0 deletions
diff --git a/embed.fnc b/embed.fnc
index d36e2fdc83..b11cd6efff 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1,3 +1,5 @@
+: BEGIN {die "You meant to run embed.pl"} # Stop early if fed to perl.
+:
: Lines are of the form:
: flags|return_type|function_name|arg1|arg2|...|argN
: