Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-and-itasks
clean-ide
Commits
dba1dc4c
Commit
dba1dc4c
authored
Apr 01, 2008
by
John van Groningen
Browse files
store relative paths in project file instead of absolute paths if a project
is saved (for paths in pg_static/static_info}
parent
8afa931c
Changes
2
Hide whitespace changes
Inline
Side-by-side
Pm/PmDriver.icl
View file @
dba1dc4c
...
...
@@ -900,11 +900,11 @@ step intr (DLink ds=:{ok, newpaths, fileinfo, libsinfo, modpaths, abccache, proj
=
continue
True
False
False
fileinfo
libsinfo
modpaths
project
intr
(
abccache
,
ps
)
//*/
#
static_info
=
{
stat_mods
=
symPaths
app_path
prj_path`
modpaths
,
stat_objs
=
symPaths
app_path
prj_path`
ofiles
,
stat_slibs
=
symPaths
app_path
prj_path`
sfiles
,
stat_dlibs
=
symPaths
app_path
prj_path`
lfiles
,
stat_paths
=
symPaths
app_path
prj_path`
srcpaths
{
stat_mods
=
modpaths
,
stat_objs
=
ofiles
,
stat_slibs
=
sfiles
,
stat_dlibs
=
lfiles
,
stat_paths
=
srcpaths
,
stat_app_path
=
app_path
,
stat_prj_path
=
prj_path`
}
...
...
Pm/PmProject.icl
View file @
dba1dc4c
...
...
@@ -634,7 +634,7 @@ GetProject applicationDir projectDir project
,
pg_staticLibInfo
=
staticLibInfo
,
pg_target
=
target
,
pg_execpath
=
exepath
,
pg_static
=
project
.
static_info
,
pg_static
=
substitite_paths_in_static
applicationDir
projectDir
project
.
static_info
,
pg_dynamic
=
project
.
dynamic_info
,
pg_precompile
=
project
.
prec
,
pg_postlink
=
project
.
posl
...
...
@@ -658,6 +658,14 @@ where
staticLibInfo
=
SubstituteStaticLibPaths
applicationDir
projectDir
(
PR_GetStaticLibsInfo
project
)
target
=
PR_GetTarget
project
substitite_paths_in_static
ap
pp
si
=:{
stat_mods
,
stat_objs
,
stat_slibs
,
stat_dlibs
,
stat_paths
}
=
{
si
&
stat_mods
=
SubstitutePaths
ap
pp
stat_mods
,
stat_objs
=
SubstitutePaths
ap
pp
stat_objs
,
stat_slibs
=
SubstitutePaths
ap
pp
stat_slibs
,
stat_dlibs
=
SubstitutePaths
ap
pp
stat_dlibs
,
stat_paths
=
SubstitutePaths
ap
pp
stat_paths
}
defaultModInfo
::
ModInfo
defaultModInfo
=
{
dir
=
EmptyPathname
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment