aboutsummaryrefslogtreecommitdiff
path: root/src/interp/lisplib.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/lisplib.boot')
-rw-r--r--src/interp/lisplib.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/lisplib.boot b/src/interp/lisplib.boot
index f408b418..b2bbffe2 100644
--- a/src/interp/lisplib.boot
+++ b/src/interp/lisplib.boot
@@ -1,6 +1,6 @@
-- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd.
-- All rights reserved.
--- Copyright (C) 2007-2012, Gabriel Dos Reis.
+-- Copyright (C) 2007-2013, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -442,7 +442,7 @@ compDefineLisplib(df:=["DEF",[op,:.],:.],m,e,fal,fn) ==
ok := finalizeLisplib(db,libName)
finally RSHUT $libFile
if ok then lisplibDoRename(libName)
- filearg := $FILEP(libName,$spadLibFT,$libraryDirectory)
+ filearg := makeFullFilePath [libName,$spadLibFT,$libraryDirectory]
RPACKFILE filearg
freshLine $algebraOutputStream
sayMSG fillerSpaces(72,char "-")