github.com/panjjo/go@v0.0.0-20161104043856-d62b31386338/misc/cgo/fortran/answer.f90 (about) 1 ! Copyright 2016 The Go Authors. All rights reserved. 2 ! Use of this source code is governed by a BSD-style 3 ! license that can be found in the LICENSE file. 4 5 function the_answer() result(j) bind(C) 6 use iso_c_binding, only: c_int 7 integer(c_int) :: j ! output 8 j = 42 9 end function the_answer