[pypy-svn] r12923 - in pypy/dist/pypy/rpython: . test

[pedronis at codespeak.net]

Author: pedronis
Date: Tue May 31 15:16:49 2005
New Revision: 12923

Modified:
   pypy/dist/pypy/rpython/lltype.py
   pypy/dist/pypy/rpython/test/test_lltype.py
Log:
function to construct NULL-pointers



Modified: pypy/dist/pypy/rpython/lltype.py
==============================================================================
--- pypy/dist/pypy/rpython/lltype.py	(original)
+++ pypy/dist/pypy/rpython/lltype.py	Tue May 31 15:16:49 2005
@@ -588,6 +588,10 @@
     o = _func(TYPE, _name=name, **attrs)
     return _ptr(NonGcPtr(TYPE), o)
 
+def nullptr(T, **flags):
+    T = _PtrType(T, **flags)
+    return _ptr(T, None)
+
 def pyobjectptr(obj, **flags):
     T = _PtrType(PyObject, **flags)
     o = _pyobject(obj)

Modified: pypy/dist/pypy/rpython/test/test_lltype.py
==============================================================================
--- pypy/dist/pypy/rpython/test/test_lltype.py	(original)
+++ pypy/dist/pypy/rpython/test/test_lltype.py	Tue May 31 15:16:49 2005
@@ -257,3 +257,9 @@
     F.become(S)
     assert S.x == GcPtr(S)
     py.test.raises(TypeError, "ForwardReference().become(Struct('abc'))")
+
+
+def test_nullptr():
+    S = Struct('s')
+    p0 = nullptr(S)
+    assert not p0