Sample code for 30+ languages & platforms
Tcl

Eval JavaScript Returning String

See more JavaScript Examples

Demonstrates getting the completion value of a JavaScript that returns a string.

Chilkat Tcl Downloads

Tcl

load ./chilkat.dll

set success 0

# This example demonstrates getting the completion value of a script,
# where the last evaluated expression is a string.

# The Javascript run in this example is shown below.

# Load the JavaScript from a file.
set sbScript [new_CkStringBuilder]

set success [CkStringBuilder_LoadFile $sbScript "js_eval_return_string.js" "utf-8"]
if {$success == 0} then {
    puts [CkStringBuilder_lastErrorText $sbScript]
    delete_CkStringBuilder $sbScript
    exit
}

set js [new_CkJs]

set result [new_CkJsonObject]

# Run the JavaScript
# Eval returns the completion value of the script. This is generally the value of the last evaluated expression.
# In this case, the last evaluated expression is a string.
set success [CkJs_Eval $js $sbScript $result]
if {$success == 0} then {
    puts [CkJs_lastErrorText $js]
    delete_CkStringBuilder $sbScript
    delete_CkJs $js
    delete_CkJsonObject $result
    exit
}

CkJsonObject_put_EmitCompact $result 0
puts [CkJsonObject_emit $result]

# Output:

# {
#   "type": "string",
#   "value": "Ready for Chilkat.Js"
# }

delete_CkStringBuilder $sbScript
delete_CkJs $js
delete_CkJsonObject $result