PageRenderTime 40ms CodeModel.GetById 15ms RepoModel.GetById 0ms app.codeStats 0ms

/lib_duktape/src-separate/duk_error_misc.c

https://bitbucket.org/xixs/lua
C | 54 lines | 35 code | 9 blank | 10 comment | 1 complexity | 8313d482bd71c3526b3a1cb2c1f5446b MD5 | raw file
Possible License(s): Zlib, BSD-3-Clause, CC0-1.0, GPL-3.0, GPL-2.0, CPL-1.0, MPL-2.0-no-copyleft-exception, LGPL-2.0, LGPL-2.1, LGPL-3.0, 0BSD, Cube 
    

  1. /*
    2. 

  2.  *  Error helpers
    3. 

  3.  */
    4. 

  4. 

  5. #include "duk_internal.h"
    6. 

  6. 

  7. /*
    8. 

  8.  *  Get prototype object for an integer error code.
    9. 

  9.  */
    10. 

  10. 

  11. DUK_INTERNAL duk_hobject *duk_error_prototype_from_code(duk_hthread *thr, duk_errcode_t code) {
    12. 

  12. 	switch (code) {
    13. 

  13. 	case DUK_ERR_EVAL_ERROR:
    14. 

  14. 		return thr->builtins[DUK_BIDX_EVAL_ERROR_PROTOTYPE];
    15. 

  15. 	case DUK_ERR_RANGE_ERROR:
    16. 

  16. 		return thr->builtins[DUK_BIDX_RANGE_ERROR_PROTOTYPE];
    17. 

  17. 	case DUK_ERR_REFERENCE_ERROR:
    18. 

  18. 		return thr->builtins[DUK_BIDX_REFERENCE_ERROR_PROTOTYPE];
    19. 

  19. 	case DUK_ERR_SYNTAX_ERROR:
    20. 

  20. 		return thr->builtins[DUK_BIDX_SYNTAX_ERROR_PROTOTYPE];
    21. 

  21. 	case DUK_ERR_TYPE_ERROR:
    22. 

  22. 		return thr->builtins[DUK_BIDX_TYPE_ERROR_PROTOTYPE];
    23. 

  23. 	case DUK_ERR_URI_ERROR:
    24. 

  24. 		return thr->builtins[DUK_BIDX_URI_ERROR_PROTOTYPE];
    25. 

  25. 

  26. 	/* XXX: more specific error classes? */
    27. 

  27. 	case DUK_ERR_UNIMPLEMENTED_ERROR:
    28. 

  28. 	case DUK_ERR_INTERNAL_ERROR:
    29. 

  29. 	case DUK_ERR_ALLOC_ERROR:
    30. 

  30. 	case DUK_ERR_ASSERTION_ERROR:
    31. 

  31. 	case DUK_ERR_API_ERROR:
    32. 

  32. 	case DUK_ERR_ERROR:
    33. 

  33. 	default:
    34. 

  34. 		return thr->builtins[DUK_BIDX_ERROR_PROTOTYPE];
    35. 

  35. 	}
    36. 

  36. }
    37. 

  37. 

  38. /*
    39. 

  39.  *  Exposed helper for setting up heap longjmp state.
    40. 

  40.  */
    41. 

  41. 

  42. DUK_INTERNAL void duk_err_setup_heap_ljstate(duk_hthread *thr, duk_small_int_t lj_type) {
    43. 

  43. 	duk_tval tv_tmp;
    44. 

  44. 

  45. 	thr->heap->lj.type = lj_type;
    46. 

  46. 

  47. 	DUK_ASSERT(thr->valstack_top > thr->valstack);
    48. 

  48. 	DUK_TVAL_SET_TVAL(&tv_tmp, &thr->heap->lj.value1);
    49. 

  49. 	DUK_TVAL_SET_TVAL(&thr->heap->lj.value1, thr->valstack_top - 1);
    50. 

  50. 	DUK_TVAL_INCREF(thr, &thr->heap->lj.value1);
    51. 

  51. 	DUK_TVAL_DECREF(thr, &tv_tmp);
    52. 

  52. 

  53. 	duk_pop((duk_context *) thr);
    54. 

  54. }
    55. 

  55.