suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix mysterx for single-precision floats

Browse Source
This commit is contained in:
Matthew Flatt 2011-01-31 19:15:31 -07:00
parent 9f7ea2435e
commit fad0224259
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mysterx/htmlutil.cxx
View File

@ -1061,7 +1061,7 @@ Scheme_Object *fun_name(int argc,Scheme_Object **argv) { \
GUARANTEE_ELEMENT (scm_name, 0); \
GUARANTEE_TYPE (scm_name, 1, SCHEME_FLTP, "float"); \
pIHTMLStyle = styleInterfaceFromElement(argv[0]); \
hr = pIHTMLStyle->dhtml_name(SCHEME_FLT_VAL(argv[1]); \
hr = pIHTMLStyle->dhtml_name(SCHEME_FLT_VAL(argv[1])); \
pIHTMLStyle->Release(); \
if (FAILED(hr)) { \
scheme_signal_error(#dhtml_name " failed with code %X",hr); \