Fix function arguments to match euslisp update (euslisp/EusLisp@e89411b)

[nakane11]

I encountered a build failure when compiling the roseus package against a version of euslisp built from source following README.

/home/leus/ros/irt/src/jsk-ros-pkg/jsk_roseus/roseus/roseus.cpp: In function ‘void register_roseus()’:
/home/leus/ros/irt/src/jsk-ros-pkg/jsk_roseus/roseus/roseus.cpp:95:44: error: invalid conversion from ‘cell* (*)()’ to ‘cell* (*)(context*, int, cell**)’ [-fpermissive]
   95 |     return add_module_initializer(modname, (pointer (*)())___roseus);}
      |                                            ^~~~~~~~~~~~~~~~~~~~~~~~
      |                                            |
      |                                            cell* (*)()

The cause appears to be related to upstream changes made to lisp/c/eus_proto.h in commit euslisp/EusLisp@e89411b.

This pull request should resolve the issue.

[mqcmd196]

@nakane11 It seems that euslisp/EusLisp@e89411b breaks userspace so I think it's a good idea to send the patch to the upstream to keep the original header definition.