4.104.114.95
Last change
on this file since 0e6d50c was
598aab1f,
checked in by Chris Johns <chrisj@…>, on 08/20/07 at 02:12:48
|
2007-08-20 Chris Johns <chisj@…>
- filewrite.nsi, getparameters.nsi, instance-check.nsi,
mingw-path.nsi, sm-dummy.nsi, strslash.nsi, strstr.nsi,
options.nsi: Added the shared between the 2 installer scripts.
- msys-path.nsi: Fixed the last LF bug.
- rtems-autotools.nsi, rtems-tools.nsi: Fixed the instance check,
added a start menu, remove pages from target installers.
- rtems.ini: Fixed the URL links. Added support link.
- rtems_logo.bmp: Trimmed a little more to get a better image.
- ba-wrap.sh: Stop on a error.
- build-exes.sh: Use the option parameter variables. Change the
order the section appear in the installer.
|
-
Property mode set to
100644
|
File size:
509 bytes
|
Rev | Line | |
---|
[598aab1f] | 1 | ; Push $filenamestring (e.g. 'c:\this\and\that\filename.htm') |
---|
| 2 | ; Push '\\' |
---|
| 3 | ; Pop $R0 |
---|
| 4 | ; Call StrSlash |
---|
| 5 | ; Pop $R0 |
---|
| 6 | ; ;Now $R0 contains 'c:/this/and/that/filename.htm' |
---|
| 7 | Function StrSlash |
---|
| 8 | Exch $R0 |
---|
| 9 | Push $R1 |
---|
| 10 | Push $R2 |
---|
| 11 | StrCpy $R1 0 |
---|
| 12 | loop: |
---|
| 13 | IntOp $R1 $R1 - 1 |
---|
| 14 | StrCpy $R2 $R0 1 $R1 |
---|
| 15 | StrCmp $R2 "" done |
---|
| 16 | StrCmp $R2 "\" 0 loop ; " |
---|
| 17 | StrCpy $R2 $R0 $R1 |
---|
| 18 | Push $R1 |
---|
| 19 | IntOp $R1 $R1 + 1 |
---|
| 20 | StrCpy $R1 $R0 "" $R1 |
---|
| 21 | StrCpy $R0 "$R2/$R1" |
---|
| 22 | Pop $R1 |
---|
| 23 | IntOp $R1 $R1 - 1 |
---|
| 24 | Goto loop |
---|
| 25 | done: |
---|
| 26 | Pop $R2 |
---|
| 27 | Pop $R1 |
---|
| 28 | Exch $R0 |
---|
| 29 | FunctionEnd |
---|
Note: See
TracBrowser
for help on using the repository browser.