Why is my script not working in tcl language

[nadolski]

Hi,

When I run the following script I got the error:
argument runNano.twi is invalid: too many filenames (sddsprocess)
while executing
"exec sddsprocess $fileName.twi -define=column,sqrtBetax,"betax sqrt" \
$fileName.twi -define=column,sqrtBetay,"betay sqrt" "
(file "./runNano_tcl.sh" line 48)

If I run the same as a shell script, I got the correct answer
sddsprocess $fileName.twi -define=column,sqrtBetax,"betax sqrt" $fileName.twi -define=column,sqrtBetay,"betay sqrt"

Could you please tell me what is the error of the tcl syntax?

Best regards,

Laurent.

--------------------------
#!/bin/sh
# \
exec tclsh "$0" "$@"

# Define a variable: command name
set fileName runNano
puts "reading $fileName.lte ..."

if ![file exists $fileName.log] {
catch {exec elegant $fileName.ele > $fileName.log}
}

exec sddsprocess $fileName.twi -define=column,sqrtBetax,"betax sqrt" \
$fileName.twi -define=column,sqrtBetay,"betay sqrt"

[michael_borland]

Laurent,

Tcl has a different way of interpreting the quotation marks, so you need to use quotation marks around the entire argument, as in

Code: Select all

sddsprocess $fileName.twi "-define=column,sqrtBetax,betax sqrt" $fileName.twi "-define=column,sqrtBetay,betay sqrt" 

This will work in the unix shell as well, so it is a good habit to just do it that way all the time.

--Michael

[michael_borland]

Also, you don' t need to give the filename twice if you intend to overwrite the file. It will happen automatically if you only give one filename.

[nadolski]

Hi Michael,

Thanks for the help. It works

What about this line? Where should I put the quotation marks?

exec sddsprocess -reprint=param,aLabel,"nux: %.4f nuy: %.4f ex0: %.4f", nux,nuy,ex0 $fileName.twi

reading runNano.lte ...
argument %.4f is invalid: too many filenames (sddsprocess)
while executing
"exec sddsprocess -reprint=param,aLabel,"nux: %.4f nuy: %.4f ex0: %.4f",nux,nuy,ex0 \
$fileName.twi"
(file "./runNano_tcl.sh" line 13)

[michael_borland]

Laurent,

All arguments with spaces should have the quotation marks around the entire argument, as in

Code: Select all

exec sddsprocess "-reprint=param,aLabel,nux: %.4f nuy: %.4f ex0: %.4f, nux,nuy,ex0" $fileName.twi

I should probably change the manuals to reflect this, since it works in all shells.

--Michael

[nadolski]

Michael,

This is what I tried but it does not work unfortunately as you can see:

couldn't print to make parameter aLabel
while executing
"exec sddsprocess "-reprint=param,aLabel,nux: %.4f nuy: %.4f ex0: %.4f, nux,nuy,ex0" $fileName.twi"
(file "./runNano_tcl.sh" line 16)

Laurent.

[michael_borland]

Laurent,

Try deleting the space before "nux". I.e., ",nux" instead of ", nux".

--Michael

[nadolski]

This is indeed tricky
I will get accustomed to it with time
Thx