Home
last modified time | relevance | path

Searched refs:TclNewLiteralStringObj (Results 1 – 25 of 101) sorted by relevance

12345

/dports/lang/tcl85/tcl8.5.19/generic/
H A DtclEvent.c264 TclNewLiteralStringObj(keyPtr, "-errorinfo"); in HandleBgErrors()
326 TclNewLiteralStringObj(keyPtr, "-level"); in TclDefaultBgErrorHandlerObjCmd()
338 TclNewLiteralStringObj(keyPtr, "-code"); in TclDefaultBgErrorHandlerObjCmd()
365 TclNewLiteralStringObj(tempObjv[0], "bgerror"); in TclDefaultBgErrorHandlerObjCmd()
378 TclNewLiteralStringObj(tempObjv[1], in TclDefaultBgErrorHandlerObjCmd()
382 TclNewLiteralStringObj(tempObjv[1], in TclDefaultBgErrorHandlerObjCmd()
395 TclNewLiteralStringObj(keyPtr, "-errorcode"); in TclDefaultBgErrorHandlerObjCmd()
403 TclNewLiteralStringObj(keyPtr, "-errorinfo"); in TclDefaultBgErrorHandlerObjCmd()
554 TclNewLiteralStringObj(bgerrorObj, "::tcl::Bgerror"); in TclGetBgErrorHandler()
H A DtclHistory.c135 TclNewLiteralStringObj(list[0], "history"); in Tcl_RecordAndEvalObj()
136 TclNewLiteralStringObj(list[1], "add"); in Tcl_RecordAndEvalObj()
H A DtclCompExpr.c672 TclNewLiteralStringObj(msg, in ParseExpr()
884 TclNewLiteralStringObj(msg, "invalid character \"$\""); in ParseExpr()
918 TclNewLiteralStringObj(msg, "missing close-bracket"); in ParseExpr()
1069 TclNewLiteralStringObj(msg, "unbalanced open paren"); in ParseExpr()
1077 TclNewLiteralStringObj(msg, "empty expression"); in ParseExpr()
1081 TclNewLiteralStringObj(msg, "unbalanced close paren"); in ParseExpr()
1166 TclNewLiteralStringObj(msg, "unbalanced open paren"); in ParseExpr()
1186 TclNewLiteralStringObj(msg, in ParseExpr()
1249 TclNewLiteralStringObj(msg, "unbalanced close paren"); in ParseExpr()
1258 TclNewLiteralStringObj(msg, in ParseExpr()
[all …]
H A DtclTrace.c274 TclNewLiteralStringObj(opObj, "read"); in Tcl_TraceObjCmd()
276 TclNewLiteralStringObj(opObj, "write"); in Tcl_TraceObjCmd()
278 TclNewLiteralStringObj(opObj, "unset"); in Tcl_TraceObjCmd()
280 TclNewLiteralStringObj(opObj, "array"); in Tcl_TraceObjCmd()
579 TclNewLiteralStringObj(opObj, "enter"); in TraceExecutionObjCmd()
583 TclNewLiteralStringObj(opObj, "leave"); in TraceExecutionObjCmd()
786 TclNewLiteralStringObj(opObj, "rename"); in TraceCommandObjCmd()
971 TclNewLiteralStringObj(opObj, "array"); in TraceVariableObjCmd()
975 TclNewLiteralStringObj(opObj, "read"); in TraceVariableObjCmd()
979 TclNewLiteralStringObj(opObj, "write"); in TraceVariableObjCmd()
[all …]
H A DtclCmdAH.c323 TclNewLiteralStringObj(dir, "~"); in Tcl_CdObjCmd()
606 TclNewLiteralStringObj(options, "-code error -level 0"); in Tcl_ErrorObjCmd()
609 TclNewLiteralStringObj(optName, "-errorinfo"); in Tcl_ErrorObjCmd()
615 TclNewLiteralStringObj(optName, "-errorcode"); in Tcl_ErrorObjCmd()
1227 TclNewLiteralStringObj(typeName, "absolute"); in Tcl_FileObjCmd()
1230 TclNewLiteralStringObj(typeName, "relative"); in Tcl_FileObjCmd()
1233 TclNewLiteralStringObj(typeName, "volumerelative"); in Tcl_FileObjCmd()
1504 TclNewLiteralStringObj(field, fieldName); \ in StoreStatData()
H A DtclResult.c1118 TclNewLiteralStringObj(keys[KEY_CODE], "-code"); in GetKeys()
1119 TclNewLiteralStringObj(keys[KEY_ERRORCODE], "-errorcode"); in GetKeys()
1120 TclNewLiteralStringObj(keys[KEY_ERRORINFO], "-errorinfo"); in GetKeys()
1121 TclNewLiteralStringObj(keys[KEY_ERRORLINE], "-errorline"); in GetKeys()
1122 TclNewLiteralStringObj(keys[KEY_LEVEL], "-level"); in GetKeys()
1123 TclNewLiteralStringObj(keys[KEY_OPTIONS], "-options"); in GetKeys()
H A DtclFCmd.c574 TclNewLiteralStringObj(perm, "u+w"); in CopyRenameOneFile()
700 TclNewLiteralStringObj(cmdObj, "::tcl::CopyDirectory"); in CopyRenameOneFile()
703 TclNewLiteralStringObj(opObj, "copying"); in CopyRenameOneFile()
705 TclNewLiteralStringObj(opObj, "renaming"); in CopyRenameOneFile()
H A DtclIORChan.c575 TclNewLiteralStringObj(err, "chan handler \""); in TclChanCreateObjCmd()
588 TclNewLiteralStringObj(err, "chan handler \""); in TclChanCreateObjCmd()
603 TclNewLiteralStringObj(err, "chan handler \""); in TclChanCreateObjCmd()
611 TclNewLiteralStringObj(err, "chan handler \""); in TclChanCreateObjCmd()
619 TclNewLiteralStringObj(err, "chan handler \""); in TclChanCreateObjCmd()
627 TclNewLiteralStringObj(err, "chan handler \""); in TclChanCreateObjCmd()
635 TclNewLiteralStringObj(err, "chan handler \""); in TclChanCreateObjCmd()
/dports/lang/tcl86/tcl8.6.12/generic/
H A DtclEvent.c268 TclNewLiteralStringObj(keyPtr, "-errorinfo"); in HandleBgErrors()
330 TclNewLiteralStringObj(keyPtr, "-level"); in TclDefaultBgErrorHandlerObjCmd()
343 TclNewLiteralStringObj(keyPtr, "-code"); in TclDefaultBgErrorHandlerObjCmd()
378 TclNewLiteralStringObj(tempObjv[0], "bgerror"); in TclDefaultBgErrorHandlerObjCmd()
391 TclNewLiteralStringObj(tempObjv[1], in TclDefaultBgErrorHandlerObjCmd()
395 TclNewLiteralStringObj(tempObjv[1], in TclDefaultBgErrorHandlerObjCmd()
408 TclNewLiteralStringObj(keyPtr, "-errorcode"); in TclDefaultBgErrorHandlerObjCmd()
416 TclNewLiteralStringObj(keyPtr, "-errorinfo"); in TclDefaultBgErrorHandlerObjCmd()
568 TclNewLiteralStringObj(bgerrorObj, "::tcl::Bgerror"); in TclGetBgErrorHandler()
H A DtclHistory.c142 TclNewLiteralStringObj(histObjsPtr->historyObj, "::history"); in Tcl_RecordAndEvalObj()
143 TclNewLiteralStringObj(histObjsPtr->addObj, "add"); in Tcl_RecordAndEvalObj()
H A DtclCompExpr.c675 TclNewLiteralStringObj(msg, in ParseExpr()
906 TclNewLiteralStringObj(msg, "invalid character \"$\""); in ParseExpr()
941 TclNewLiteralStringObj(msg, "missing close-bracket"); in ParseExpr()
1097 TclNewLiteralStringObj(msg, "unbalanced open paren"); in ParseExpr()
1107 TclNewLiteralStringObj(msg, "empty expression"); in ParseExpr()
1111 TclNewLiteralStringObj(msg, "unbalanced close paren"); in ParseExpr()
1201 TclNewLiteralStringObj(msg, "unbalanced open paren"); in ParseExpr()
1222 TclNewLiteralStringObj(msg, in ParseExpr()
1287 TclNewLiteralStringObj(msg, "unbalanced close paren"); in ParseExpr()
1297 TclNewLiteralStringObj(msg, in ParseExpr()
[all …]
H A DtclTrace.c292 TclNewLiteralStringObj(opObj, "read"); in Tcl_TraceObjCmd()
294 TclNewLiteralStringObj(opObj, "write"); in Tcl_TraceObjCmd()
296 TclNewLiteralStringObj(opObj, "unset"); in Tcl_TraceObjCmd()
298 TclNewLiteralStringObj(opObj, "array"); in Tcl_TraceObjCmd()
592 TclNewLiteralStringObj(opObj, "enter"); in TraceExecutionObjCmd()
596 TclNewLiteralStringObj(opObj, "leave"); in TraceExecutionObjCmd()
795 TclNewLiteralStringObj(opObj, "rename"); in TraceCommandObjCmd()
799 TclNewLiteralStringObj(opObj, "delete"); in TraceCommandObjCmd()
984 TclNewLiteralStringObj(opObjPtr, "array"); in TraceVariableObjCmd()
988 TclNewLiteralStringObj(opObjPtr, "read"); in TraceVariableObjCmd()
[all …]
H A DtclResult.c1186 TclNewLiteralStringObj(keys[KEY_CODE], "-code"); in GetKeys()
1187 TclNewLiteralStringObj(keys[KEY_ERRORCODE], "-errorcode"); in GetKeys()
1188 TclNewLiteralStringObj(keys[KEY_ERRORINFO], "-errorinfo"); in GetKeys()
1189 TclNewLiteralStringObj(keys[KEY_ERRORLINE], "-errorline"); in GetKeys()
1190 TclNewLiteralStringObj(keys[KEY_ERRORSTACK],"-errorstack"); in GetKeys()
1191 TclNewLiteralStringObj(keys[KEY_LEVEL], "-level"); in GetKeys()
1192 TclNewLiteralStringObj(keys[KEY_OPTIONS], "-options"); in GetKeys()
H A DtclCmdAH.c428 TclNewLiteralStringObj(dir, "~"); in Tcl_CdObjCmd()
917 TclNewLiteralStringObj(options, "-code error -level 0"); in Tcl_ErrorObjCmd()
920 TclNewLiteralStringObj(optName, "-errorinfo"); in Tcl_ErrorObjCmd()
926 TclNewLiteralStringObj(optName, "-errorcode"); in Tcl_ErrorObjCmd()
2277 TclNewLiteralStringObj(typeName, "absolute"); in PathTypeCmd()
2280 TclNewLiteralStringObj(typeName, "relative"); in PathTypeCmd()
2283 TclNewLiteralStringObj(typeName, "volumerelative"); in PathTypeCmd()
2505 TclNewLiteralStringObj(field, fieldName); \ in StoreStatData()
H A DtclFCmd.c571 TclNewLiteralStringObj(perm, "u+w"); in CopyRenameOneFile()
698 TclNewLiteralStringObj(cmdObj, "::tcl::CopyDirectory"); in CopyRenameOneFile()
701 TclNewLiteralStringObj(opObj, "copying"); in CopyRenameOneFile()
703 TclNewLiteralStringObj(opObj, "renaming"); in CopyRenameOneFile()
H A DtclOO.c347 TclNewLiteralStringObj(fPtr->unknownMethodNameObj, "unknown"); in InitFoundation()
348 TclNewLiteralStringObj(fPtr->constructorName, "<constructor>"); in InitFoundation()
349 TclNewLiteralStringObj(fPtr->destructorName, "<destructor>"); in InitFoundation()
350 TclNewLiteralStringObj(fPtr->clonedName, "<cloned>"); in InitFoundation()
351 TclNewLiteralStringObj(fPtr->defineName, "::oo::define"); in InitFoundation()
359 TclNewLiteralStringObj(namePtr, "::oo::UnknownDefinition"); in InitFoundation()
481 TclNewLiteralStringObj(argsPtr, "originObject"); in InitFoundation()
494 TclNewLiteralStringObj(namePtr, "new"); in InitFoundation()
H A DtclZlib.c333 TclNewLiteralStringObj(objv[0], "TCL"); in ConvertErrorToList()
334 TclNewLiteralStringObj(objv[1], "ZLIB"); in ConvertErrorToList()
337 TclNewLiteralStringObj(objv[2], "STREAM"); in ConvertErrorToList()
340 TclNewLiteralStringObj(objv[2], "DATA"); in ConvertErrorToList()
343 TclNewLiteralStringObj(objv[2], "MEM"); in ConvertErrorToList()
346 TclNewLiteralStringObj(objv[2], "BUF"); in ConvertErrorToList()
349 TclNewLiteralStringObj(objv[2], "VERSION"); in ConvertErrorToList()
352 TclNewLiteralStringObj(objv[2], "POSIX"); in ConvertErrorToList()
356 TclNewLiteralStringObj(objv[2], "NEED_DICT"); in ConvertErrorToList()
376 TclNewLiteralStringObj(objv[2], "UNKNOWN"); in ConvertErrorToList()
/dports/lang/tcl87/tcl8.7a5/generic/
H A DtclEvent.c271 TclNewLiteralStringObj(keyPtr, "-errorinfo"); in HandleBgErrors()
333 TclNewLiteralStringObj(keyPtr, "-level"); in TclDefaultBgErrorHandlerObjCmd()
346 TclNewLiteralStringObj(keyPtr, "-code"); in TclDefaultBgErrorHandlerObjCmd()
381 TclNewLiteralStringObj(tempObjv[0], "bgerror"); in TclDefaultBgErrorHandlerObjCmd()
394 TclNewLiteralStringObj(tempObjv[1], in TclDefaultBgErrorHandlerObjCmd()
398 TclNewLiteralStringObj(tempObjv[1], in TclDefaultBgErrorHandlerObjCmd()
411 TclNewLiteralStringObj(keyPtr, "-errorcode"); in TclDefaultBgErrorHandlerObjCmd()
419 TclNewLiteralStringObj(keyPtr, "-errorinfo"); in TclDefaultBgErrorHandlerObjCmd()
571 TclNewLiteralStringObj(bgerrorObj, "::tcl::Bgerror"); in TclGetBgErrorHandler()
H A DtclHistory.c141 TclNewLiteralStringObj(histObjsPtr->historyObj, "::history"); in Tcl_RecordAndEvalObj()
142 TclNewLiteralStringObj(histObjsPtr->addObj, "add"); in Tcl_RecordAndEvalObj()
H A DtclTrace.c290 TclNewLiteralStringObj(opObj, "read"); in Tcl_TraceObjCmd()
292 TclNewLiteralStringObj(opObj, "write"); in Tcl_TraceObjCmd()
294 TclNewLiteralStringObj(opObj, "unset"); in Tcl_TraceObjCmd()
296 TclNewLiteralStringObj(opObj, "array"); in Tcl_TraceObjCmd()
590 TclNewLiteralStringObj(opObj, "enter"); in TraceExecutionObjCmd()
594 TclNewLiteralStringObj(opObj, "leave"); in TraceExecutionObjCmd()
793 TclNewLiteralStringObj(opObj, "rename"); in TraceCommandObjCmd()
797 TclNewLiteralStringObj(opObj, "delete"); in TraceCommandObjCmd()
982 TclNewLiteralStringObj(opObjPtr, "array"); in TraceVariableObjCmd()
986 TclNewLiteralStringObj(opObjPtr, "read"); in TraceVariableObjCmd()
[all …]
H A DtclCompExpr.c686 TclNewLiteralStringObj(msg, in ParseExpr()
947 TclNewLiteralStringObj(msg, "invalid character \"$\""); in ParseExpr()
982 TclNewLiteralStringObj(msg, "missing close-bracket"); in ParseExpr()
1138 TclNewLiteralStringObj(msg, "unbalanced open paren"); in ParseExpr()
1148 TclNewLiteralStringObj(msg, "empty expression"); in ParseExpr()
1152 TclNewLiteralStringObj(msg, "unbalanced close paren"); in ParseExpr()
1242 TclNewLiteralStringObj(msg, "unbalanced open paren"); in ParseExpr()
1263 TclNewLiteralStringObj(msg, in ParseExpr()
1328 TclNewLiteralStringObj(msg, "unbalanced close paren"); in ParseExpr()
1338 TclNewLiteralStringObj(msg, in ParseExpr()
[all …]
H A DtclResult.c1202 TclNewLiteralStringObj(keys[KEY_CODE], "-code"); in GetKeys()
1203 TclNewLiteralStringObj(keys[KEY_ERRORCODE], "-errorcode"); in GetKeys()
1204 TclNewLiteralStringObj(keys[KEY_ERRORINFO], "-errorinfo"); in GetKeys()
1205 TclNewLiteralStringObj(keys[KEY_ERRORLINE], "-errorline"); in GetKeys()
1206 TclNewLiteralStringObj(keys[KEY_ERRORSTACK],"-errorstack"); in GetKeys()
1207 TclNewLiteralStringObj(keys[KEY_LEVEL], "-level"); in GetKeys()
1208 TclNewLiteralStringObj(keys[KEY_OPTIONS], "-options"); in GetKeys()
H A DtclCmdAH.c410 TclNewLiteralStringObj(dir, "~"); in Tcl_CdObjCmd()
791 TclNewLiteralStringObj(options, "-code error -level 0"); in Tcl_ErrorObjCmd()
794 TclNewLiteralStringObj(optName, "-errorinfo"); in Tcl_ErrorObjCmd()
800 TclNewLiteralStringObj(optName, "-errorcode"); in Tcl_ErrorObjCmd()
2018 TclNewLiteralStringObj(typeName, "absolute"); in PathTypeCmd()
2021 TclNewLiteralStringObj(typeName, "relative"); in PathTypeCmd()
2024 TclNewLiteralStringObj(typeName, "volumerelative"); in PathTypeCmd()
2246 TclNewLiteralStringObj(field, fieldName); \ in StoreStatData()
H A DtclFCmd.c571 TclNewLiteralStringObj(perm, "u+w"); in CopyRenameOneFile()
698 TclNewLiteralStringObj(cmdObj, "::tcl::CopyDirectory"); in CopyRenameOneFile()
701 TclNewLiteralStringObj(opObj, "copying"); in CopyRenameOneFile()
703 TclNewLiteralStringObj(opObj, "renaming"); in CopyRenameOneFile()
H A DtclOO.c332 TclNewLiteralStringObj(fPtr->unknownMethodNameObj, "unknown"); in InitFoundation()
333 TclNewLiteralStringObj(fPtr->constructorName, "<constructor>"); in InitFoundation()
334 TclNewLiteralStringObj(fPtr->destructorName, "<destructor>"); in InitFoundation()
335 TclNewLiteralStringObj(fPtr->clonedName, "<cloned>"); in InitFoundation()
336 TclNewLiteralStringObj(fPtr->defineName, "::oo::define"); in InitFoundation()
344 TclNewLiteralStringObj(namePtr, "::oo::UnknownDefinition"); in InitFoundation()
393 TclNewLiteralStringObj(namePtr, "new"); in InitFoundation()
481 TclNewLiteralStringObj(defNsName, "::oo::objdefine"); in InitClassSystemRoots()
512 TclNewLiteralStringObj(defNsName, "::oo::define"); in InitClassSystemRoots()

12345