Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Tokenize no longer needs fixing |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | sourceforge |
| Files: | files | file ages | folders |
| SHA1: |
4471c2c680286424ba5c865588a6210b |
| User & Date: | rmsimpson 2006-02-09 23:16:11 |
Context
|
2006-02-09
| ||
| 23:24 | Implement IsLong schema column check-in: 84578f9c4f user: rmsimpson tags: sourceforge | |
| 23:16 | Tokenize no longer needs fixing check-in: 4471c2c680 user: rmsimpson tags: sourceforge | |
| 19:32 | Designer changes check-in: c42f715cfe user: rmsimpson tags: sourceforge | |
Changes
Changes to SQLite.Interop/fixsource.vbs.
23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 |
Set srcFile = fso.CreateTextFile("src\select.c", true)
srcFile.Write(newFileContents)
srcFile.Close()
End If
' SQLite supports : and $ for named parameters, but we add support for @ as well here
'
Set srcFile = fso.OpenTextFile("src\tokenize.c", 1)
srcFileContents = srcFile.ReadAll()
srcFile.Close()
If InStr(1, srcFileContents, " case '@':", 1) = 0 Then
newFileContents = Replace(srcFileContents, " case ':': {", " case '@':" & Chr(10) & " case ':': {")
If (newFileContents <> srcFileContents) Then
WScript.StdOut.WriteLine "Updating tokenize.c"
Set srcFile = fso.CreateTextFile("src\tokenize.c", true)
srcFile.Write(newFileContents)
srcFile.Close()
End If
End If
' In order to support encryption, we need to know when the pager is being destroyed so we can destroy our encryption
' objects. This modification adds code to support that.
'
Set srcFile = fso.OpenTextFile("src\pager.c", 1)
srcFileContents = srcFile.ReadAll()
srcFile.Close()
|
| | | | | | | | | | | | > |
23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 |
Set srcFile = fso.CreateTextFile("src\select.c", true)
srcFile.Write(newFileContents)
srcFile.Close()
End If
' SQLite supports : and $ for named parameters, but we add support for @ as well here
'
' Set srcFile = fso.OpenTextFile("src\tokenize.c", 1)
' srcFileContents = srcFile.ReadAll()
' srcFile.Close()
' If InStr(1, srcFileContents, " case '@':", 1) = 0 Then
' newFileContents = Replace(srcFileContents, " case ':': {", " case '@':" & Chr(10) & " case ':': {")
' If (newFileContents <> srcFileContents) Then
' WScript.StdOut.WriteLine "Updating tokenize.c"
' Set srcFile = fso.CreateTextFile("src\tokenize.c", true)
' srcFile.Write(newFileContents)
' srcFile.Close()
' End If
' End If
'
' In order to support encryption, we need to know when the pager is being destroyed so we can destroy our encryption
' objects. This modification adds code to support that.
'
Set srcFile = fso.OpenTextFile("src\pager.c", 1)
srcFileContents = srcFile.ReadAll()
srcFile.Close()
|