X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=form%2Ffrm_scale.c;h=27e154e243ee1f060e538d023c915ab78fc39bba;hp=e86df103999128b4a7ecec1bca25bfa0ef84a826;hb=5ed80e8d7031c3fa12b4915d5e1f040257a24323;hpb=46722468f47c2b77b3987729b4bcf2321cccfd01 diff --git a/form/frm_scale.c b/form/frm_scale.c index e86df103..27e154e2 100644 --- a/form/frm_scale.c +++ b/form/frm_scale.c @@ -1,5 +1,5 @@ /**************************************************************************** - * Copyright (c) 1998,2000 Free Software Foundation, Inc. * + * Copyright (c) 1998-2004,2010 Free Software Foundation, Inc. * * * * Permission is hereby granted, free of charge, to any person obtaining a * * copy of this software and associated documentation files (the * @@ -28,12 +28,11 @@ /**************************************************************************** * Author: Juergen Pfeifer, 1995,1997 * - * Contact: http://www.familiepfeifer.de/Contact.aspx?Lang=en * ****************************************************************************/ #include "form.priv.h" -MODULE_ID("$Id: frm_scale.c,v 1.6 2002/07/06 15:33:27 juergen Exp $") +MODULE_ID("$Id: frm_scale.c,v 1.10 2010/01/23 21:14:36 tom Exp $") /*--------------------------------------------------------------------------- | Facility : libnform @@ -46,19 +45,24 @@ MODULE_ID("$Id: frm_scale.c,v 1.6 2002/07/06 15:33:27 juergen Exp $") | E_NOT_CONNECTED - no fields connected to form +--------------------------------------------------------------------------*/ NCURSES_EXPORT(int) -scale_form (const FORM * form, int * rows, int * cols) +scale_form(const FORM *form, int *rows, int *cols) { - if ( !form ) + T((T_CALLED("scale_form(%p,%p,%p)"), + (const void *)form, + (void *)rows, + (void *)cols)); + + if (!form) RETURN(E_BAD_ARGUMENT); - if ( !(form->field) ) + if (!(form->field)) RETURN(E_NOT_CONNECTED); - - if (rows) + + if (rows) *rows = form->rows; - if (cols) + if (cols) *cols = form->cols; - + RETURN(E_OK); }