[Git][cmucl/cmucl][issue-312-motif-server] Address review comments

Raymond Toy pushed to branch issue-312-motif-server at cmucl / cmucl Commits: 2eddddf4 by Raymond Toy at 2024-05-29T17:22:42-07:00 Address review comments - - - - - 1 changed file: - src/motif/server/datatrans.c Changes: ===================================== src/motif/server/datatrans.c ===================================== @@ -267,10 +267,8 @@ void message_write_color(message_t m,XColor *color,int tag) void message_write_float(message_t m,void *f,int tag) { - float *fl = (float *) f; - message_put_dblword(m,combine_type_and_data(tag,0)); - message_put_dblword(m,*fl); + message_put_dblword(m,*(long *) f); } @@ -526,8 +524,8 @@ void message_read_color(message_t m,XColor *color,int tag, int red) void message_read_float(message_t m,float *f,int tag,int data) { - fprintf(stderr,">>>>> Warning:message_read_float: Not implemented.\n"); - fflush(stderr); + long d = message_get_dblword(m); + memcpy(f, &d, sizeof(*f)); } View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/2eddddf45ba3e8a0bfeac3e8... -- This project does not include diff previews in email notifications. View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/2eddddf45ba3e8a0bfeac3e8... You're receiving this email because of your account on gitlab.common-lisp.net.
participants (1)
-
Raymond Toy (@rtoy)