aboutsummaryrefslogtreecommitdiffstats
path: root/lib/dtrace/examples/function-calls.systemtap
diff options
context:
space:
mode:
Diffstat (limited to 'lib/dtrace/examples/function-calls.systemtap')
-rw-r--r--lib/dtrace/examples/function-calls.systemtap61
1 files changed, 0 insertions, 61 deletions
diff --git a/lib/dtrace/examples/function-calls.systemtap b/lib/dtrace/examples/function-calls.systemtap
deleted file mode 100644
index 8fc4375135..0000000000
--- a/lib/dtrace/examples/function-calls.systemtap
+++ /dev/null
@@ -1,61 +0,0 @@
-/*
- * %CopyrightBegin%
- *
- * Copyright Scott Lystig Fritchie and Andreas Schultz, 2011. All Rights Reserved.
- *
- * The contents of this file are subject to the Erlang Public License,
- * Version 1.1, (the "License"); you may not use this file except in
- * compliance with the License. You should have received a copy of the
- * Erlang Public License along with this software. If not, it can be
- * retrieved online at http://www.erlang.org/.
- *
- * Software distributed under the License is distributed on an "AS IS"
- * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
- * the License for the specific language governing rights and limitations
- * under the License.
- *
- * %CopyrightEnd%
- */
-/*
- * Note: This file assumes that you're using the non-SMP-enabled Erlang
- * virtual machine, "beam". The SMP-enabled VM is called "beam.smp".
- * Note that other variations of the virtual machine also have
- * different names, e.g. the debug build of the SMP-enabled VM
- * is "beam.debug.smp".
- *
- * To use a different virtual machine, replace each instance of
- * "beam" with "beam.smp" or the VM name appropriate to your
- * environment.
- */
-
-probe process("beam").mark("function-entry")
-{
- printf("pid %s enter %s depth %d\n",
- user_string($arg1), user_string($arg2), $arg3);
-}
-
-probe process("beam").mark("function-return")
-{
- printf("pid %s return %s depth %d\n",
- user_string($arg1), user_string($arg2), $arg3);
-}
-
-probe process("beam").mark("bif-entry")
-{
- printf("pid %s BIF entry mfa %s\n", user_string($arg1), user_string($arg2));
-}
-
-probe process("beam").mark("bif-return")
-{
- printf("pid %s BIF return mfa %s\n", user_string($arg1), user_string($arg2));
-}
-
-probe process("beam").mark("nif-entry")
-{
- printf("pid %s NIF entry mfa %s\n", user_string($arg1), user_string($arg2));
-}
-
-probe process("beam").mark("nif-return")
-{
- printf("pid %s NIF return mfa %s\n", user_string($arg1), user_string($arg2));
-}