c2hs-0.26.2: tests/bugs/issue-141/Issue141C.chs

module Main where

#include "issue141.h"

main :: IO ()
main = do
  let f = {#get _p_Vec->fieldname#}
  print "OK"