[AD] diff: delete stray lines in library

[ Thread Index | Date Index | More lists.liballeg.org/allegro-developers Archives ]


Estimated hours taken: 0
Branches: main

library/bitmap.m:
	Delete unnecessary promise_pure for 'unsafe_byte :='.

library/rtti_implementation.m:
	Delete stray commented out line.

Index: library/bitmap.m
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/library/bitmap.m,v
retrieving revision 1.22
diff -u -r1.22 bitmap.m
--- library/bitmap.m	20 Jun 2007 03:11:58 -0000	1.22
+++ library/bitmap.m	17 Jul 2007 06:21:37 -0000
@@ -1730,7 +1730,6 @@
       else throw_bounds_error(BM, "bitmap.'byte :='", N)
     ).
 
-:- pragma promise_pure('unsafe_byte :='/3).
 (_ ^ unsafe_byte(_) := _) = _ :-
     private_builtin.sorry("bitmap.'unsafe_byte :='").
 
Index: library/rtti_implementation.m
===================================================================
RCS file: /home/mercury/mercury1/repository/mercury/library/rtti_implementation.m,v
retrieving revision 1.78
diff -u -r1.78 rtti_implementation.m
--- library/rtti_implementation.m	1 Jun 2007 08:30:58 -0000	1.78
+++ library/rtti_implementation.m	17 Jul 2007 06:21:37 -0000
@@ -926,7 +926,6 @@
 %-----------------------------------------------------------------------------%
 %-----------------------------------------------------------------------------%
 
-% :- pragma foreign_proc("Erlang", 
 deconstruct(Term, NonCanon, Functor, Arity, Arguments) :-
     TypeInfo = get_type_info(Term),
     TypeCtorInfo = get_type_ctor_info(TypeInfo),




Mail converted by MHonArc 2.6.19+ http://listengine.tuxfamily.org/