diff --git a/os/pl-privitf.c b/os/pl-privitf.c index 91d664d94..d48d422f2 100644 --- a/os/pl-privitf.c +++ b/os/pl-privitf.c @@ -19,7 +19,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ #include "pl-incl.h" @@ -173,7 +173,7 @@ unifyList(term_t term, list_ctx *ctx) a = valTermRef(term); deRef(a); - if ( !unify_ptrs(a, ctx->lp PASS_LD) ) + if ( !unify_ptrs(a, ctx->lp, 0 PASS_LD) ) { gTop = ctx->lp; return FALSE; } @@ -191,13 +191,13 @@ unifyDiffList(term_t head, term_t tail, list_ctx *ctx) a = valTermRef(head); deRef(a); - if ( !unify_ptrs(a, ctx->lp PASS_LD) ) + if ( !unify_ptrs(a, ctx->lp, 0 PASS_LD) ) { gTop = ctx->lp; return FALSE; } a = valTermRef(tail); deRef(a); - if ( !unify_ptrs(a, ctx->gstore PASS_LD) ) + if ( !unify_ptrs(a, ctx->gstore, 0 PASS_LD) ) { gTop = ctx->lp; return FALSE; }