检查对象是否已经存在？

编程问答 2022-05-29

问题描述

我有：

:- use_module(library(logtalk)).
:- {buffer}.
:- initialization(main).

main :-
    create_object(env,[instantiates(buffer)],[],[]),

它可以工作，但每次我重新查看文件时它都会发出错误消息，因为对象已经存在。

有没有办法检查对象是否已经存在并跳过重新创建它？

更多代码：

:- use_module(library(logtalk)).

:- consult(utils).

%% :- initialization((
%%     logtalk_load([buffer,env]).
%% )).
:- {buffer}.
:- initialization(main).

main :-
    %% create_object(env,env::set(uid,0),env::set(name,"").

这有效：

:- initialization((
    logtalk_load([buffer])
)).

即没有点也没有“env”

解决方法

您可以使用 current_object/1 谓词检查对象是否存在。但是从您的代码片段看来，您可以简单地在源文件中定义 env 对象。如果您需要 env 成为动态对象（为什么？），请使用 dynamic/0 指令：

:- object(env,instantiates(buffer)).

    :- (dynamic)/0.

:- end_object

顺便说一句，永远不要在源文件中使用顶级缩写（例如{}/1）；它们不是语言的一部分。改写：

:- use_module(library(logtalk)).
:- initialization((
    logtalk_load([buffer,env])
)).

附言您正在使用 SWI-Prolog 的 logtalk 包。但是这个包用于部署，而不是开发，因为它将 Logtalk 发行版中的所有文件（包括文档）隐藏在用于包的隐藏目录中。

existslogtalkobjectobjectobjectprologprolog