请教一个tcl语法

cihchenlin

我想用tcl写个判断语法,但不知道怎么写,请教大家帮帮忙

我想在所有 *.v文件中去掉以*define.v   *param.v等后缀的文件,怎么编写?

我的本意是想让编译器先编译这些宏文件，然后再编译剩下的文件？

可是我不知道怎么编译剩下的文件，而不重复已经编译了的宏文件?

[ 本帖最后由 cihchenlin 于 2009-8-17 17:16 编辑 ]

cihchenlin

thanks

fybh911

set file_v [glob "*.v"]
foreach tempo $file_v {
regexp {.+[define.v]+} $tempo match  ; #this variable match indicates next operation
if ( match = 1 ) {
     .....} else {

......
}
}

cihchenlin

原帖由 fybh911 于 2009-8-15 20:25 发表

                               
登录/注册后可看大图

set file_v [glob "*.v"]
foreach tempo $file_v {
regexp {.+[define.v]+} $tempo match  ; #this variable match indicates next operation
if ( match = 1 ) {
     .....} else {

......
}
}

哈，非常感谢

cihchenlin

原帖由 fybh911 于 2009-8-15 20:25 发表

                               
登录/注册后可看大图

set file_v [glob "*.v"]
foreach tempo $file_v {
regexp {.+[define.v]+} $tempo match  ; #this variable match indicates next operation
if ( match = 1 ) {
     .....} else {

......
}
}

我试过了如果要过滤多个文件怎么去呢？

cihchenlin

请教各位高手啊?

hawaii_e

先看看

cihchenlin

急等结果哈，谢谢

cihchenlin

我再顶一下