hsc3-server-0.0.0: include/Accessor.h
#ifndef ACCESSOR_H_INCLUDED
#define ACCESSOR_H_INCLUDED
#define ACCESSOR(N,F,T,V) \
N :: Accessor (T) (V) ; \
N = accessor F (\x a -> a { F = x })
#endif /* ACCESSOR_H_INCLUDED */
#ifndef ACCESSOR_H_INCLUDED
#define ACCESSOR_H_INCLUDED
#define ACCESSOR(N,F,T,V) \
N :: Accessor (T) (V) ; \
N = accessor F (\x a -> a { F = x })
#endif /* ACCESSOR_H_INCLUDED */