fix nb_current/2

This commit is contained in:
Vitor Santos Costa
2010-03-01 21:48:39 +00:00
parent 46f0a0644c
commit 51982bee42
2 changed files with 9 additions and 6 deletions

View File

@@ -577,9 +577,6 @@ nth_instance(Key,Index,T,Ref) :-
instance(Ref,T).
nb_current(GlobalVariable, Val) :-
var(GlobalVariable), !,
'$nb_current'(GlobalVariable),
nb_getval(GlobalVariable, Val).
nb_current(GlobalVariable, Val) :-
nb_getval(GlobalVariable, Val).