long aをchar c[4]に アンパックしたり
逆にchar c[4]をlong aにパックしたりするのに
こんなワークエリアを使ってやっているのですが，
union{
long l;
char b[4];
} work;

ワークエリアを使わずに，キャストとか使って直接代入の方法はないものでしょうか？