1 files changed, 26 insertions, 0 deletions
diff --git a/libgo/runtime/go-getgoroot.c b/libgo/runtime/go-getgoroot.c
new file mode 100644
index 000000000..e74fee886
--- /dev/null
+++ b/libgo/runtime/go-getgoroot.c
@@ -0,0 +1,26 @@
+/* go-getgoroot.c -- getgoroot function for runtime package.
+
+   Copyright 2010 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.  */
+
+#include <stdlib.h>
+
+#include "go-string.h"
+
+struct __go_string getgoroot (void) asm ("libgo_runtime.runtime.getgoroot");
+
+struct __go_string
+getgoroot ()
+{
+  const char *p;
+  struct __go_string ret;
+
+  p = getenv ("GOROOT");
+  ret.__data = (const unsigned char *) p;
+  if (ret.__data == NULL)
+    ret.__length = 0;
+  else
+    ret.__length = __builtin_strlen (p);
+  return ret;
+}