github.com/wfjm.w11
1
0
Fork 0
mirror of https://github.com/wfjm/w11.git synced 2026-01-23 19:36:31 +00:00
Code Issues Releases Wiki Activity

RtclGet: add Tcl_Obj* getter

Browse Source
This commit is contained in:
Walter F.J. Mueller 2017-04-16 14:44:56 +02:00
parent fca80e6fcd
commit 8956969480
1 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
tools/src/librtcltools/RtclGet.ipp
View File

@ -1,4 +1,4 @@
// $Id: RtclGet.ipp 854 2017-02-25 14:46:03Z mueller $
// $Id: RtclGet.ipp 876 2017-04-16 08:01:37Z mueller $
//
// Copyright 2013-2017 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
//
@ -13,13 +13,14 @@
//
// Revision History:
// Date Rev Version Comment
// 2017-04-16 876 1.2 add Tcl_Obj*
// 2017-02-20 854 1.1 add Rtime
// 2013-02-12 487 1.0 Initial version
// ---------------------------------------------------------------------------
/*!
\file
\version $Id: RtclGet.ipp 854 2017-02-25 14:46:03Z mueller $
\version $Id: RtclGet.ipp 876 2017-04-16 08:01:37Z mueller $
\brief Implemenation (inline) of class RtclGet.
*/
@ -208,6 +209,15 @@ inline Tcl_Obj* RtclGet<const Rtime&>::operator()() const
return Tcl_NewDoubleObj(double(val));
}
//------------------------------------------+-----------------------------------
//! FIXME_docs
template <>
inline Tcl_Obj* RtclGet<Tcl_Obj*>::operator()() const
{
return fGet();
}
} // end namespace Retro