1 files changed, 51 insertions, 0 deletions
diff --git a/libgo/runtime/go-caller.c b/libgo/runtime/go-caller.c
new file mode 100644
index 000000000..b18759f2f
--- /dev/null
+++ b/libgo/runtime/go-caller.c
@@ -0,0 +1,51 @@
+/* go-caller.c -- runtime.Caller and runtime.FuncForPC for Go.
+
+   Copyright 2009 The Go Authors. All rights reserved.
+   Use of this source code is governed by a BSD-style
+   license that can be found in the LICENSE file.  */
+
+/* Implement runtime.Caller.  */
+
+#include <stdint.h>
+
+#include "go-string.h"
+
+/* The values returned by runtime.Caller.  */
+
+struct caller_ret
+{
+  uintptr_t pc;
+  struct __go_string file;
+  int line;
+  _Bool ok;
+};
+
+/* Implement runtime.Caller.  */
+
+struct caller_ret Caller (int n) asm ("libgo_runtime.runtime.Caller");
+
+struct caller_ret
+Caller (int n __attribute__ ((unused)))
+{
+  struct caller_ret ret;
+
+  /* A proper implementation needs to dig through the debugging
+     information.  */
+  ret.pc = (uint64_t) (uintptr_t) __builtin_return_address (0);
+  ret.file.__data = NULL;
+  ret.file.__length = 0;
+  ret.line = 0;
+  ret.ok = 0;
+
+  return ret;
+}
+
+/* Implement runtime.FuncForPC.  */
+
+void *FuncForPC (uintptr_t) asm ("libgo_runtime.runtime.FuncForPC");
+
+void *
+FuncForPC(uintptr_t pc __attribute__ ((unused)))
+{
+  return NULL;
+}