Logtalk 2.28.2 files.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1711 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2006-11-07 17:11:47 +00:00
parent 297d94b096
commit 36a326908c
196 changed files with 4726 additions and 2865 deletions

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================

View File

@@ -1,17 +1,22 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
var WshShell = new ActiveXObject("WScript.Shell");
var WshSystemEnv = WshShell.Environment("SYSTEM");
var WshUserEnv = WshShell.Environment("USER");
var logtalk_home;
var logtalk_user;
if (WshSystemEnv.Item("LOGTALKHOME"))
logtalk_home = WshSystemEnv.Item("LOGTALKHOME");
else if (WshUserEnv.Item("LOGTALKHOME"))
@@ -46,10 +51,23 @@ else {
}
if (FSObject.FolderExists(logtalk_user)) {
WScript.Echo("Error! Logtalk user directory already exists!");
WScript.Echo("Please rename it or delete it and run this script again.");
var today = new Date();
var year = today.getFullYear();
var month = today.getMonth() + 1;
var day = today.getDate();
if (day < 10)
day = "0" + day;
var hours = today.getHours();
if (hours < 10)
hours = "0" + hours;
var mins = today.getMinutes();
if (mins < 10)
mins = "0" + mins;
var secs = today.getSeconds();
date = year + "-" + month + "-" + day + " " + hours + "-" + mins + "-" + secs;
FSObject.MoveFolder(logtalk_user, logtalk_user + " backup " + date);
WScript.Echo("Created a backup of the existing " + logtalk_user + " directory.");
WScript.Echo("");
usage_help();
}
WScript.Echo("Creating LOGTALKUSER directory:");
@@ -61,12 +79,11 @@ FSObject.CreateFolder(logtalk_user);
WScript.Echo("Copying Logtalk files and directories...");
FSObject.CopyFolder(logtalk_home + "\\configs", logtalk_user + "\\configs");
FSObject.CopyFile(logtalk_user + "\\configs\\xsb.config", logtalk_user + "\\configs\\xsb.P");
FSObject.CopyFile(logtalk_user + "\\configs\\xsbcvs.config", logtalk_user + "\\configs\\xsbcvs.P");
FSObject.CopyFile(logtalk_user + "\\configs\\xsb.config", logtalk_user + "\\configs\\xsb.pl");
FSObject.CopyFolder(logtalk_home + "\\contributions", logtalk_user + "\\contributions");
FSObject.CopyFolder(logtalk_home + "\\examples", logtalk_user + "\\examples");
FSObject.CopyFolder(logtalk_home + "\\libpaths", logtalk_user + "\\libpaths");
FSObject.CopyFile(logtalk_user + "\\libpaths\\libpaths.pl", logtalk_user + "\\libpaths\\libpaths.P");
FSObject.CopyFile(logtalk_user + "\\libpaths\\libpaths.pl", logtalk_user + "\\libpaths\\libpaths_no_env_var.pl");
FSObject.CopyFolder(logtalk_home + "\\library", logtalk_user + "\\library");
FSObject.CopyFolder(logtalk_home + "\\xml", logtalk_user + "\\xml");

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -39,10 +39,10 @@ fi
if [ -d "$LOGTALKUSER" ]
then
echo "Error! Logtalk user directory already exists!"
echo "Please rename it or delete it and run this script again."
date=`eval date \"+%Y-%m-%d %H-%M-%S\"`
mv $LOGTALKUSER "$LOGTALKUSER backup $date"
echo "Created a backup of the existing $LOGTALKUSER directory."
echo
exit 1
fi
echo "Copying Logtalk files and directories..."
@@ -53,25 +53,25 @@ mkdir -p "$LOGTALKUSER"/libpaths
mkdir -p "$LOGTALKUSER"/library
mkdir -p "$LOGTALKUSER"/xml
cp -RL "$LOGTALKHOME"/configs "$LOGTALKUSER"/
ln -sf xsb.config "$LOGTALKUSER"/configs/xsb.P
ln -sf xsbcvs.config "$LOGTALKUSER"/configs/xsbcvs.P
ln -sf xsb.config "$LOGTALKUSER"/configs/xsb.pl
cp -RL "$LOGTALKHOME"/contributions "$LOGTALKUSER"/
cp -RL "$LOGTALKHOME"/examples "$LOGTALKUSER"/
cp -RL "$LOGTALKHOME"/libpaths "$LOGTALKUSER"/
sed 's_\$LOGTALKUSER_'$LOGTALKUSER'_' "$LOGTALKUSER"/libpaths/libpaths.pl > "$LOGTALKUSER"/libpaths/libpaths.P
sed 's_\$LOGTALKUSER_'$LOGTALKUSER'_' "$LOGTALKUSER"/libpaths/libpaths.pl > "$LOGTALKUSER"/libpaths/libpaths_no_env_var.pl
cp -RL "$LOGTALKHOME"/library "$LOGTALKUSER"/
cp -RL "$LOGTALKHOME"/xml "$LOGTALKUSER"/
chmod -R u+w "$LOGTALKUSER"
rm -f "$LOGTALKUSER"/xml/lgt2*
rm -f "$LOGTALKUSER"/xml/logtalk.dtd
rm -f "$LOGTALKUSER"/xml/logtalk.xsd
ln -sf "$LOGTALKHOME"/BIBLIOGRAPHY "$LOGTALKUSER"/BIBLIOGRAPHY
ln -sf "$LOGTALKHOME"/INSTALL "$LOGTALKUSER"/INSTALL
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"/BIBLIOGRAPHY.bib "$LOGTALKUSER"/BIBLIOGRAPHY.bib
ln -sf "$LOGTALKHOME"/CUSTOMIZE.txt "$LOGTALKUSER"/CUSTOMIZE.txt
ln -sf "$LOGTALKHOME"/INSTALL.txt "$LOGTALKUSER"/INSTALL.txt
ln -sf "$LOGTALKHOME"/LICENSE.txt "$LOGTALKUSER"/LICENSE.txt
ln -sf "$LOGTALKHOME"/QUICK_START.txt "$LOGTALKUSER"/QUICK_START.txt
ln -sf "$LOGTALKHOME"/README.txt "$LOGTALKUSER"/README.txt
ln -sf "$LOGTALKHOME"/RELEASE_NOTES.txt "$LOGTALKUSER"/RELEASE_NOTES.txt
ln -sf "$LOGTALKHOME"/UPGRADING.txt "$LOGTALKUSER"/UPGRADING.txt
ln -sf "$LOGTALKHOME"/manuals "$LOGTALKUSER"/manuals
ln -sf "$LOGTALKHOME"/wenv "$LOGTALKUSER"/wenv
ln -sf "$LOGTALKHOME"/xml/lgt2html.sh "$LOGTALKUSER"/xml/lgt2html

