add issplit method to rsv.class

This commit is contained in:
Bob Buxton 2020-05-18 22:46:37 +01:00 committed by HummyPkg
parent e3da17ca6c
commit cd9e9924f6
1 changed files with 4 additions and 0 deletions

View File

@ -158,6 +158,10 @@ rsv method isseries {} {
if {$ucRecKind == 4} { return 1 } else { return 0 }
}
rsv method issplit {} {
if {$ucRecKind == 2} { return 1 } else { return 0 }
}
rsv method _strip {str} {
return [system strip $str]
}