%%
%% This is file `zref-test-base.tex',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% zref.dtx  (with options: `test-base')
%% 
%% This is a generated file.
%% 
%% Project: zref
%% Version: 2012/04/04 v2.24
%% 
%% Copyright (C) 2006-2012 by
%%    Heiko Oberdiek <heiko.oberdiek at googlemail.com>
%% 
%% This work may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either
%% version 1.3c of this license or (at your option) any later
%% version. This version of this license is in
%%    http://www.latex-project.org/lppl/lppl-1-3c.txt
%% and the latest version of this license is in
%%    http://www.latex-project.org/lppl.txt
%% and version 1.3 or later is part of all distributions of
%% LaTeX version 2005/12/01 or later.
%% 
%% This work has the LPPL maintenance status "maintained".
%% 
%% This Current Maintainer of this work is Heiko Oberdiek.
%% 
%% This work consists of the main source file zref.dtx
%% and the derived files
%%    zref.sty, zref.pdf, zref.ins, zref.drv, zref-base.sty,
%%    zref-abspage.sty, zref-abspos.sty, zref-counter.sty,
%%    zref-dotfill.sty, zref-env.sty, zref-hyperref.sty,
%%    zref-lastpage.sty, zref-marks.sty, zref-nextpage.sty,
%%    zref-pageattr.sty, zref-pagelayout.sty, zref-perpage.sty,
%%    zref-runs.sty, zref-savepos.sty, zref-thepage.sty,
%%    zref-titleref.sty, zref-totpages.sty, zref-user.sty,
%%    zref-xr.sty, zref-example.tex, zref-example-lastpage.tex,
%%    zref-example-nextpage.tex, zref-test1.tex,
%%    zref-test-base.tex, zref-test-runs.tex,
%%    zref-test-titleref-memoir.tex.
%% 
\NeedsTeXFormat{LaTeX2e}
\documentclass{article}
\usepackage{zref-base,zref-titleref}[2012/04/04]
\usepackage{qstest}
\IncludeTests{*}
\LogTests{log}{*}{*}

\makeatletter
\newcommand*{\DefExpand}[2]{%
  \expandafter\expandafter\expandafter\def
  \expandafter\expandafter\expandafter#1%
  \expandafter\expandafter\expandafter{#2}%
  \@onelevel@sanitize#1%
}
\newcommand*{\Test}[3]{%
  \Expect{#2}*{#1}%
  \zref@wrapper@unexpanded{%
    \Expect*{#3}*{#1}%
  }%
  \DefExpand\x{#1}%
  \Expect*{#3}*{\x}%
}
\makeatother

\begin{document}
\section{\textit{Hello} \textbf{World}}
\label{sec:hello}
\makeatletter
\zref@newprop{foo}[\@empty D\@empty efault]{\@empty V\@empty alue}
\begin{qstest}{getcurrent}{getcurrent}
  \Test{\zref@getcurrent{foo}}%
       {Value}{\noexpand\@empty V\noexpand\@empty alue}%
  \Test{\zref@getcurrent{xy}}{}{}%
\end{qstest}
\begin{qstest}{extract}{extract}
  \def\textbf#1{<#1>}%
  \def\textit#1{[#1]}% hash-ok
  \Test{\zref@extractdefault{xy}{page}{\@empty D\@empty efault}}%
       {Default}{\noexpand\@empty D\noexpand\@empty efault}%
  \Test{\zref@extractdefault{sec:hello}{foo}{\@empty A\@empty B}}%
       {AB}{\noexpand\@empty A\noexpand\@empty B}%
  \Test{\zref@extract{sec:hello}{foo}}%
       {Default}{\noexpand\@empty D\noexpand\@empty efault}%
  \zref@ifrefundefined{sec:hello}{%
  }{%
    \Test{\zref@extract{sec:hello}{default}}{1}{1}%
    \Test{\zref@extract{sec:hello}{title}}%
         {[Hello] <World>}%
         {\noexpand\textit{Hello} \noexpand\textbf{World}}%
  }%
\end{qstest}
\end{document}
\endinput
%%
%% End of file `zref-test-base.tex'.
