             quote_ident(tname), '.', quote_ident(cname), ' should allow NULL' );
     END IF;
 
-    RETURN ok( _col_is_nullable(dbname, tname, cname, 'YES'), description );
-END //
+    RETURN ok( _col_nullable(dbname, tname, cname), description );
+END //
+
 
 -- col_not_null( schema, table, column, description )
 DROP FUNCTION IF EXISTS col_not_null //
 CREATE FUNCTION col_not_null ( dbname TEXT, tname TEXT, cname TEXT, description TEXT )
 RETURNS TEXT
 BEGIN
-    IF NOT _has_column( dbname, tname, cname ) THEN
-        RETURN fail(concat('Error ',
-               diag (concat('    Column ', quote_ident(dbname), '.', quote_ident(tname), '.', quote_ident(cname), ' does not exist' ))));
-    END IF;
-
-    IF description = '' THEN
-        SET description = concat('Column ',
-            quote_ident(tname), '.', quote_ident(cname), ' should not allow NULL' );
-    END IF;
-
-    RETURN ok( _col_is_nullable(dbname, tname, cname, 'NO'), description );
+
+    IF NOT _has_column( dbname, tname, cname ) THEN
+        RETURN fail(concat('Error ',
+               diag (concat('    Column ', quote_ident(dbname), '.', quote_ident(tname), '.', quote_ident(cname), ' does not exist' ))));
+    END IF;
+
+    IF description = '' THEN
+        SET description = concat('Column ',
+            quote_ident(tname), '.', quote_ident(cname), ' should NOT allow NULL' );
+    END IF;
+
+    RETURN ok( NOT _col_nullable(dbname, tname, cname), description );
 END //
 
 


    RETURN ok( _col_has_type( dbname, tname, cname, ctype ), description );
END //

/****************************************************************************/



    RETURN ok( _col_has_pos_in_named_index(dbname, tname, cname, kname, position), description );
END //


-- col_hasnt_pos_in_named_index( schema, table, column, keyname, position )
DROP FUNCTION IF EXISTS col_hasnt_pos_in_named_index //
