1 files changed, 18 insertions, 0 deletions
diff --git a/doc/tutorial/functions.stp b/doc/tutorial/functions.stp
new file mode 100644
index 00000000..6a825722
--- /dev/null
+++ b/doc/tutorial/functions.stp
@@ -0,0 +1,18 @@
+# Red Hat convention
+function system_uid_p (u) { return u < 500 }
+
+# kernel device number assembly macro
+function makedev (major,minor) { return major << 20 | minor }
+
+function trace_common ()
+{
+  printf("%d %s(%d)", gettimeofday_s(), execname(), pid())
+  # no return value
+} 
+
+function fibonacci (i)
+{
+  if (i < 1) return 0
+  else if (i < 2) return 1
+  else return fibonacci(i-1) + fibonacci(i-2)
+}