view libinterp/mkops @ 18946:89448a7523b2

Add some more callbacks for root properties (bug #42347). * graphics.in.h (root prop. errormessage): set read-only and declare custom get method * graphics.in.h (root prop. diary, diaryfile, echo, recursionlimit): declare custom get/set methods * graphics.cc (root::properties::get_errormessage, set_diary, get_diary, set_diaryfile, get_diaryfile, set_echo, get_echo, set_recursionlimit, get_recursionlimit): new methods. * pager.cc (F__diaryfile__, F__diarystate__): new functions to retrieve diary info. * pager.cc: set default value "diary" for diary_file static variable. * input.cc (F__echostate__): new function to retrieve echo info.
author Pantxo Diribarne <pantxo.diribarne@gmail.com>
date Tue, 13 May 2014 18:51:52 +0200
parents d63878346099
children 446c46af4b42
line wrap: on
line source

#! /bin/sh
#
# Copyright (C) 1997-2013 John W. Eaton
#
# This file is part of Octave.
# 
# Octave is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by the
# Free Software Foundation; either version 3 of the License, or (at
# your option) any later version.
# 
# Octave is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
# for more details.
# 
# You should have received a copy of the GNU General Public License
# along with Octave; see the file COPYING.  If not, see
# <http://www.gnu.org/licenses/>.

SED=${SED:-'sed'}

cat << \EOF
// DO NOT EDIT!  Generated automatically by mkops.

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

extern void install_base_type_conversions (void);

EOF

for file in "$@"; do
  f=`echo $file | $SED 's,^\./,,; s%^operators/op-%%; s%\.cc%%; s%-%_%g'`
  echo "extern void install_${f}_ops (void);"
done

cat << \EOF

void
install_ops (void)
{
  install_base_type_conversions ();

EOF

for file in "$@"; do
  f=`echo $file | $SED 's,^\./,,; s%^operators/op-%%; s%\.cc%%; s%-%_%g'`
  echo "  install_${f}_ops ();"
done

cat << \EOF
}
EOF

exit 0