fix alaises in cuda
This commit is contained in:
parent
83695cc8c8
commit
3fa1f856f6
|
@ -47,9 +47,9 @@ body_to_list( (B1, B2), LF, L0, N0, NF) :- !,
|
||||||
body_to_list( B1, LF, LI, N0, N1),
|
body_to_list( B1, LF, LI, N0, N1),
|
||||||
body_to_list( B2, LI, L0, N1, NF).
|
body_to_list( B2, LI, L0, N1, NF).
|
||||||
body_to_list( true, L, L, N, N) :- !.
|
body_to_list( true, L, L, N, N) :- !.
|
||||||
body_to_list( B, [NB|L], L, N0, N) :-
|
body_to_list( B, NL, L, N0, N) :-
|
||||||
inline( B, NB ), !,
|
inline( B, NB ), !,
|
||||||
N is N0+1.
|
body_to_list( NB, NL, L, N0, N)
|
||||||
body_to_list( B, [B|L], L, N0, N) :-
|
body_to_list( B, [B|L], L, N0, N) :-
|
||||||
N is N0+1.
|
N is N0+1.
|
||||||
|
|
||||||
|
|
Reference in New Issue