summaryrefslogtreecommitdiff
path: root/src/declare.cc
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2014-12-20 10:39:22 -0500
committerAdrian Thurston <thurston@complang.org>2014-12-20 10:39:22 -0500
commitd32f0ff0e7db990ee508dcdcdd28bc4065b3bd6a (patch)
tree76d7a2916104621014db6d773de01917424bed3a /src/declare.cc
parentdb9cfbc7d06ed34f1fe73465d81d3ac0975adaff (diff)
downloadcolm-d32f0ff0e7db990ee508dcdcdd28bc4065b3bd6a.tar.gz
overflowing single-byte instruction, added IN_FN, with func to follow
Started adding two-byte instruction codes since we are overflowing the sinlge byte.
Diffstat (limited to 'src/declare.cc')
-rw-r--r--src/declare.cc14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/declare.cc b/src/declare.cc
index 926cecf3..7066a0da 100644
--- a/src/declare.cc
+++ b/src/declare.cc
@@ -767,13 +767,13 @@ void Compiler::declareStrFields( )
strObj = ObjectDef::cons( ObjectDef::BuiltinType, "str", nextObjectId++ );
strLangEl->objectDef = strObj;
- initFunction( uniqueTypeInt, strObj, "atoi", IN_STR_ATOI, IN_STR_ATOI, true );
- initFunction( uniqueTypeInt, strObj, "uord8", IN_STR_UORD8, IN_STR_UORD8, true );
- initFunction( uniqueTypeInt, strObj, "sord8", IN_STR_SORD8, IN_STR_SORD8, true );
- initFunction( uniqueTypeInt, strObj, "uord16", IN_STR_UORD16, IN_STR_UORD16, true );
- initFunction( uniqueTypeInt, strObj, "sord16", IN_STR_SORD16, IN_STR_SORD16, true );
- initFunction( uniqueTypeInt, strObj, "uord32", IN_STR_UORD32, IN_STR_UORD32, true );
- initFunction( uniqueTypeInt, strObj, "sord32", IN_STR_SORD32, IN_STR_SORD32, true );
+ initFunction( uniqueTypeInt, strObj, "atoi", IN_STR_ATOI, IN_STR_ATOI, true, true );
+ initFunction( uniqueTypeInt, strObj, "uord8", IN_STR_UORD8, IN_STR_UORD8, true, true );
+ initFunction( uniqueTypeInt, strObj, "sord8", IN_STR_SORD8, IN_STR_SORD8, true, true );
+ initFunction( uniqueTypeInt, strObj, "uord16", IN_STR_UORD16, IN_STR_UORD16, true, true );
+ initFunction( uniqueTypeInt, strObj, "sord16", IN_STR_SORD16, IN_STR_SORD16, true, true );
+ initFunction( uniqueTypeInt, strObj, "uord32", IN_STR_UORD32, IN_STR_UORD32, true, true );
+ initFunction( uniqueTypeInt, strObj, "sord32", IN_STR_SORD32, IN_STR_SORD32, true, true );
addLengthField( strObj, IN_STR_LENGTH );
initFunction( uniqueTypeStr, globalObjectDef, "sprintf",