Implemented mxRename function. Another refactoring has changed trailing newline...
[openmx:openmx.git] / R / MxSwift.R
1 #\r
2 #   Copyright 2007-2009 The OpenMx Project\r
3 #\r
4 #   Licensed under the Apache License, Version 2.0 (the "License");\r
5 #   you may not use this file except in compliance with the License.\r
6 #   You may obtain a copy of the License at\r
7\r
8 #        http://www.apache.org/licenses/LICENSE-2.0\r
9\r
10 #    Unless required by applicable law or agreed to in writing, software\r
11 #    distributed under the License is distributed on an "AS IS" BASIS,\r
12 #    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.\r
13 #   See the License for the specific language governing permissions and\r
14 #   limitations under the License.\r
15 \r
16 \r
17 omxGenSwift <- function(tc, sites, sfile) {\r
18         cmdline <- paste("swift -tc.file ",tc," -sites.file ",sites," ",sfile)\r
19         system(cmdline)\r
20 }