Logtalk 2.22.0 files.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1191 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2004-11-29 20:36:31 +00:00
parent 2feba3d528
commit d6bbeaa734
165 changed files with 1120 additions and 861 deletions

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.21.6
Release 2.22.0
Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
=================================================================
@@ -21,13 +21,13 @@ lgt_install.sh
installation directory (default is /usr/local)
lgt_install.js
Windows NT/2000/XP JScript script for completing the Logtalk installation
by setting the LOGTALKHOME system environment variable and by creating a
new program group named "Logtalk" in the Windows Start Menu (must be run
from this directory by a user with administration privileges after
decompressing the Logtalk distribution into its final destination; you might
need to logout and login again in order to use the items in the created
"Logtalk" program group due to the definition of a new system environment
variable)
by setting the LOGTALKHOME and LOGTALKUSER system environment variables and
by creating a new program group named "Logtalk" in the Windows Start Menu
(must be run from this directory by a user with administration privileges
after decompressing the Logtalk distribution into its final destination;
you will need to restart your computer in order to use the items created in
the "Logtalk" program group due to the definition of new system environment
variables)
logtalk.spec
specification file for building Linux RPMs
@@ -36,13 +36,13 @@ logtalk.spec
cplgtdirs.sh
cplgtdirs.js
sample scripts for the copying xml, examples, and library directories to the
user home directory (must be run by the end-user to ensure proper permissions
on the copied files)
sample scripts for copying the Logtalk user-modifiable files and directories
to the location pointed by the environment variable LOGTALKUSER (defaults to
~/logtalk if the variable is not defined); must be run by the end-user in
order to ensure proper permissions on the copied files
cleandist.sh
script for cleaning a Logtalk distribution in preparation for
packaging.
script for cleaning a Logtalk distribution in preparation for packaging
debian
directory containing support files for building a Debian package
@@ -65,18 +65,13 @@ make_eclipselgt.js
makes a Windows shortcut named "Logtalk - ECLiPSe" for running Logtalk
with ECLiPSe 5.7 (if you are using a different version, you must edit
the reference to the registry key in the script; if you prefer to use
TkEclipse, open the %LOGTALKHOME%\bin\logtalkeclipse.pl file with it)
TkEclipse, open the %LOGTALKHOME%\bin\logtalke_clipse.pl file with it)
make_gplgt.sh
makes a shell script named gplgt for running Logtalk with GNU Prolog
make_gplgt.js
makes a Windows shortcut named "Logtalk - GNU Prolog" for running Logtalk
with GNU Prolog
make_gplgt_exe.js
makes a new GNU Prolog top level named gplgt.exe and creates a Windows
shortcut named "Logtalk - GNU Prolog" for running it (needs the developer
tools nasm.exe and cp.exe installed; both the developer tools and the GNU
Prolog installation bin directory must be in the system path)
make_qplgt.sh
makes a shell script named qplgt for running Logtalk with Qu-Prolog
@@ -87,7 +82,7 @@ make_sicstuslgt.sh
Prolog
make_sicstuslgt.js
makes a Windows shortcut named "Logtalk - SICStus Prolog" for running
Logtalk with SICStus Prolog 3.11 (if you are using a different version,
Logtalk with SICStus Prolog 3.12 (if you are using a different version,
you must edit the reference to the registry key in the script)
make_swilgt.sh
@@ -109,10 +104,12 @@ make_xsblgt.sh
These scripts require the environment variable LOGTALKHOME (pointing to the
Logtalk installation directory) to be defined. In addition, the shell scripts
accept as an optional argument a prefix for the location of a link to the
scripts (default is /usr/local, creating the links in /usr/local/bin). Please
note that the environment variable LOGTALKHOME must be defined in order to run
the *lgt scripts that are created by the shell scripts above or the Windows
shortcuts (see the INSTALL file for details on setting the variable).
scripts (default is /usr/local, creating the links in /usr/local/bin).
Please note that the environment variables LOGTALKHOME and LOGTALKUSER must
be defined in order to run the *lgt scripts that are created by the shell
scripts above or the Windows shortcuts (see the INSTALL file for details on
setting the variables).
Note: when Logtalk is manually installed from sources, the shell scripts might
not have the executable permission bit set. In that case it will be necessary

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -11,7 +11,8 @@ var WshProcessEnv = WshShell.Environment("PROCESS");
var WshSystemEnv = WshShell.Environment("SYSTEM");
var WshUserEnv = WshShell.Environment("USER");
var logtalk_home;
var logtalk_user;
if (WshProcessEnv.Item("LOGTALKHOME"))
logtalk_home = WshProcessEnv.Item("LOGTALKHOME");
else if (WshSystemEnv.Item("LOGTALKHOME"))
@@ -27,9 +28,14 @@ else {
if (WScript.Arguments.Unnamed.Length > 0)
usage_help();
var user_home = WshShell.SpecialFolders("MyDocuments")
var logtalk_user = user_home + "\\logtalk";
if (WshUserEnv.Item("LOGTALKUSER"))
logtalk_user = WshUserEnv.Item("LOGTALKUSER");
else {
logtalk_user = WshShell.SpecialFolders("MyDocuments") + "\\logtalk";
WshUserEnv.Item("LOGTALKUSER") = WshShell.SpecialFolders("MyDocuments") + "\\logtalk";
WScript.Echo("Defined user environment variable LOGTALKUSER.");
WScript.Echo("");
}
var fso = new ActiveXObject("Scripting.FileSystemObject");
@@ -39,23 +45,43 @@ if (fso.FolderExists(logtalk_user)) {
usage_help();
}
WScript.Echo("Creating directory " + logtalk_user + "...");
WScript.Echo("Creating LOGTALKUSER directory:");
WScript.Echo("");
WScript.Echo(" " + logtalk_user);
WScript.Echo("");
fso.CreateFolder(logtalk_user);
WScript.Echo("Copying Logtalk directories...");
WScript.Echo("Copying Logtalk files and directories...");
fso.CopyFolder(logtalk_home + "\\configs", logtalk_user + "\\configs");
fso.CopyFolder(logtalk_home + "\\examples", logtalk_user + "\\examples");
fso.CopyFolder(logtalk_home + "\\libpaths", logtalk_user + "\\libpaths");
fso.CopyFolder(logtalk_home + "\\library", logtalk_user + "\\library");
fso.CopyFolder(logtalk_home + "\\xml", logtalk_user + "\\xml");
WScript.Echo("Finished copying Logtalk directories.");
WScript.Echo("Finished copying Logtalk files directories.");
WScript.Echo("");
WScript.Echo("You may need to edit the contents of the file:");
WScript.Echo("");
WScript.Echo(" " + logtalk_user + "\\libpaths\\libpaths.pl");
WScript.Echo("");
WScript.Echo("to match your Prolog compiler and operating-system requirements or to");
WScript.Echo("add your own library paths.");
WScript.Echo("");
WScript.Echo("You may want to customize the default Logtalk compiler options by editing");
WScript.Echo("the configuration file for your Prolog compiler found in the directory:");
WScript.Echo("");
WScript.Echo(" " + logtalk_user + "\\configs");
WScript.Echo("");
WScript.Quit(0);
function usage_help() {
WScript.Echo("");
WScript.Echo("This script copies the Logtalk library, xml, and examples");
WScript.Echo("directories to the user home directory (My Documents\\logtalk).");
WScript.Echo("This script copies the Logtalk user-modifiable files and directories");
WScript.Echo("to the user home directory. The location can be set by the environment");
WScript.Echo("variable \%LOGTALKUSER\% (defaults to MyDocuments\\logtalk when the");
WScript.Echo("variable is not defined)");
WScript.Echo("");
WScript.Echo("Usage:");
WScript.Echo(" " + WScript.ScriptName + " help");

View File

@@ -2,27 +2,54 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
echo
echo "This script copies the Logtalk library, xml, and examples"
echo "directories to the user home directory (~/logtalk)."
echo "This script copies the Logtalk user-modifiable files and directories"
echo "to the user home directory. The location can be set by the environment"
echo "variable \$LOGTALKUSER (defaults to ~/logtalk when the variable is not"
echo "defined)"
echo
if ! [ $LOGTALKHOME ]
then
echo "The env variable LOGTALKHOME must be defined first!"
echo "The environment variable LOGTALKHOME must be defined first!"
else
mkdir -p $HOME/logtalk/examples
mkdir -p $HOME/logtalk/library
mkdir -p $HOME/logtalk/xml
cp -RL $LOGTALKHOME/examples $HOME/logtalk/
cp -RL $LOGTALKHOME/library $HOME/logtalk/
cp -RL $LOGTALKHOME/xml $HOME/logtalk/
chmod -R u+w $HOME/logtalk
echo "Finished copying Logtalk directories."
if ! [ $LOGTALKUSER ]
then
LOGTALKUSER=$HOME/logtalk
echo "After the script completion, you must set the environment variable"
echo "LOGTALKUSER pointing to $LOGTALKUSER"
fi
mkdir -p $LOGTALKUSER/configs
mkdir -p $LOGTALKUSER/examples
mkdir -p $LOGTALKUSER/libpaths
mkdir -p $LOGTALKUSER/library
mkdir -p $LOGTALKUSER/xml
cp -RL $LOGTALKHOME/configs $LOGTALKUSER/
cp -RL $LOGTALKHOME/examples $LOGTALKUSER/
cp -RL $LOGTALKHOME/libpaths $LOGTALKUSER/
cp -RL $LOGTALKHOME/library $LOGTALKUSER/
cp -RL $LOGTALKHOME/xml $LOGTALKUSER/
chmod -R u+w $LOGTALKUSER
ln -sf $LOGTALKHOME/BIBLIOGRAPHY $LOGTALKUSER/BIBLIOGRAPHY
ln -sf $LOGTALKHOME/LICENSE $LOGTALKUSER/LICENSE
ln -sf $LOGTALKHOME/QUICK_START $LOGTALKUSER/QUICK_START
ln -sf $LOGTALKHOME/README $LOGTALKUSER/README
ln -sf $LOGTALKHOME/RELEASE_NOTES $LOGTALKUSER/RELEASE_NOTES
ln -sf $LOGTALKHOME/UPGRADING $LOGTALKUSER/UPGRADING
ln -sf $LOGTALKHOME/manuals $LOGTALKUSER/manuals
echo "Finished copying Logtalk files directories."
echo
echo "You may need to edit the \$LOGTALKUSER/libpaths/libpaths.pl file to match"
echo "your Prolog compiler and operating-system requirements or to add your own"
echo "library paths."
echo
echo "You may want to customize the default Logtalk compiler options by editing"
echo "the configuration file for your Prolog compiler found in the directory"
echo "\$LOGTALKUSER/configs."
echo
fi

View File

@@ -1,5 +1,5 @@
Package: logtalk
Version: 2.21.6
Version: 2.22.0
Section: languages
Priority: optional
Architecture: all

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -11,21 +11,34 @@ if (WScript.Arguments.Unnamed.Length > 0) {
}
WScript.Echo('');
WScript.Echo('Installing Logtalk...');
WScript.Echo('Completing Logtalk installation...');
WScript.Echo('');
var WshShell = new ActiveXObject("WScript.Shell");
var WshSystemEnv = WshShell.Environment("SYSTEM");
var WshUserEnv = WshShell.Environment("USER");
var FSObject = new ActiveXObject("Scripting.FileSystemObject");
WshShell.CurrentDirectory = "..";
WshSystemEnv.Item("LOGTALKHOME") = WshShell.CurrentDirectory;
WScript.Echo("Defined system environment variable LOGTALKHOME pointing to:");
WScript.Echo("");
WScript.Echo(" " + WshShell.CurrentDirectory);
WScript.Echo("");
if (!FSObject.FolderExists(WshShell.CurrentDirectory + "\\bin"))
FSObject.CreateFolder(WshShell.CurrentDirectory + "\\bin");
WshUserEnv.Item("LOGTALKUSER") = WshShell.SpecialFolders("MyDocuments") + "\\logtalk";
WScript.Echo("Defined user environment variable LOGTALKUSER pointing to:");
WScript.Echo("");
WScript.Echo(" " + WshShell.SpecialFolders("MyDocuments") + "\\logtalk");
WScript.Echo("");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\README", WshShell.CurrentDirectory + "\\bin\\README.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\QUICK_START", WshShell.CurrentDirectory + "\\bin\\QUICK_START.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\BIBLIOGRAPHY", WshShell.CurrentDirectory + "\\BIBLIOGRAPHY.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\LICENSE", WshShell.CurrentDirectory + "\\LICENSE.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\QUICK_START", WshShell.CurrentDirectory + "\\QUICK_START.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\README", WshShell.CurrentDirectory + "\\README.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\RELEASE_NOTES", WshShell.CurrentDirectory + "\\RELEASE_NOTES.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\UPGRADING", WshShell.CurrentDirectory + "\\UPGRADING.txt");
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
@@ -47,16 +60,42 @@ link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk ReadMe.lnk");
link.Description = "Open Logtalk ReadMe";
link.TargetPath = "%LOGTALKHOME%\\bin\\README.txt";
link.TargetPath = "%LOGTALKHOME%\\README.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Quick Start.lnk");
link.Description = "Open Logtalk Quick Start";
link.TargetPath = "%LOGTALKHOME%\\bin\\QUICK_START.txt";
link.TargetPath = "%LOGTALKHOME%\\QUICK_START.txt";
link.Save();
WScript.Echo('Logtalk installation completed.');
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Bibliography.lnk");
link.Description = "Open Logtalk Bibliography";
link.TargetPath = "%LOGTALKHOME%\\BIBLIOGRAPHY.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk License.lnk");
link.Description = "Open Logtalk License";
link.TargetPath = "%LOGTALKHOME%\\LICENSE.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Release Notes.lnk");
link.Description = "Open Logtalk Release Notes";
link.TargetPath = "%LOGTALKHOME%\\RELEASE_NOTES.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Upgrading.lnk");
link.Description = "Open Logtalk Upgrading";
link.TargetPath = "%LOGTALKHOME%\\UPGRADING.txt";
link.Save();
WScript.Echo('Logtalk installation completed. You will need to restart in order');
WScript.Echo('to activate the new system environment variables and use the items');
WScript.Echo('in the new Logtalk program group.');
WScript.Echo('');
WScript.Quit(0);
@@ -64,8 +103,8 @@ WScript.Quit(0);
function usage_help() {
WScript.Echo('');
WScript.Echo('This script completes the installation of Logtalk by setting the LOGTALKHOME');
WScript.Echo('system environment variable and by creating a new program group named "Logtalk"');
WScript.Echo('in the Windows Start Menu.');
WScript.Echo('and LOGTALKUSER system environment variables and by creating a new program');
WScript.Echo('group named "Logtalk" in the Windows Start Menu.');
WScript.Echo('');
WScript.Echo('The script must be run from this directory, by a user with administration');
WScript.Echo('privileges, after decompressing the Logtalk distribution into its final');

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -16,26 +16,26 @@ else
prefix="$1"
fi
rm -rf $prefix/lgt2216
rm -rf $prefix/lgt2220
rm -f $prefix/logtalk
mkdir $prefix/lgt2216
mkdir $prefix/lgt2220
cd ..
cp -R * $prefix/lgt2216
cp -R * $prefix/lgt2220
cd $prefix
chmod -R go-w,a+r lgt2216
chmod a+x lgt2216
chmod a+x lgt2216/misc/*.sh
chmod a+x lgt2216/xml/*.sh
ln -sf lgt2216 logtalk
chmod -R go-w,a+r lgt2220
chmod a+x lgt2220
chmod a+x lgt2220/misc/*.sh
chmod a+x lgt2220/xml/*.sh
ln -sf lgt2220 logtalk
mkdir -p bin
cd bin
ln -sf ../lgt2216/misc/cplgtdirs.sh cplgtdirs
ln -sf ../lgt2216/xml/lgt2pdf.sh lgt2pdf
ln -sf ../lgt2216/xml/lgt2html.sh lgt2html
ln -sf ../lgt2220/misc/cplgtdirs.sh cplgtdirs
ln -sf ../lgt2220/xml/lgt2pdf.sh lgt2pdf
ln -sf ../lgt2220/xml/lgt2html.sh lgt2html
echo "Logtalk installation completed."
echo

View File

@@ -1,11 +1,11 @@
Name: logtalk
Summary: Logtalk - Open source object-oriented extension to Prolog
Version: 2.21.6
Version: 2.22.0
Release: 1
License: Artistic License 2.0
Group: Development/Languages
Packager: Paulo Moura <pmoura@logtalk.org>
Source: http://www.logtalk.org/files/lgt2216.tgz
Source: http://www.logtalk.org/files/lgt2220.tgz
BuildArchitectures: noarch
URL: http://www.logtalk.org/
Prefix: /usr/local
@@ -13,42 +13,43 @@ AutoReqProv: no
%description
Logtalk is an open source object-oriented extension to the Prolog programming language. Integrating logic programming with object-oriented and event-driven programming, it is compatible with most Prolog compilers. It supports both prototypes and classes. In addition, it supports component-based programming through category-based composition.
%prep
%setup -n lgt2216
%setup -n lgt2220
%build
%install
rm -rf /usr/local/lgt2216
rm -rf /usr/local/lgt2220
rm -f /usr/local/logtalk
mkdir /usr/local/lgt2216
cp -R * /usr/local/lgt2216
mkdir /usr/local/lgt2220
cp -R * /usr/local/lgt2220
cd /usr/local
chmod -R go-w,a+r lgt2216
chmod a+x lgt2216
chmod a+x lgt2216/misc/*.sh
chmod a+x lgt2216/xml/*.sh
ln -sf lgt2216 logtalk
chmod -R go-w,a+r lgt2220
chmod a+x lgt2220
chmod a+x lgt2220/misc/*.sh
chmod a+x lgt2220/xml/*.sh
ln -sf lgt2220 logtalk
cd bin
ln -sf ../lgt2216/misc/cplgtdirs.sh cplgtdirs
ln -sf ../lgt2216/xml/lgt2pdf.sh lgt2pdf
ln -sf ../lgt2216/xml/lgt2html.sh lgt2html
ln -sf ../lgt2220/misc/cplgtdirs.sh cplgtdirs
ln -sf ../lgt2220/xml/lgt2pdf.sh lgt2pdf
ln -sf ../lgt2220/xml/lgt2html.sh lgt2html
%clean
%files
%defattr(-,root,users)
%doc /usr/local/lgt2216/BIBLIOGRAPHY
%doc /usr/local/lgt2216/INSTALL
%doc /usr/local/lgt2216/LICENSE
%doc /usr/local/lgt2216/QUICK_START
%doc /usr/local/lgt2216/README
%doc /usr/local/lgt2216/RELEASE_NOTES
%doc /usr/local/lgt2216/UPGRADING
/usr/local/lgt2216/compiler
/usr/local/lgt2216/configs
/usr/local/lgt2216/examples
/usr/local/lgt2216/library
%docdir /usr/local/lgt2216/manuals
/usr/local/lgt2216/manuals
/usr/local/lgt2216/misc
/usr/local/lgt2216/wenv
/usr/local/lgt2216/xml
%doc /usr/local/lgt2220/BIBLIOGRAPHY
%doc /usr/local/lgt2220/INSTALL
%doc /usr/local/lgt2220/LICENSE
%doc /usr/local/lgt2220/QUICK_START
%doc /usr/local/lgt2220/README
%doc /usr/local/lgt2220/RELEASE_NOTES
%doc /usr/local/lgt2220/UPGRADING
/usr/local/lgt2220/compiler
/usr/local/lgt2220/configs
/usr/local/lgt2220/examples
/usr/local/lgt2220/libpaths
/usr/local/lgt2220/library
%docdir /usr/local/lgt2220/manuals
/usr/local/lgt2220/manuals
/usr/local/lgt2220/misc
/usr/local/lgt2220/wenv
/usr/local/lgt2220/xml
/usr/local/logtalk
/usr/local/bin/cplgtdirs
/usr/local/bin/lgt2pdf

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -48,10 +48,11 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalkciao.pl", true);
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_ciao.pl", true);
f.WriteLine(":- ensure_loaded('\$LOGTALKHOME/configs/ciao_aux.config').");
f.WriteLine(":- ensure_loaded('\$LOGTALKUSER/configs/ciao_aux.config').");
f.WriteLine(":- ensure_loaded('\$LOGTALKHOME/compiler/logtalk.pl').");
f.WriteLine(":- ensure_loaded('\$LOGTALKUSER/libpaths/libpaths.pl').");
f.WriteLine(":- op(600, xfy, ::).");
f.WriteLine(":- op(600, fy, ::).");
f.WriteLine(":- op(600, fy, ^^).");
@@ -67,7 +68,7 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - CIAO.lnk");
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalkciao.pl";
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalk_ciao.pl";
link.Description = "Runs Logtalk with CIAO";
link.IconLocation = "app.exe,1";
link.TargetPath = prolog_path;
@@ -76,8 +77,9 @@ link.WorkingDirectory = logtalk_home;
link.Save();
WScript.Echo('Done. The "Logtalk - CIAO" shortcut was been added to the');
WScript.Echo('Start Menu Programs. Make sure that the LOGTALKHOME environment');
WScript.Echo('variable is defined for all users wishing to use the shortcut.');
WScript.Echo('Start Menu Programs. Make sure that the environment variables');
WScript.Echo('LOGTALKHOME and LOGTALKUSER are defined for all users wishing');
WScript.Echo('to use the shortcut.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,28 +20,25 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
cd bin
echo ":- ensure_loaded('\$LOGTALKHOME/configs/ciao_aux.config')." > logtalkciao.rc
echo ":- ensure_loaded('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalkciao.rc
echo ":- op(600, xfy, ::)." >> logtalkciao.rc
echo ":- op(600, fy, ::)." >> logtalkciao.rc
echo ":- op(600, fy, ^^)." >> logtalkciao.rc
echo ":- op(200, fy, +)." >> logtalkciao.rc
echo ":- op(200, fy, ?)." >> logtalkciao.rc
echo ":- op(200, fy, @)." >> logtalkciao.rc
echo ":- op(200, fy, -)." >> logtalkciao.rc
echo ":- ensure_loaded('\$LOGTALKUSER/configs/ciao_aux.config')." > logtalk_ciao.rc
echo ":- ensure_loaded('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_ciao.rc
echo ":- ensure_loaded('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_ciao.rc
echo ":- op(600, xfy, ::)." >> logtalk_ciao.rc
echo ":- op(600, fy, ::)." >> logtalk_ciao.rc
echo ":- op(600, fy, ^^)." >> logtalk_ciao.rc
echo ":- op(200, fy, +)." >> logtalk_ciao.rc
echo ":- op(200, fy, ?)." >> logtalk_ciao.rc
echo ":- op(200, fy, @)." >> logtalk_ciao.rc
echo ":- op(200, fy, -)." >> logtalk_ciao.rc
echo "#/bin/sh" > ciaolgt
echo "ciaosh -l \$LOGTALKHOME/bin/logtalkciao.rc" >> ciaolgt
echo "ciaosh -l \$LOGTALKHOME/bin/logtalk_ciao.rc" >> ciaolgt
chmod a+x ciaolgt
ln -sf $LOGTALKHOME/bin/ciaolgt $prefix/bin/ciaolgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -11,8 +11,8 @@ if (WScript.Arguments.Unnamed.Length > 0) {
}
WScript.Echo('');
WScript.Echo('Creating a shortcut named "Logtalk - ECLiPSe" for running Logtalk');
WScript.Echo('with ECLiPSe...');
WScript.Echo('Creating a shortcut named "Logtalk - ECLiPSe" for running Logtalk with');
WScript.Echo('ECLiPSe 5.7 (edit the script if you are using other version)...');
WScript.Echo('');
var WshShell = new ActiveXObject("WScript.Shell");
@@ -48,20 +48,23 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\lgtceclipse.pl", true);
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\lgtc_eclipse.pl", true);
f.WriteLine(":- pragma(system).");
f.WriteLine(":- pragma(nodebug).");
f.Close();
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\lgtceclipse.pl", true);
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\lgtc_eclipse.pl", true);
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalkeclipse.pl", true);
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_eclipse.pl", true);
f.WriteLine(":- ensure_loaded(library(toplevel)).");
f.WriteLine(":- cd('$LOGTALKHOME').");
f.WriteLine(":- cd('$LOGTALKUSER').");
f.WriteLine(":- compile('configs/eclipseiso.config').");
f.WriteLine(":- compile('bin/lgtceclipse.pl').");
f.WriteLine(":- cd('$LOGTALKHOME').");
f.WriteLine(":- compile('bin/lgtc_eclipse.pl').");
f.WriteLine(":- cd('$LOGTALKUSER').");
f.WriteLine(":- compile('libpaths/libpaths.pl').");
f.Close();
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
@@ -70,7 +73,7 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - ECLiPSe.lnk");
link.Arguments = "-b %LOGTALKHOME%\\bin\\logtalkeclipse.pl";
link.Arguments = "-b %LOGTALKHOME%\\bin\\logtalk_eclipse.pl";
link.Description = "Runs Logtalk with ECLiPSe";
link.IconLocation = "app.exe,1";
link.TargetPath = prolog_path;
@@ -79,8 +82,9 @@ link.WorkingDirectory = logtalk_home;
link.Save();
WScript.Echo('Done. The "Logtalk - ECLiPSe" shortcut was been added to the');
WScript.Echo('Start Menu Programs. Make sure that the LOGTALKHOME environment');
WScript.Echo('variable is defined for all users wishing to use the shortcut.');
WScript.Echo('Start Menu Programs. Make sure that the environment variables');
WScript.Echo('LOGTALKHOME and LOGTALKUSER are defined for all users wishing');
WScript.Echo('to use the shortcut.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,23 +20,21 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
cd bin
echo ":- pragma(system)." > logtalkeclipse.pl
echo ":- pragma(nodebug)." >> logtalkeclipse.pl
echo ":- ensure_loaded(library(toplevel))." >> logtalkeclipse.pl
echo ":- include('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalkeclipse.pl
echo ":- compile('\$LOGTALKHOME/configs/eclipseiso.config')." > logtalkeclipse.rc
echo ":- compile('\$LOGTALKHOME/bin/logtalkeclipse.pl')." >> logtalkeclipse.rc
echo ":- pragma(system)." > logtalk_eclipse.pl
echo ":- pragma(nodebug)." >> logtalk_eclipse.pl
echo ":- ensure_loaded(library(toplevel))." >> logtalk_eclipse.pl
echo ":- include('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_eclipse.pl
echo ":- compile('\$LOGTALKUSER/configs/eclipseiso.config')." > logtalk_eclipse.rc
echo ":- compile('\$LOGTALKHOME/bin/logtalk_eclipse.pl')." >> logtalk_eclipse.rc
echo ":- compile('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_eclipse.rc
echo "#/bin/sh" > eclipselgt
echo "eclipse -b \$LOGTALKHOME/bin/logtalkeclipse.rc" >> eclipselgt
echo "eclipse -b \$LOGTALKHOME/bin/logtalk_eclipse.rc" >> eclipselgt
chmod a+x eclipselgt
ln -sf $LOGTALKHOME/bin/eclipselgt $prefix/bin/eclipselgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -50,11 +50,11 @@ if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CopyFile(logtalk_home + "\\configs\\gnu.config", logtalk_home + "\\bin\\gnu.pl");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalkgp.pl", true);
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_gp.pl", true);
f.WriteLine(":- built_in.");
f.Close();
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\logtalkgp.pl", true);
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\logtalk_gp.pl", true);
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
@@ -62,7 +62,7 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - GNU Prolog.lnk");
link.Arguments = "--init-goal \"['bin/gnu.pl', 'bin/logtalkgp.pl']\"";
link.Arguments = "--init-goal \"['$LOGTALKUSER/configs/gnu.config', '$LOGTALKHOME/bin/logtalk_gp.pl', '$LOGTALKUSER/libpaths/libpaths.pl']\"";
link.Description = "Runs Logtalk with GNU Prolog";
link.IconLocation = "app.exe,1";
link.TargetPath = prolog_path;
@@ -71,8 +71,9 @@ link.WorkingDirectory = logtalk_home;
link.Save();
WScript.Echo('Done. The "Logtalk - GNU Prolog" shortcut was been added to the');
WScript.Echo('Start Menu Programs. Make sure that the LOGTALKHOME environment');
WScript.Echo('variable is defined for all users wishing to use the shortcut.');
WScript.Echo('Start Menu Programs. Make sure that the environment variables');
WScript.Echo('LOGTALKHOME and LOGTALKUSER are defined for all users wishing');
WScript.Echo('to use the shortcut.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,21 +20,16 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
cd bin
cp ../configs/gnu.config gnu.pl
echo ":- built_in." > logtalkgp.pl
cat ../compiler/logtalk.pl >> logtalkgp.pl
gplc -o gplgt gnu.pl logtalkgp.pl
echo ":- built_in." > logtalk_gp.pl
cat ../compiler/logtalk.pl >> logtalk_gp.pl
echo "#/bin/sh" > gplgt
echo "gprolog --init-goal \"['$LOGTALKUSER/configs/gnu.config', '$LOGTALKHOME/bin/logtalk_gp.pl', '$LOGTALKUSER/libpaths/libpaths.pl']\"" >> gplgt
chmod a+x gplgt
ln -sf $LOGTALKHOME/bin/gplgt $prefix/bin/gplgt
rm gnu.pl
rm logtalkgp.pl
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi

View File

@@ -1,96 +0,0 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
if (WScript.Arguments.Unnamed.Length > 0) {
usage_help();
WScript.Quit(0);
}
WScript.Echo('');
WScript.Echo('Creating a shortcut named "Logtalk - GNU Prolog (precompiled)" for');
WScript.Echo('running Logtalk with GNU Prolog using a new precompiled top-level...');
WScript.Echo('');
var WshShell = new ActiveXObject("WScript.Shell");
var prolog_path = WshShell.RegRead("HKCU\\Software\\GnuProlog\\RootPath") + "\\bin";
var FSObject = new ActiveXObject("Scripting.FileSystemObject");
if (!FSObject.FileExists(prolog_path + "\\gplc.exe")) {
WScript.Echo("Error! Cannot find gplc.exe at the expected place!");
WScript.Quit(1);
}
var WshProcessEnv = WshShell.Environment("PROCESS");
var WshSystemEnv = WshShell.Environment("SYSTEM");
var WshUserEnv = WshShell.Environment("USER");
var logtalk_home;
if (WshProcessEnv.Item("LOGTALKHOME"))
logtalk_home = WshProcessEnv.Item("LOGTALKHOME");
else if (WshSystemEnv.Item("LOGTALKHOME"))
logtalk_home = WshSystemEnv.Item("LOGTALKHOME");
else if (WshUserEnv.Item("LOGTALKHOME"))
logtalk_home = WshUserEnv.Item("LOGTALKHOME")
else {
WScript.Echo("Error! The system environment variable LOGTALKHOME must be defined first!");
usage_help();
WScript.Quit(1);
}
logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
FSObject.CopyFile(logtalk_home + "\\configs\\gnu.config", logtalk_home + "\\bin\\gnu.pl");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalkgp.pl", true);
f.WriteLine(":- built_in.");
f.Close();
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl >> " + logtalk_home + "\\bin\\logtalkgp.pl", true);
FSObject.CopyFile(prolog_path + "\\w32guicons.dll", logtalk_home + "\\bin\\w32guicons.dll");
WshShell.Run("cmd /c gplc --gui-console -o " + logtalk_home + "\\bin\\gplgt.exe " + logtalk_home + "\\bin\\gnu.pl " + logtalk_home + "\\bin\\logtalkgp.pl", true);
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - GNU Prolog (precompiled).lnk");
link.Arguments = "";
link.Description = "Runs Logtalk with GNU Prolog";
link.IconLocation = "app.exe,1";
link.TargetPath = logtalk_home + "\\bin\\gplgt.exe";
link.WindowStyle = 1;
link.WorkingDirectory = logtalk_home;
link.Save();
WScript.Echo('Done. The "Logtalk - GNU Prolog (precompiled)" shortcut was been');
WScript.Echo('added to the Start Menu Programs. Make sure that the LOGTALKHOME');
WScript.Echo('environment variable is defined for all users wishing to use the');
WScript.Echo('shortcut.');
WScript.Echo('');
WScript.Quit(0);
function usage_help() {
WScript.Echo('');
WScript.Echo('This script creates a shortcut named "Logtalk - GNU Prolog (precompiled)"');
WScript.Echo('for running Logtalk with GNU Prolog. The script must be run by a user with');
WScript.Echo('administrative rights. The LOGTALKHOME environment variable must be defined');
WScript.Echo('before running this script.');
WScript.Echo('');
WScript.Echo('Usage:');
WScript.Echo(' ' + WScript.ScriptName + ' help');
WScript.Echo(' ' + WScript.ScriptName);
WScript.Echo('');
}

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,27 +20,26 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
find . -name "*.lgt" -exec perl -pi -e "s/version is (\d)\.(\d)/version is '\1\.\2'/" {} \;
find . -name "*.mlgt" -exec perl -pi -e "s/version is (\d)\.(\d)/version is '\1\.\2'/" {} \;
cd configs
cp qu.config qu.ql
echo "fcompile('qu.ql', [assemble_only(true)]), load(qu). \
chdir('../compiler/'), fcompile('logtalk.pl', [assemble_only(true), string_table(256)]), load(logtalk)." | qp -s 2048 -d 1024 -h 2000
chdir('../compiler/'), fcompile('logtalk.pl', [assemble_only(true), string_table(256)]), load(logtalk). \
chdir('../libpaths/'), fcompile('libpaths.pl', [assemble_only(true)]), load(libpaths)." | qp -s 2048 -d 1024 -h 2000
qc -c qphook.ql
cd ../bin
qc -s 2048 -d 1024 -h 2000 -o qplgt ../configs/qphook.qo ../configs/qu.qo ../compiler/logtalk.qo
qc -s 2048 -d 1024 -h 2000 -o qplgt ../configs/qphook.qo ../configs/qu.qo ../compiler/logtalk.qo ../libpaths/libpaths.qo
chmod a+x qplgt
ln -sf $LOGTALKHOME/bin/qplgt $prefix/bin/qplgt
rm ../configs/qu.ql
rm ../configs/qphook.qo
rm ../configs/qu.qo
rm ../compiler/logtalk.qo
rm ../libpaths/libpaths.qo
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -11,13 +11,13 @@ if (WScript.Arguments.Unnamed.Length > 0) {
}
WScript.Echo('');
WScript.Echo('Creating a shortcut named "Logtalk - SICStus Prolog" for running Logtalk');
WScript.Echo('with SICStus Prolog...');
WScript.Echo('Creating a shortcut named "Logtalk - SICStus Prolog" for running Logtalk with');
WScript.Echo('SICStus Prolog 3.12 (edit the script if you are using other version)...');
WScript.Echo('');
var WshShell = new ActiveXObject("WScript.Shell");
var prolog_path = WshShell.RegRead("HKLM\\Software\\SICS\\SICStus3.11_win32\\SP_PATH") + "\\bin\\spwin.exe";
var prolog_path = WshShell.RegRead("HKLM\\Software\\SICS\\SICStus3.12_win32\\SP_PATH") + "\\bin\\spwin.exe";
var FSObject = new ActiveXObject("Scripting.FileSystemObject");
@@ -48,10 +48,11 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalksicstus.pl", true);
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_sicstus.pl", true);
f.WriteLine(":- consult('$LOGTALKHOME\\\\configs\\\\sicstus.config').");
f.WriteLine(":- consult('$LOGTALKHOME\\\\compiler\\\\logtalk.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/configs/sicstus.config').");
f.WriteLine(":- consult('$LOGTALKHOME/compiler/logtalk.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/libpaths/libpaths.pl').");
f.Close();
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
@@ -60,7 +61,7 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - SICStus Prolog.lnk");
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalksicstus.pl";
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalk_sicstus.pl";
link.Description = "Runs Logtalk with SICStus Prolog";
link.IconLocation = "app.exe,1";
link.TargetPath = prolog_path;
@@ -68,9 +69,10 @@ link.WindowStyle = 1;
link.WorkingDirectory = logtalk_home;
link.Save();
WScript.Echo('Done. The "Logtalk - SICStus Prolog" shortcut was been added to the');
WScript.Echo('Start Menu Programs. Make sure that the LOGTALKHOME environment');
WScript.Echo('variable is defined for all users wishing to use the shortcut.');
WScript.Echo('Done. The "Logtalk - SICStus Prolog" shortcut was been added to');
WScript.Echo('the Start Menu Programs. Make sure that the environment variables');
WScript.Echo('LOGTALKHOME and LOGTALKUSER are defined for all users wishing');
WScript.Echo('to use the shortcut.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,20 +20,18 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
cd bin
echo ":- compile('\$LOGTALKHOME/configs/sicstus.config')." > logtalksicstus.rc
echo ":- compile('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalksicstus.rc
echo ":- compile('\$LOGTALKUSER/configs/sicstus.config')." > logtalk_sicstus.rc
echo ":- compile('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_sicstus.rc
echo ":- compile('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_sicstus.rc
echo "#/bin/sh" > sicstuslgt
echo "sicstus -l \$LOGTALKHOME/bin/logtalksicstus.rc" >> sicstuslgt
echo "sicstus -l \$LOGTALKHOME/bin/logtalk_sicstus.rc" >> sicstuslgt
chmod a+x sicstuslgt
ln -sf $LOGTALKHOME/bin/sicstuslgt $prefix/bin/sicstuslgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -48,17 +48,18 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalkswi.pl", true);
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_swi.pl", true);
f.WriteLine(":- system_module.");
f.Close();
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\logtalkswi.pl", true);
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\logtalk_swi.pl", true);
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalkswi.rc", true);
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_swi.rc", true);
f.WriteLine(":- consult('$LOGTALKHOME\\\\configs\\\\swihook.pl').");
f.WriteLine(":- consult('$LOGTALKHOME\\\\configs\\\\swi.config').");
f.WriteLine(":- consult('$LOGTALKHOME\\\\bin\\\\logtalkswi.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/configs/swihook.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/configs/swi.config').");
f.WriteLine(":- consult('$LOGTALKHOME/bin/logtalk_swi.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/libpaths/libpaths.pl').");
f.Close();
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
@@ -67,7 +68,7 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - SWI-Prolog.lnk");
link.Arguments = "-f %LOGTALKHOME%\\bin\\logtalkswi.rc";
link.Arguments = "-f %LOGTALKHOME%\\bin\\logtalk_swi.rc";
link.Description = "Runs Logtalk with SWI-Prolog";
link.IconLocation = "app.exe,1";
link.TargetPath = prolog_path;
@@ -76,9 +77,10 @@ link.WorkingDirectory = logtalk_home;
link.Save();
WScript.Echo('Done. The "Logtalk - SWI-Prolog" shortcut was been added to the');
WScript.Echo('Start Menu Programs. Make sure that the LOGTALKHOME environment');
WScript.Echo('variable is defined for all users wishing to use the shortcut.');
WScript.Echo("");
WScript.Echo('Start Menu Programs. Make sure that the environment variables');
WScript.Echo('LOGTALKHOME and LOGTALKUSER are defined for all users wishing');
WScript.Echo('to use the shortcut.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,22 +20,20 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
cd bin
echo ":- system_module." > logtalkswi.pl
cat ../compiler/logtalk.pl >> logtalkswi.pl
echo ":- consult('\$LOGTALKHOME/configs/swi.config')." > logtalkswi.rc
echo ":- consult('\$LOGTALKHOME/configs/swihook.pl')." >> logtalkswi.rc
echo ":- consult('\$LOGTALKHOME/bin/logtalkswi.pl')." >> logtalkswi.rc
echo ":- system_module." > logtalk_swi.pl
cat ../compiler/logtalk.pl >> logtalk_swi.pl
echo ":- consult('\$LOGTALKUSER/configs/swi.config')." > logtalk_swi.rc
echo ":- consult('\$LOGTALKUSER/configs/swihook.pl')." >> logtalk_swi.rc
echo ":- consult('\$LOGTALKHOME/bin/logtalk_swi.pl')." >> logtalk_swi.rc
echo ":- consult('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_swi.rc
echo "#/bin/sh" > swilgt
echo "swipl -f \$LOGTALKHOME/bin/logtalkswi.rc" >> swilgt
echo "swipl -f \$LOGTALKHOME/bin/logtalk_swi.rc" >> swilgt
chmod a+x swilgt
ln -sf $LOGTALKHOME/bin/swilgt $prefix/bin/swilgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,10 +20,7 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
cd bin
cp ../configs/xsb.config xsbconfig.P
cp ../compiler/logtalk.pl logtalk.P
@@ -34,12 +31,13 @@ else
rm temp2
echo ":- reconsult('$LOGTALKHOME/bin/xsbconfig.P')." > logtalkxsb.P
echo ":- reconsult('$LOGTALKHOME/bin/logtalk.P')." >> logtalkxsb.P
echo ":- reconsult('$LOGTALKUSER/libpaths/libpaths.P')." >> logtalkxsb.P
echo "#/bin/sh" > xsblgt
echo "xsb -e \"reconsult('\$LOGTALKHOME/bin/logtalkxsb.P').\"" >> xsblgt
chmod a+x xsblgt
ln -sf $LOGTALKHOME/bin/xsblgt $prefix/bin/xsblgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.21.6
// Release 2.22.0
//
// Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -48,10 +48,11 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalkyap.pl", true);
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_yap.pl", true);
f.WriteLine(":- reconsult('$LOGTALKHOME\\\\configs\\\\yap.config').");
f.WriteLine(":- reconsult('$LOGTALKUSER\\\\configs\\\\yap.config').");
f.WriteLine(":- reconsult('$LOGTALKHOME\\\\compiler\\\\logtalk.pl').");
f.WriteLine(":- reconsult('$LOGTALKUSER\\\\libpaths\\\\libpaths.pl').");
f.Close();
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
@@ -60,7 +61,7 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - YAP.lnk");
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalkyap.pl";
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalk_yap.pl";
link.Description = "Runs Logtalk with YAP";
link.IconLocation = "app.exe,1";
link.TargetPath = prolog_path;
@@ -69,8 +70,8 @@ link.WorkingDirectory = logtalk_home;
link.Save();
WScript.Echo('Done. The "Logtalk - YAP" shortcut was been added to the Start Menu');
WScript.Echo('Programs. Make sure that the LOGTALKHOME environment variable is');
WScript.Echo('defined for all users wishing to use the shortcut.');
WScript.Echo('Programs. Make sure that the environment variables LOGTALKHOME and');
WScript.Echo('LOGTALKUSER are defined for all users wishing to use the shortcut.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.21.6
## Release 2.22.0
##
## Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -20,20 +20,18 @@ else
else
prefix="$1"
fi
if ! [ -d bin ]
then
mkdir bin
fi
mkdir -p bin
cd bin
echo ":- reconsult('\$LOGTALKHOME/configs/yap.config')." > logtalkyap.rc
echo ":- reconsult('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalkyap.rc
echo ":- reconsult('\$LOGTALKUSER/configs/yap.config')." > logtalk_yap.rc
echo ":- reconsult('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_yap.rc
echo ":- reconsult('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_yap.rc
echo "#/bin/sh" > yaplgt
echo "yap -l \$LOGTALKHOME/bin/logtalkyap.rc" >> yaplgt
echo "yap -l \$LOGTALKHOME/bin/logtalk_yap.rc" >> yaplgt
chmod a+x yaplgt
ln -sf $LOGTALKHOME/bin/yaplgt $prefix/bin/yaplgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users should define the environment variable LOGTALKHOME in"
echo "order to use the script."
echo "Users should define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
fi