Revision: 1166
Author:
fafo...@gmail.com
Date: Thu Jan 8 13:36:05 2015 UTC
Log: Fixes issue 94
https://code.google.com/p/teyjus/source/detail?r=1166
Modified:
/branches/ocaml-builtins/source/simulator/builtins/io.c
=======================================
--- /branches/ocaml-builtins/source/simulator/builtins/io.c Thu Jan 8
13:35:44 2015 UTC
+++ /branches/ocaml-builtins/source/simulator/builtins/io.c Thu Jan 8
13:36:05 2015 UTC
@@ -115,7 +115,7 @@
tmPtr = DF_termDeref(tmPtr);
if (DF_isInt(tmPtr)) return DF_intValue(tmPtr);
- EM_error(BI_ERROR_INTEGER_EXPECTED);
+ EM_error(BI_ERROR_INTEGER_EXPECTED, tmPtr);
//Impossible to reach this point.
return 0;