gencode
  scan n-code to find FUN
  prList FUN
  eval FUN  will generate code

putcode
  put code to s-code area

eval gen
  LIT  out icLit arg
  GET  out icGet arg
  ...
  ADD  genbop icAdd, head e1, head e2