View File

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

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
if (WScript.Arguments.Unnamed.Length > 0) {
usage_help();
WScript.Quit(0);
@@ -40,90 +45,78 @@ else {
}
WScript.Echo("");
WshSystemEnv.Item("PATH") = WshSystemEnv.Item("PATH") + ";%LOGTALKHOME%\\scripts;%LOGTALKHOME%\\xml";
WScript.Echo("Added Logtalk scripts and xml directories to the system PATH environment");
WScript.Echo("variable.");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\scripts\\*.bat", FSObject.GetSpecialFolder(0));
FSObject.CopyFile(WshShell.CurrentDirectory + "\\xml\\*.bat", FSObject.GetSpecialFolder(0));
WScript.Echo("Copied Logtalk documenting batch scripts to the system's Windows folder");
WScript.Echo("");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\BIBLIOGRAPHY", WshShell.CurrentDirectory + "\\BIBLIOGRAPHY.txt");
FSObject.CopyFile(WshShell.CurrentDirectory + "\\INSTALL", WshShell.CurrentDirectory + "\\INSTALL.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");
if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Web Site.url");
link.TargetPath = "http://www.logtalk.org/";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk HTML Documentation.lnk");
link.Description = "Browse Logtalk Documentation";
link.TargetPath = WshShell.CurrentDirectory + "\\manuals\\index.html";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk ReadMe.lnk");
link.Description = "Open Logtalk ReadMe";
link.TargetPath = WshShell.CurrentDirectory + "\\README.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Install and configuration.lnk");
link.Description = "Open Logtalk Install and configuration";
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Installation and Configuration.lnk");
link.Description = "Open Logtalk Install and configuration instructions";
link.TargetPath = WshShell.CurrentDirectory + "\\INSTALL.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Quick Start.lnk");
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Customization.lnk");
link.Description = "Open Logtalk customization instructions";
link.TargetPath = WshShell.CurrentDirectory + "\\CUSTOMIZE.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Quick Start.lnk");
link.Description = "Open Logtalk Quick Start";
link.TargetPath = WshShell.CurrentDirectory + "\\QUICK_START.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Bibliography.lnk");
link.Description = "Open Logtalk Bibliography";
link.TargetPath = WshShell.CurrentDirectory + "\\BIBLIOGRAPHY.txt";
link.TargetPath = WshShell.CurrentDirectory + "\\BIBLIOGRAPHY.bib";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk License.lnk");
link.Description = "Open Logtalk License";
link.TargetPath = WshShell.CurrentDirectory + "\\LICENSE.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Release Notes.lnk");
link.Description = "Open Logtalk Release Notes";
link.TargetPath = WshShell.CurrentDirectory + "\\RELEASE_NOTES.txt";
link.Save();
link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk Upgrading.lnk");
link.Description = "Open Logtalk Upgrading instructions";
link.TargetPath = WshShell.CurrentDirectory + "\\UPGRADING.txt";
link.Save();
WScript.Echo('Logtalk basic installation completed. You will need to RESTART in order');
WScript.Echo('to activate the new system environment variables and use the items in');
WScript.Echo('the new Logtalk program group. See the Install and configuration file');
WScript.Echo('the new Logtalk program group. See the INSTALL and CUSTOMIZATION files');
WScript.Echo('for details on customizing your working environment.');
WScript.Echo('');
WScript.Echo('After restarting your computer, you may want to run some of the Prolog');
WScript.Echo('integration scripts, which you will find on the same directory as this');
WScript.Echo('installer script.');
WScript.Echo('');
WScript.Echo('Users must run the batch script cplgtdirs in order to copy the');
WScript.Echo('Logtalk user-modifiable files to their home directories. The path');
WScript.Echo('to the cplgtdirs, lgt2pdf, lgt2html, and lgt2xml batch scripts has');
WScript.Echo('been added to the system path environment variable.');
WScript.Echo('Users must run the batch script "cplgtdirs" once in order to copy the');
WScript.Echo('Logtalk user-modifiable files to their home directories. The path to');
WScript.Echo('the "cplgtdirs", "lgt2pdf", "lgt2html", and "lgt2xml" batch scripts');
WScript.Echo('has been added to the system path environment variable.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -23,20 +23,20 @@ echo
echo "Installing Logtalk on $prefix ..."
echo
rm -rf $prefix/lgt2271
rm -rf $prefix/lgt2282
rm -f $prefix/logtalk
mkdir $prefix/lgt2271
mkdir $prefix/lgt2282
cd ..
cp -R * $prefix/lgt2271
cp -R * $prefix/lgt2282
cd $prefix
chmod -R go-w,a+r lgt2271
chmod a+x lgt2271
chmod a+x lgt2271/scripts/*.sh
chmod a+x lgt2271/xml/*.sh
ln -sf lgt2271 logtalk
chmod -R go-w,a+r lgt2282
chmod a+x lgt2282
chmod a+x lgt2282/scripts/*.sh
chmod a+x lgt2282/xml/*.sh
ln -sf lgt2282 logtalk
mkdir -p bin
cd bin
@@ -45,14 +45,14 @@ ln -sf ../logtalk/xml/lgt2pdf.sh lgt2pdf
ln -sf ../logtalk/xml/lgt2html.sh lgt2html
ln -sf ../logtalk/xml/lgt2xml.sh lgt2xml
echo "Logtalk basic installation completed. See the INSTALL file for details"
echo "on customizing your working environment."
echo "Logtalk basic installation completed. See the INSTALL and CUSTOMIZATION"
echo "files for details on customizing your working environment."
echo
echo "You may want to run some of the Prolog integration scripts, which you"
echo "will find on the same directory as this installer script."
echo
echo "Users must define the environment variable LOGTALKHOME pointing"
echo "to $prefix/logtalk and then run the shell script cplgtdirs"
echo "Users must define the environment variable LOGTALKHOME pointing to"
echo "$prefix/logtalk and then run the shell script cplgtdirs"
echo "in order to copy the Logtalk user-modifiable files to their home"
echo "directories."
echo

View File

@@ -1,31 +1,31 @@
Name: logtalk
Summary: Logtalk - Open source object-oriented extension to Prolog
Version: 2.27.1
Version: 2.28.2
Release: 1
License: Artistic License 2.0
Group: Development/Languages
Packager: Paulo Moura <pmoura@logtalk.org>
Source: http://www.logtalk.org/files/lgt2271.tgz
Source: http://logtalk.org/files/lgt2282.tgz
BuildArchitectures: noarch
URL: http://www.logtalk.org/
URL: http://logtalk.org/
Prefix: /usr/local
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 lgt2271
%setup -n lgt2282
%build
%install
rm -rf /usr/local/lgt2271
rm -rf /usr/local/lgt2282
rm -f /usr/local/logtalk
mkdir /usr/local/lgt2271
cp -R * /usr/local/lgt2271
mkdir /usr/local/lgt2282
cp -R * /usr/local/lgt2282
cd /usr/local
chmod -R go-w,a+r lgt2271
chmod a+x lgt2271
chmod a+x lgt2271/scripts/*.sh
chmod a+x lgt2271/xml/*.sh
ln -sf lgt2271 logtalk
chmod -R go-w,a+r lgt2282
chmod a+x lgt2282
chmod a+x lgt2282/scripts/*.sh
chmod a+x lgt2282/xml/*.sh
ln -sf lgt2282 logtalk
cd bin
ln -sf ../logtalk/scripts/cplgtdirs.sh cplgtdirs
ln -sf ../logtalk/xml/lgt2pdf.sh lgt2pdf
@@ -34,26 +34,62 @@ ln -sf ../logtalk/xml/lgt2xml.sh lgt2xml
%clean
%files
%defattr(-,root,users)
%doc /usr/local/lgt2271/BIBLIOGRAPHY
%doc /usr/local/lgt2271/INSTALL
%doc /usr/local/lgt2271/LICENSE
%doc /usr/local/lgt2271/QUICK_START
%doc /usr/local/lgt2271/README
%doc /usr/local/lgt2271/RELEASE_NOTES
%doc /usr/local/lgt2271/UPGRADING
/usr/local/lgt2271/compiler
/usr/local/lgt2271/configs
/usr/local/lgt2271/contributions
/usr/local/lgt2271/examples
/usr/local/lgt2271/libpaths
/usr/local/lgt2271/library
%docdir /usr/local/lgt2271/manuals
/usr/local/lgt2271/manuals
/usr/local/lgt2271/scripts
/usr/local/lgt2271/wenv
/usr/local/lgt2271/xml
%doc /usr/local/lgt2282/BIBLIOGRAPHY.bib
%doc /usr/local/lgt2282/CUSTOMIZE.txt
%doc /usr/local/lgt2282/INSTALL.txt
%doc /usr/local/lgt2282/LICENSE.txt
%doc /usr/local/lgt2282/QUICK_START.txt
%doc /usr/local/lgt2282/README.txt
%doc /usr/local/lgt2282/RELEASE_NOTES.txt
%doc /usr/local/lgt2282/UPGRADING.txt
/usr/local/lgt2282/compiler
/usr/local/lgt2282/configs
/usr/local/lgt2282/contributions
/usr/local/lgt2282/examples
/usr/local/lgt2282/libpaths
/usr/local/lgt2282/library
%docdir /usr/local/lgt2282/manuals
/usr/local/lgt2282/manuals
/usr/local/lgt2282/scripts
/usr/local/lgt2282/wenv
/usr/local/lgt2282/xml
/usr/local/logtalk
/usr/local/bin/cplgtdirs
/usr/local/bin/lgt2pdf
/usr/local/bin/lgt2html
/usr/local/bin/lgt2xml
%post
mkdir -p /etc/profile.d
echo "# Logtalk environment setup" > /etc/profile.d/logtalk.sh
echo "" >> /etc/profile.d/logtalk.sh
echo "# Logtalk installation directory:" >> /etc/profile.d/logtalk.sh
echo "export LOGTALKHOME=$RPM_INSTALL_PREFIX/logtalk" >> /etc/profile.d/logtalk.sh
echo "" >> /etc/profile.d/logtalk.sh
echo "# Default location for Logtalk end-user files:" >> /etc/profile.d/logtalk.sh
echo "export LOGTALKUSER=$HOME/logtalk" >> /etc/profile.d/logtalk.sh
chmod a+x /etc/profile.d/logtalk.sh
echo "# Logtalk environment setup" > /etc/profile.d/logtalk.csh
echo "" >> /etc/profile.d/logtalk.csh
echo "# Logtalk installation directory:" >> /etc/profile.d/logtalk.csh
echo "setenv LOGTALKHOME $RPM_INSTALL_PREFIX/logtalk" >> /etc/profile.d/logtalk.csh
echo "" >> /etc/profile.d/logtalk.csh
echo "# Default location for Logtalk end-user files:" >> /etc/profile.d/logtalk.csh
echo "setenv LOGTALKUSER $HOME/logtalk" >> /etc/profile.d/logtalk.csh
chmod a+x /etc/profile.d/logtalk.csh
eval export LOGTALKHOME=$RPM_INSTALL_PREFIX/logtalk; cd $LOGTALKHOME/scripts; ./makeall_lgt.sh $RPM_INSTALL_PREFIX
echo ""
echo "Defined the following environment variables for all users:"
echo ""
echo " Logtalk installation directory: LOGTALKHOME = $RPM_INSTALL_PREFIX/logtalk"
echo " Default Logtalk user files directory: LOGTALKUSER = $HOME/logtalk"
echo ""
echo "You may need to logout and login again or start a new shell in order to"
echo "use the new environment variables."
echo ""
echo "You may change the default value of the LOGTALKUSER environment variable"
echo "in your shell configuration files if you already use, or want to use, a
echo "different location for the Logtalk user files directory."
echo ""
%postun
rm -f /etc/profile.d/logtalk.sh
rm -f /etc/profile.d/logtalk.csh

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
if (WScript.Arguments.Unnamed.Length > 0) {
usage_help();
WScript.Quit(0);
@@ -57,10 +62,10 @@ if (!FSObject.FolderExists(logtalk_home + "\\bin"))
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_ciao.pl", true);
f.WriteLine(":- ensure_loaded('\$LOGTALKUSER/configs/ciao_aux.config').");
f.WriteLine(":- ensure_loaded('$LOGTALKUSER/configs/ciao_aux.config').");
f.WriteLine(":- set_prolog_flag(multi_arity_warnings, off).");
f.WriteLine(":- ensure_loaded('\$LOGTALKHOME/compiler/logtalk.pl').");
f.WriteLine(":- ensure_loaded('\$LOGTALKUSER/libpaths/libpaths.pl').");
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, ^^).");
@@ -76,9 +81,9 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - CIAO.lnk");
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalk_ciao.pl";
link.Description = "Runs Logtalk with CIAO";
link.IconLocation = "app.exe,1";
link.Arguments = '-l "$LOGTALKHOME/bin/logtalk_ciao.pl"';
link.Description = 'Runs Logtalk with CIAO';
link.IconLocation = 'app.exe,1';
link.TargetPath = prolog_path;
link.WindowStyle = 1;
link.WorkingDirectory = logtalk_home;

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -41,25 +41,26 @@ fi
cd "$LOGTALKHOME"
mkdir -p bin
cd bin
echo ":- ensure_loaded('\$LOGTALKUSER/configs/ciao_aux.config')." > logtalk_ciao.rc
echo ":- set_prolog_flag(multi_arity_warnings, off)." >> 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 ":- ensure_loaded('\$LOGTALKUSER/configs/ciao_aux.config')." > logtalk_ciao.pl
echo ":- set_prolog_flag(multi_arity_warnings, off)." >> logtalk_ciao.pl
echo ":- ensure_loaded('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_ciao.pl
echo ":- ensure_loaded('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_ciao.pl
echo ":- op(600, xfy, ::)." >> logtalk_ciao.pl
echo ":- op(600, fy, ::)." >> logtalk_ciao.pl
echo ":- op(600, fy, ^^)." >> logtalk_ciao.pl
echo ":- op(200, fy, +)." >> logtalk_ciao.pl
echo ":- op(200, fy, ?)." >> logtalk_ciao.pl
echo ":- op(200, fy, @)." >> logtalk_ciao.pl
echo ":- op(200, fy, -)." >> logtalk_ciao.pl
echo "#/bin/sh" > ciaolgt
echo "ciaosh -l \$LOGTALKHOME/bin/logtalk_ciao.rc" >> ciaolgt
echo "ciaosh -l \$LOGTALKHOME/bin/logtalk_ciao.pl" >> 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 must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script. Users must run the"
echo "the cplgtdirs script before using the ciaolgt script."
echo "The first call to the script the must be made as root or using"
echo "sudo."
echo
echo "The first call to script the must be made as root or using sudo."
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the ciaolgt script."
echo

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
if (WScript.Arguments.Unnamed.Length > 0) {
usage_help();
WScript.Quit(0);
@@ -12,12 +17,12 @@ if (WScript.Arguments.Unnamed.Length > 0) {
WScript.Echo('');
WScript.Echo('Creating a shortcut named "Logtalk - ECLiPSe" for running Logtalk with');
WScript.Echo('ECLiPSe 5.8 (edit this script if you are using a different version)...');
WScript.Echo('ECLiPSe 5.10 (edit this script if you are using a different version)...');
WScript.Echo('');
var WshShell = new ActiveXObject("WScript.Shell");
var prolog_path = WshShell.RegRead("HKLM\\Software\\IC-Parc\\Eclipse\\5.8\\ECLIPSEDIR") + "\\lib\\i386_nt\\eclipse.exe";
var prolog_path = WshShell.RegRead("HKLM\\Software\\IC-Parc\\Eclipse\\5.10\\ECLIPSEDIR") + "\\lib\\i386_nt\\eclipse.exe";
var FSObject = new ActiveXObject("Scripting.FileSystemObject");
@@ -55,13 +60,19 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\lgtc_eclipse.pl", true);
var f1 = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_comp_eclipse.pl", true);
var f2 = FSObject.OpenTextFile(logtalk_home + "\\compiler\\logtalk.pl", 1);
var line;
f.WriteLine(":- pragma(system).");
f.WriteLine(":- pragma(nodebug).");
f.Close();
f1.WriteLine(":- pragma(system).");
f1.WriteLine(":- pragma(nodebug).");
while (!f2.AtEndOfStream) {
line = f2.ReadLine();
f1.WriteLine(line);
}
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\lgtc_eclipse.pl", true);
f1.Close();
f2.Close();
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_eclipse.pl", true);
@@ -69,7 +80,7 @@ f.WriteLine(":- ensure_loaded(library(toplevel)).");
f.WriteLine(":- cd('$LOGTALKUSER').");
f.WriteLine(":- compile('configs/eclipseiso.config').");
f.WriteLine(":- cd('$LOGTALKHOME').");
f.WriteLine(":- compile('bin/lgtc_eclipse.pl').");
f.WriteLine(":- compile('bin/logtalk_comp_eclipse.pl').");
f.WriteLine(":- cd('$LOGTALKUSER').");
f.WriteLine(":- compile('libpaths/libpaths.pl').");
f.Close();
@@ -80,12 +91,12 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - ECLiPSe.lnk");
link.Arguments = "-b %LOGTALKHOME%\\bin\\logtalk_eclipse.pl";
link.Description = "Runs Logtalk with ECLiPSe";
link.IconLocation = "app.exe,1";
link.Arguments = '-b "%LOGTALKHOME%\\bin\\logtalk_eclipse.pl"';
link.Description = 'Runs Logtalk with ECLiPSe';
link.IconLocation = 'app.exe,1';
link.TargetPath = prolog_path;
link.WindowStyle = 1;
link.WorkingDirectory = logtalk_home;
link.WorkingDirectory = '%LOGTALKUSER%';
link.Save();
WScript.Echo('Done. The "Logtalk - ECLiPSe" shortcut was been added to the');

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -41,18 +41,24 @@ fi
cd "$LOGTALKHOME"
mkdir -p bin
cd bin
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 ":- pragma(system)." > logtalk_comp_eclipse.pl
echo ":- pragma(nodebug)." >> logtalk_comp_eclipse.pl
echo ":- ensure_loaded(library(toplevel))." >> logtalk_comp_eclipse.pl
echo ":- include('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_comp_eclipse.pl
echo ":- compile('\$LOGTALKUSER/configs/eclipseiso.config')." > logtalk_eclipse.pl
echo ":- compile('\$LOGTALKHOME/bin/logtalk_comp_eclipse.pl')." >> logtalk_eclipse.pl
echo ":- compile('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_eclipse.pl
echo "#/bin/sh" > eclipselgt
echo "eclipse -b \$LOGTALKHOME/bin/logtalk_eclipse.rc" >> eclipselgt
echo "eclipse -b \$LOGTALKHOME/bin/logtalk_eclipse.pl" >> 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 must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the eclipselgt script."
echo

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
if (WScript.Arguments.Unnamed.Length > 0) {
usage_help();
WScript.Quit(0);
@@ -57,11 +62,18 @@ 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\\logtalk_gp.pl", true);
f.WriteLine(":- built_in.");
f.Close();
var f1 = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_gp.pl", true);
var f2 = FSObject.OpenTextFile(logtalk_home + "\\compiler\\logtalk.pl", 1);
var line;
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\logtalk_gp.pl", true);
f1.WriteLine(":- built_in.");
while (!f2.AtEndOfStream) {
line = f2.ReadLine();
f1.WriteLine(line);
}
f1.Close();
f2.Close();
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -48,6 +48,8 @@ echo "gprolog --init-goal \"['\$LOGTALKUSER/configs/gnu.config', '\$LOGTALKHOME/
chmod a+x gplgt
ln -sf $LOGTALKHOME/bin/gplgt $prefix/bin/gplgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the gplgt script."
echo

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
if (WScript.Arguments.Unnamed.Length > 0) {
usage_help();
WScript.Quit(0);
@@ -64,7 +69,7 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_plc.rc", true);
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_plc.pl", true);
f.WriteLine(":- consult('$LOGTALKUSER/configs/k.config').");
f.WriteLine(":- consult('$LOGTALKHOME/compiler/logtalk.pl').");
@@ -77,7 +82,7 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - K-Prolog.lnk");
link.Arguments = "-h 2048k -l 1024k -g 2048k -e \"(consult('$LOGTALKHOME/bin/logtalk_plc.rc'), '$root').\"";
link.Arguments = "-h 2048k -l 1024k -g 2048k -e \"(consult('$LOGTALKHOME/bin/logtalk_plc.pl'), '$root').\"";
link.Description = "Runs Logtalk with K-Prolog";
link.IconLocation = "app.exe,1";
link.TargetPath = prolog_path;

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -41,14 +41,16 @@ fi
cd "$LOGTALKHOME"
mkdir -p bin
cd bin
echo ":- ensure_loaded('\$LOGTALKUSER/configs/k.config')." > logtalk_plc.rc
echo ":- ensure_loaded('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_plc.rc
echo ":- ensure_loaded('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_plc.rc
echo ":- ensure_loaded('\$LOGTALKUSER/configs/k.config')." > logtalk_plc.pl
echo ":- ensure_loaded('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_plc.pl
echo ":- ensure_loaded('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_plc.pl
echo "#/bin/sh" > plclgt
echo "\$PLC/plc -h 2048k -l 1024k -g 2048k -e \"(consult('\\\$LOGTALKHOME/bin/logtalk_plc.rc'), '\\\$root').\"" >> plclgt
echo "\$PLC/plc -h 2048k -l 1024k -g 2048k -e \"(consult('\\\$LOGTALKHOME/bin/logtalk_plc.pl'), '\\\$root').\"" >> plclgt
chmod a+x plclgt
ln -sf $LOGTALKHOME/bin/plclgt $prefix/bin/plclgt
echo "Done. A link to the script was been created in $prefix/bin."
echo "Users must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the plclgt script."
echo

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -56,6 +56,10 @@ 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 must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo "The script must be regenerated whenever changes are made to"
echo "either the config file or the libpaths file."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the qplgt script."
echo

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
if (WScript.Arguments.Unnamed.Length > 0) {
usage_help();
WScript.Quit(0);
@@ -12,17 +17,41 @@ if (WScript.Arguments.Unnamed.Length > 0) {
WScript.Echo('');
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('SICStus Prolog 4.0 or 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.12_win32\\SP_PATH") + "\\bin\\spwin.exe";
var prolog_path;
var prolog_path4;
var prolog_path3;
var config_file;
try {
prolog_path4 = WshShell.RegRead("HKLM\\Software\\SICS\\SICStus4.0_win32\\SP_PATH") + "\\bin\\spwin.exe";
}
catch(e) {
prolog_path4 = "not_installed.lgt";
}
try {
prolog_path3 = WshShell.RegRead("HKLM\\Software\\SICS\\SICStus3.12_win32\\SP_PATH") + "\\bin\\spwin.exe";
}
catch(e) {
prolog_path3 = "not_installed.lgt";
}
var FSObject = new ActiveXObject("Scripting.FileSystemObject");
if (!FSObject.FileExists(prolog_path)) {
WScript.Echo("Error! Cannot find spwin.exe at the expected place!");
if (FSObject.FileExists(prolog_path4)) {
prolog_path = prolog_path4;
config_file = "sicstus4.config";
}
else if (FSObject.FileExists(prolog_path3)) {
prolog_path = prolog_path3;
config_file = "sicstus.config";
}
else {
WScript.Echo("Error! Cannot find spwin.exe at the expected places!");
WScript.Echo("Please, edit the script and update the location of the spwin.exe executable.");
WScript.Quit(1);
}
@@ -57,7 +86,7 @@ if (!FSObject.FolderExists(logtalk_home + "\\bin"))
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_sicstus.pl", true);
f.WriteLine(":- consult('$LOGTALKUSER/configs/sicstus.config').");
f.WriteLine(":- consult('$LOGTALKUSER/configs/" + config_file + "').");
f.WriteLine(":- consult('$LOGTALKHOME/compiler/logtalk.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/libpaths/libpaths.pl').");
f.Close();
@@ -68,9 +97,9 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - SICStus Prolog.lnk");
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalk_sicstus.pl";
link.Description = "Runs Logtalk with SICStus Prolog";
link.IconLocation = "app.exe,1";
link.Arguments = '-l "%LOGTALKHOME%\\bin\\logtalk_sicstus.pl"';
link.Description = 'Runs Logtalk with SICStus Prolog';
link.IconLocation = 'app.exe,1';
link.TargetPath = prolog_path;
link.WindowStyle = 1;
link.WorkingDirectory = logtalk_home;

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -41,15 +41,23 @@ fi
cd "$LOGTALKHOME"
mkdir -p bin
cd bin
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
if sicstus -f --goal "halt." 2>&1 | grep "SICStus 4" 2>&1 >/dev/null; then
echo ":- compile('\$LOGTALKUSER/configs/sicstus4.config')." > logtalk_sicstus.pl
sed -e '/call_with_args/ s//call/g' ../compiler/logtalk.pl > logtalk_comp_sicstus.pl
echo ":- compile('\$LOGTALKHOME/bin/logtalk_comp_sicstus.pl')." >> logtalk_sicstus.pl
else
echo ":- compile('\$LOGTALKUSER/configs/sicstus.config')." > logtalk_sicstus.pl
echo ":- compile('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_sicstus.pl
fi
echo ":- compile('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_sicstus.pl
echo "#/bin/sh" > sicstuslgt
echo "sicstus -l \$LOGTALKHOME/bin/logtalk_sicstus.rc" >> sicstuslgt
echo "sicstus -l \$LOGTALKHOME/bin/logtalk_sicstus.pl" >> 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 must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the sicstuslgt script."
echo

View File

@@ -1,6 +1,6 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
@@ -55,18 +55,26 @@ logtalk_home = logtalk_home.replace(/\\/g, "\\\\");
if (!FSObject.FolderExists(logtalk_home + "\\bin"))
FSObject.CreateFolder(logtalk_home + "\\bin");
var f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_swi.pl", true);
f.WriteLine(":- system_module.");
f.Close();
var f1 = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_comp_swi.pl", true);
var f2 = FSObject.OpenTextFile(logtalk_home + "\\compiler\\logtalk.pl", 1);
var line;
WshShell.Run("cmd /c type " + logtalk_home + "\\compiler\\logtalk.pl" + " >> " + logtalk_home + "\\bin\\logtalk_swi.pl", true);
f1.WriteLine(":- system_module.");
while (!f2.AtEndOfStream) {
line = f2.ReadLine();
f1.WriteLine(line);
}
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_swi.rc", true);
f1.Close();
f2.Close();
f = FSObject.CreateTextFile(logtalk_home + "\\bin\\logtalk_swi.init", true);
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('$LOGTALKHOME/bin/logtalk_comp_swi.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/libpaths/libpaths.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/configs/swihook.pl').");
f.WriteLine(":- consult('$LOGTALKUSER/configs/xpcehook.pl').");
f.Close();
var ProgramsPath = WshShell.SpecialFolders("AllUsersPrograms");
@@ -75,9 +83,9 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - SWI-Prolog.lnk");
link.Arguments = "-f %LOGTALKHOME%\\bin\\logtalk_swi.rc";
link.Description = "Runs Logtalk with SWI-Prolog";
link.IconLocation = "app.exe,1";
link.Arguments = '-f "%LOGTALKHOME%\\bin\\logtalk_swi.init"';
link.Description = 'Runs Logtalk with SWI-Prolog';
link.IconLocation = 'app.exe,1';
link.TargetPath = prolog_path;
link.WindowStyle = 1;
link.WorkingDirectory = logtalk_home;

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -41,20 +41,24 @@ fi
cd "$LOGTALKHOME"
mkdir -p bin
cd bin
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 ":- set_prolog_flag(generate_debug_info, false)." > logtalk_comp_swi.pl
echo ":- system_module." >> logtalk_comp_swi.pl
cat ../compiler/logtalk.pl >> logtalk_comp_swi.pl
echo ":- consult('\$LOGTALKUSER/configs/swi.config')." > logtalk_swi.pl
echo ":- consult('\$LOGTALKHOME/bin/logtalk_comp_swi.pl')." >> logtalk_swi.pl
echo ":- consult('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_swi.pl
echo ":- consult('\$LOGTALKUSER/configs/swihook.pl')." >> logtalk_swi.pl
echo ":- consult('\$LOGTALKUSER/configs/xpcehook.pl')." >> logtalk_swi.pl
echo "#/bin/sh" > swilgt
case $( uname -s ) in
Darwin ) echo "swipl -f \$LOGTALKHOME/bin/logtalk_swi.rc" >> swilgt;;
* ) echo "pl -f \$LOGTALKHOME/bin/logtalk_swi.rc" >> swilgt;;
Darwin ) echo "swipl -f \$LOGTALKHOME/bin/logtalk_swi.pl" >> swilgt;;
* ) echo "pl -f \$LOGTALKHOME/bin/logtalk_swi.pl" >> swilgt;;
esac
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 must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the swilgt script."
echo

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -41,23 +41,18 @@ fi
cd "$LOGTALKHOME"
mkdir -p bin
cd bin
cp ../compiler/logtalk.pl logtalk.P
sed 's/^..lgt_current_object_.[(]user.*[)]/:- assertz(&)/' logtalk.P > temp1
sed 's/^..lgt_current_object_.[(]debugger.*[)]/:- assertz(&)/' temp1 > temp2
sed 's/^..lgt_dbg_leashing_.[(].*[)]/:- assertz(&)/g' temp2 > logtalk.P
rm temp1
rm temp2
echo ":- reconsult('$LOGTALKUSER/configs/xsb.P')." > logtalkxsb.P
echo ":- reconsult('$LOGTALKHOME/bin/logtalk.P')." >> logtalkxsb.P
echo ":- reconsult('$LOGTALKUSER/libpaths/libpaths.P')." >> logtalkxsb.P
echo ":- reconsult('~/logtalk/configs/xsb.pl')." > logtalk_xsb.pl
echo ":- reconsult('$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_xsb.pl
echo ":- reconsult('~/logtalk/libpaths/libpaths_no_env_var.pl')." >> logtalk_xsb.pl
echo "#/bin/sh" > xsblgt
echo "xsb -e \"reconsult('\$LOGTALKHOME/bin/logtalkxsb.P').\"" >> xsblgt
echo "xsb -l -e \"reconsult('$LOGTALKHOME/bin/logtalk_xsb.pl').\"" >> 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 must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script. Users must run the"
echo "the cplgtdirs script before using the xsblgt script."
echo "The first call to the script the must be made as root or using"
echo "sudo."
echo
echo "The first call to the script must be made as root or using sudo."
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "prior to using the xsblgt script."
echo

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
var prolog_path = "C:\\Yap\\bin\\yap.exe";
if (WScript.Arguments.Unnamed.Length > 0) {
@@ -68,9 +73,9 @@ if (!FSObject.FolderExists(ProgramsPath + "\\Logtalk"))
FSObject.CreateFolder(ProgramsPath + "\\Logtalk");
var link = WshShell.CreateShortcut(ProgramsPath + "\\Logtalk\\Logtalk - YAP.lnk");
link.Arguments = "-l %LOGTALKHOME%\\bin\\logtalk_yap.pl";
link.Description = "Runs Logtalk with YAP";
link.IconLocation = "app.exe,1";
link.Arguments = '-l "%LOGTALKHOME%\\bin\\logtalk_yap.pl"';
link.Description = 'Runs Logtalk with YAP';
link.IconLocation = 'app.exe,1';
link.TargetPath = prolog_path;
link.WindowStyle = 1;
link.WorkingDirectory = logtalk_home;

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -41,15 +41,17 @@ fi
cd "$LOGTALKHOME"
mkdir -p bin
cd bin
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 ":- reconsult('\$LOGTALKUSER/configs/yap.config')." > logtalk_yap.pl
echo ":- reconsult('\$LOGTALKHOME/compiler/logtalk.pl')." >> logtalk_yap.pl
echo ":- reconsult('\$LOGTALKUSER/libpaths/libpaths.pl')." >> logtalk_yap.pl
echo "#/bin/sh" > yaplgt
echo "yap -s 49152 -h 16384 -t 1024 -l \$LOGTALKHOME/bin/logtalk_yap.rc" >> yaplgt
echo "yap -s 49152 -h 16384 -t 1024 -l \$LOGTALKHOME/bin/logtalk_yap.pl" >> 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 must define the environment variables LOGTALKHOME and"
echo "LOGTALKUSER in order to use the script."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the yaplgt script."
echo

View File

@@ -1,10 +1,15 @@
// =================================================================
// Logtalk - Object oriented extension to Prolog
// Release 2.27.1
// Release 2.28.2
//
// Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
// =================================================================
if (ScriptEngineMajorVersion() < 5 || ScriptEngineMajorVersion() == 5 && ScriptEngineMinorVersion() < 6) {
WScript.Echo('Error! WSH 5.6 or later version needed for running this script.');
WScript.Quit(1);
}
WScript.Echo('');
WScript.Echo('Creating shortcuts for running Logtalk with selected Prolog compilers...');
WScript.Echo('');
@@ -34,6 +39,9 @@ if (!FSObject.FolderExists(logtalk_home)) {
WScript.Quit(1);
}
WScript.Echo('Creating shortcut Logtalk - B-Prolog...');
WshShell.Run("cscript %LOGTALKHOME%\\scripts\\make_bplgt.js", true);
WScript.Echo('Creating shortcut Logtalk - CIAO...');
WshShell.Run("cscript %LOGTALKHOME%\\scripts\\make_ciaolgt.js", true);
@@ -52,24 +60,24 @@ WshShell.Run("cscript %LOGTALKHOME%\\scripts\\make_sicstuslgt.js", true);
WScript.Echo('Creating shortcut Logtalk - SWI-Prolog...');
WshShell.Run("cscript %LOGTALKHOME%\\scripts\\make_swilgt.js", true);
WScript.Echo('Creating shortcut Logtalk - XSB CVS...');
WshShell.Run("cscript %LOGTALKHOME%\\scripts\\make_xsbcvslgt.js", true);
WScript.Echo('Creating shortcut Logtalk - XSB...');
WshShell.Run("cscript %LOGTALKHOME%\\scripts\\make_xsblgt.js", true);
WScript.Echo('Creating shortcut Logtalk - YAP...');
WshShell.Run("cscript %LOGTALKHOME%\\scripts\\make_yaplgt.js", true);
WScript.Echo('');
WScript.Echo('Done. Links to the created scripts was been added to the Start Menu');
WScript.Echo('Programs. Make sure that the environment variables LOGTALKHOME and');
WScript.Echo('LOGTALKUSER are defined for all users wishing to use the shortcuts.');
WScript.Echo('Done. Links to the created shortcuts are availasble from the Start Menu');
WScript.Echo('Logtalk program group. Ensure that the environment variables LOGTALKHOME');
WScript.Echo('and LOGTALKUSER are defined for all users wishing to use the shortcuts.');
WScript.Echo('');
WScript.Echo('Users must run the batch script "cplgtdirs" before using the Logtalk -');
WScript.Echo('Prolog integration scripts.');
WScript.Echo('Users must run the batch script "cplgtdirs" once prior to using the');
WScript.Echo('Logtalk - Prolog integration scripts.');
WScript.Echo('');
WScript.Echo('If you get an unexpected failure to create a shortcut for one of the');
WScript.Echo('above Prolog compilers, make sure that the Prolog compiler is properly');
WScript.Echo('installed, consult the NOTES file on the scripts directory, and try to');
WScript.Echo('run the corresponding script individually.');
WScript.Echo('If you get an unexpected failure when creating or using a shortcut for');
WScript.Echo('one of the above Prolog compilers, make sure that the Prolog compiler');
WScript.Echo('is properly installed, consult the NOTES file on the scripts directory,');
WScript.Echo('and try to run the corresponding script individually.');
WScript.Echo('');
WScript.Quit(0);

View File

@@ -2,7 +2,7 @@
## =================================================================
## Logtalk - Object oriented extension to Prolog
## Release 2.27.1
## Release 2.28.2
##
## Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
## =================================================================
@@ -38,71 +38,71 @@ if ! [ -d "$prefix" ]; then
exit 1
fi
./make_bplgt.sh $prefix > /dev/null 2> /dev/null
if [ $? = 0 ] ; then
echo "bplgt script created"
else
echo "bplgt script creation failed"
fi
./make_ciaolgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "ciaolgt script created"
else
echo "ciaolgt script creation failed"
fi
./make_eclipselgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "eclipselgt script created"
else
echo "eclipselgt script creation failed"
fi
./make_gplgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "gplgt script created"
else
echo "gplgt script creation failed"
fi
./make_plclgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "plclgt script created"
else
echo "plclgt script creation failed"
fi
./make_qplgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "qplgt script created"
else
echo "qplgt script creation failed"
fi
./make_sicstuslgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "sicstuslgt script created"
else
echo "sicstuslgt script creation failed"
fi
./make_swilgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "swilgt script created"
else
echo "swilgt script creation failed"
fi
./make_xsblgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "xsblgt script created"
else
echo "xsblgt script creation failed"
fi
./make_xsbcvslgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
echo "xsbcvslgt script created"
else
echo "xsbcvslgt script creation failed"
fi
./make_yaplgt.sh $prefix > /dev/null 2> /dev/null
if [[ $? -eq 0 ]]; then
if [ $? = 0 ] ; then
echo "yaplgt script created"
else
echo "yaplgt script creation failed"
@@ -111,10 +111,14 @@ fi
echo
echo "Done. Links to the created scripts can be found on $prefix/bin."
echo "Make sure that the Prolog compilers are also available on your "
echo "execution path. Users must define the environment variables "
echo "LOGTALKHOME and LOGTALKUSER in order to use the scripts."
echo "execution path."
echo
echo "If you get an unexpected failure to create a shortcut for one of the"
echo "above Prolog compilers, please consult the NOTES file on the scripts"
echo "directory or try to run the corresponding script individually."
echo "If you got an unexpected failure when creating or using one of the"
echo "Prolog integration scripts, make sure that the Prolog compiler is"
echo "properly installed, consult the NOTES file on the scripts directory,"
echo "and try to run the corresponding script individually."
echo
echo "Users should ensure that the environment variables LOGTALKHOME"
echo "and LOGTALKUSER are defined and then run the \"cplgtdirs\" script"
echo "once prior to using the Prolog integration scripts."
echo