- SCM wireframe = scm_from_bool (0);
- SCM point_cloud = scm_from_bool (0);
- SCM gouraud_shading = scm_from_bool (1);
- SCM lighting = scm_from_bool (1);
- SCM z_write_enable = scm_from_bool (1);
- SCM backface_culling = scm_from_bool (1);
- SCM frontface_culling = scm_from_bool (0);
- SCM fog_enable = scm_from_bool (0);
- SCM normalize_normals = scm_from_bool (0);
- SCM use_mip_maps = scm_from_bool (1);
+ SCM wireframe = SCM_BOOL_F;
+ SCM point_cloud = SCM_BOOL_F;
+ SCM gouraud_shading = SCM_BOOL_T;
+ SCM lighting = SCM_BOOL_T;
+ SCM z_write_enable = SCM_BOOL_T;
+ SCM backface_culling = SCM_BOOL_T;
+ SCM frontface_culling = SCM_BOOL_F;
+ SCM fog_enable = SCM_BOOL_F;
+ SCM normalize_normals = SCM_BOOL_F;
+ SCM use_mip_maps = SCM_BOOL_T;