libgo/runtime/go-getgoroot.c

   1 /* go-getgoroot.c -- getgoroot function for runtime package.
   2
   3    Copyright 2010 The Go Authors. All rights reserved.
   4    Use of this source code is governed by a BSD-style
   5    license that can be found in the LICENSE file.  */
   6
   7 #include <stdlib.h>
   8
   9 #include "runtime.h"
  10
  11 String getgoroot (void) __asm__ (GOSYM_PREFIX "runtime.getgoroot");
  12
  13 String
  14 getgoroot ()
  15 {
  16   const char *p;
  17   String ret;
  18
  19   p = getenv ("GOROOT");
  20   ret.str = (const byte *) p;
  21   if (ret.str == NULL)
  22     ret.len = 0;
  23   else
  24     ret.len = __builtin_strlen (p);
  25   return ret;
  26 }