-
Notifications
You must be signed in to change notification settings - Fork 78
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
Showing
19 changed files
with
782 additions
and
68 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Binary file not shown.
Binary file not shown.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,59 @@ | ||
| ;;;;; Stolen from https://github.com/sbcl/sbcl/blob/master/tools-for-build/rtf.lisp | ||
|
|
||
| ;;;; Generate RTF out of a regular text file, splitting | ||
| ;;;; paragraphs on empty lines. | ||
| ;;;; | ||
| ;;;; Used to generate License.rtf out of COPYING for the | ||
| ;;;; Windows installer. | ||
|
|
||
| ;;;; This software is part of the SBCL system. See the README file for | ||
| ;;;; more information. | ||
| ;;;; | ||
| ;;;; This software is derived from the CMU CL system, which was | ||
| ;;;; written at Carnegie Mellon University and released into the | ||
| ;;;; public domain. The software is in the public domain and is | ||
| ;;;; provided with absolutely no warranty. See the COPYING and CREDITS | ||
| ;;;; files for more information. | ||
|
|
||
| (defun read-text (pathname) | ||
| (let ((pars (list nil))) | ||
| (with-open-file (f pathname :external-format :ascii) | ||
| (loop for line = (read-line f nil) | ||
| for text = (string-trim '(#\Space #\Tab) line) | ||
| while line | ||
| when (plusp (length text)) | ||
| do (setf (car pars) | ||
| (if (car pars) | ||
| (concatenate 'string (car pars) " " text) | ||
| text)) | ||
| else | ||
| do (push nil pars))) | ||
| (nreverse pars))) | ||
|
|
||
| (defun write-rtf (pars pathname) | ||
| (with-open-file (f pathname :direction :output :external-format :ascii | ||
| :if-exists :supersede) | ||
| ;; \rtf0 = RTF 1.0 | ||
| ;; \ansi = character set | ||
| ;; \deffn = default font | ||
| ;; \fonttbl = font table | ||
| ;; \fs = font size in half-points | ||
| (format f "{\\rtf1\\ansi~ | ||
| \\deffn0~ | ||
| {\\fonttbl\\f0\\fswiss Helvetica;}~ | ||
| \\fs20~ | ||
| ~{~A\\par\\par ~}}" ; each par used to end with | ||
| ; ~%, but resulting Rtf looks | ||
| ; strange (WinXP, WiX 3.0.x, | ||
| ; ?) | ||
| pars))) | ||
|
|
||
| ;; generate RTF file from TXT file | ||
| (defun generate-license-rtf (from to) | ||
| (write-rtf (read-text from) to)) | ||
|
|
||
| (generate-license-rtf | ||
| (concatenate 'string *cormanlisp-directory* "LICENSE.txt") | ||
| (concatenate 'string *cormanlisp-directory* ".\\installer\\LICENSE.rtf")) | ||
|
|
||
|
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,19 @@ | ||
| <?xml version="1.0" encoding="utf-8"?> | ||
| <Wix xmlns="http://schemas.microsoft.com/wix/2006/wi"> | ||
| <Fragment> | ||
| <DirectoryRef Id="INSTALLDIR"> | ||
| <!-- add product to path --> | ||
| <Component Id="AddProductToPath" | ||
| Guid="{F39576AD-698B-48F5-9E74-8C1C2EDC375B}" | ||
| KeyPath="yes"> | ||
| <Environment Id="Env_PATH" | ||
| Name="PATH" | ||
| Value="[INSTALLDIR]" | ||
| Separator=";" | ||
| Action="set" | ||
| Part="last" | ||
| System="yes" /> | ||
| </Component> | ||
| </DirectoryRef> | ||
| </Fragment> | ||
| </Wix> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,59 @@ | ||
| <?xml version="1.0" encoding="utf-8"?> | ||
| <Include> | ||
| <!-- | ||
| Manufacturer and product name | ||
| --> | ||
| <?define ProductName="Corman Lisp" ?> | ||
| <?define ManufacturerName="Sharp Lispers" ?> | ||
| <!-- | ||
| Versioning. These have to be changed for upgrades. | ||
| It's not enough to just include newer files. | ||
| --> | ||
| <?define MajorVersion="3" ?> | ||
| <?define MinorVersion="1" ?> | ||
| <?define BuildVersion="0" ?> | ||
| <!-- Revision is NOT used by WiX in the upgrade procedure --> | ||
| <?define Revision="0" ?> | ||
| <!-- Full version number to display --> | ||
| <?define VersionNumber="$(var.MajorVersion).$(var.MinorVersion).$(var.BuildVersion)" ?> | ||
| <?define VersionNumberWithRevision="$(var.MajorVersion).$(var.MinorVersion).$(var.BuildVersion).$(var.Revision)" ?> | ||
| <!-- | ||
| Visual C++ Runtime Version. | ||
| Comment it out to not include VC++ redistributable. | ||
| --> | ||
| <?define VCRedist="140" ?> | ||
| <!-- | ||
| Set the following variables to to "yes" to include | ||
| corresponding parts of Visual C++ Runtime. | ||
| --> | ||
| <?define VCRedist_MFC="yes" ?> | ||
| <?define VCRedist_OpenMP="no" ?> | ||
| <?define VCRedist_CXXAMP="no" ?> | ||
| <!-- | ||
| Supported architecture | ||
| --> | ||
| <?define Platform="x86" ?> | ||
| <!-- | ||
| Upgrade code HAS to be the same for all updates. | ||
| Once you've chosen it don't change it. | ||
| --> | ||
| <?define UpgradeCode="{E0D4586E-BDA4-49EF-8325-A971EFC40405}" ?> | ||
| <!-- | ||
| The name of your application *.exe files. These will be used to kill the process when updating | ||
| and creating the desktop shortcut | ||
| --> | ||
| <?define GuiProcessName="CormanLisp.exe" ?> | ||
| <?define ConsoleProcessName="clconsole.exe" ?> | ||
|
|
||
| <!-- Paths to directories --> | ||
| <?define SysDirectoryPath=".\Sys" ?> | ||
| <?define LibrariesDirectoryPath=".\Libraries" ?> | ||
| <?define ModulesDirectoryPath=".\Modules" ?> | ||
| <?define DocumentationDirectoryPath=".\documentation" ?> | ||
|
|
||
| <?define HeadersDirectoryPath=".\include" ?> | ||
| <?define ExamplesDirectoryPath=".\examples" ?> | ||
| <?define HyperSpecDirectoryPath=".\HyperSpec" ?> | ||
|
|
||
| </Include> | ||
|
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,88 @@ | ||
| <?xml version="1.0" encoding="utf-8"?> | ||
| <Wix xmlns="http://schemas.microsoft.com/wix/2006/wi"> | ||
| <?include Config.wxi?> | ||
| <Fragment> | ||
| <DirectoryRef Id="INSTALLDIR"> | ||
| <!-- Write Installation Path to registry --> | ||
| <Component Id="RegValueProductInstallPath" Guid="{CE589DBA-5C00-419F-AF9E-4E9365260957}"> | ||
| <RegistryValue Id="RegValueInstallPath" | ||
| Root="HKLM" | ||
| Key="Software\$(var.ManufacturerName)\$(var.ProductName)" | ||
| Name="Path" | ||
| Value="[INSTALLDIR]" | ||
| Type="string" | ||
| KeyPath="yes"/> | ||
| </Component> | ||
| <!-- Core product files --> | ||
| <Component Id="CormanLispCore" Guid="{EAED0349-C9F0-454F-91CB-73B80DBBB517}"> | ||
| <File Id="CormanLisp_IDE_Executable" | ||
| Name="CormanLisp.exe" | ||
| DiskId="1" | ||
| Source=".\CormanLisp.exe" /> | ||
| <File Id="CormanLisp_Console_Executable" | ||
| Name="clconsole.exe" | ||
| DiskId="1" | ||
| Source=".\clconsole.exe" /> | ||
| <File Id="CormanLisp_Image" | ||
| Name="CormanLisp.img" | ||
| DiskId="1" | ||
| Source=".\CormanLisp.img" /> | ||
| <File Id="CormanLispServer" | ||
| Name="CormanLispServer.dll" | ||
| DiskId="1" | ||
| Source=".\CormanLispServer.dll" /> | ||
| <File Id="CormanLispConsoleTemplate" | ||
| Name="clconsoleapp.exe" | ||
| DiskId="1" | ||
| Source=".\clconsoleapp.exe" /> | ||
| <File Id="CormanLispGUITemplate" | ||
| Name="clboot.exe" | ||
| DiskId="1" | ||
| Source=".\clboot.exe" /> | ||
| <File Id="CormanLispGUITemplateStatic" | ||
| Name="clbootapp.exe" | ||
| DiskId="1" | ||
| Source=".\clbootapp.exe" /> | ||
| <File Id="CormanLispDLLTemplateStatic" | ||
| Name="dlltemplate.dll" | ||
| DiskId="1" | ||
| Source=".\dlltemplate.dll" /> | ||
| <File Id="CormanLispCoreInit" | ||
| Name="init.lisp" | ||
| DiskId="1" | ||
| Source=".\init.lisp" /> | ||
| <File Id="MakeImgBat" | ||
| Name="makeimg.bat" | ||
| DiskId="1" | ||
| Source=".\makeimg.bat" /> | ||
| <File Id="CormanLispLicense" | ||
| Name="LICENSE.txt" | ||
| DiskId="1" | ||
| Source=".\LICENSE.txt" /> | ||
| </Component> | ||
| <!-- RDNZL Dynamic Library --> | ||
| <Component Id="RDNZL_DLL" | ||
| Guid="{6D17A89E-C877-4DEC-970C-CAC6D41C9261}"> | ||
| <File Id="RDNZL.dll" | ||
| Name="RDNZL.dll" | ||
| DiskId="1" | ||
| Source=".\RDNZL.dll" /> | ||
| </Component> | ||
| <!-- set environmental variable --> | ||
| <Component Id="SetEnv_CORMANLISP_HOME" | ||
| Guid="{307EA98D-C472-4D90-9FD7-A27018E87263}" | ||
| KeyPath="yes"> | ||
| <Environment Id="Env_CORMANLISP_HOME" | ||
| Name="CORMANLISP_HOME" | ||
| Value="[INSTALLDIR]" Action="set" System="yes" /> | ||
| </Component> | ||
| </DirectoryRef> | ||
| <!-- Product Base description --> | ||
| <ComponentGroup Id="ProductBase"> | ||
| <ComponentRef Id="RegValueProductInstallPath" /> | ||
| <ComponentRef Id="CormanLispCore" /> | ||
| <ComponentRef Id="RDNZL_DLL" /> | ||
| </ComponentGroup> | ||
| </Fragment> | ||
| </Wix> | ||
|
|
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,38 @@ | ||
| <?xml version="1.0" encoding="utf-8"?> | ||
| <Wix xmlns="http://schemas.microsoft.com/wix/2006/wi"> | ||
| <Fragment> | ||
| <DirectoryRef Id="INSTALLDIR"> | ||
| <!-- debug data files --> | ||
| <Component Id="DebugDataFiles" Guid="{59A45CAD-80F1-4C15-8F9B-BE9D6735359E}"> | ||
| <File Id="clboot.pdb" | ||
| Name="clboot.pdb" | ||
| DiskId="1" | ||
| Source=".\clboot.pdb" /> | ||
| <File Id="clbootapp.pdb" | ||
| Name="clbootapp.pdb" | ||
| DiskId="1" | ||
| Source=".\clbootapp.pdb" /> | ||
| <File Id="clconsole.pdb" | ||
| Name="clconsole.pdb" | ||
| DiskId="1" | ||
| Source=".\clconsole.pdb" /> | ||
| <File Id="clconsoleapp.pdb" | ||
| Name="clconsoleapp.pdb" | ||
| DiskId="1" | ||
| Source=".\clconsoleapp.pdb" /> | ||
| <File Id="CormanLisp.pdb" | ||
| Name="CormanLisp.pdb" | ||
| DiskId="1" | ||
| Source=".\CormanLisp.pdb" /> | ||
| <File Id="CormanLispServer.pdb" | ||
| Name="CormanLispServer.pdb" | ||
| DiskId="1" | ||
| Source=".\CormanLispServer.pdb" /> | ||
| <File Id="dlltemplate.pdb" | ||
| Name="dlltemplate.pdb" | ||
| DiskId="1" | ||
| Source=".\dlltemplate.pdb" /> | ||
| </Component> | ||
| </DirectoryRef> | ||
| </Fragment> | ||
| </Wix> |
Oops, something went wrong.