1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
%%
%% 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.
%%
%% Copyright (C) 2006-2010 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-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}[2010/05/01]
\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'.
|
