57 	size_t scale;  in main()  local
86 	// Ensure that the scale is properly set.  in main()
87 	scale = 10;  in main()
88 	bcl_ctxt_setScale(ctxt, scale);  in main()
89 	scale = bcl_ctxt_scale(ctxt);  in main()
90 	if (scale != 10) err(BCL_ERROR_FATAL_UNKNOWN_ERR);  in main()
92 	scale = 16;  in main()
93 	bcl_ctxt_setIbase(ctxt, scale);  in main()
94 	scale = bcl_ctxt_ibase(ctxt);  in main()
95 	if (scale != 16) err(BCL_ERROR_FATAL_UNKNOWN_ERR);  in main()
98 	bcl_ctxt_setObase(ctxt, scale);  in main()
99 	scale = bcl_ctxt_obase(ctxt);  in main()
100 	if (scale != 16) err(BCL_ERROR_FATAL_UNKNOWN_ERR);  in main()
104 	scale = bcl_ctxt_ibase(ctxt);  in main()
105 	if (scale != 10) err(BCL_ERROR_FATAL_UNKNOWN_ERR);  in main()
107 	scale = bcl_ctxt_obase(ctxt);  in main()
108 	if (scale != 10) err(BCL_ERROR_FATAL_UNKNOWN_ERR);  in main()