blob: 0a9d879eb12a9d307a176db7c6a4fcdb925a23c3 [file] [log] [blame]
Richard Levittebffb1492016-06-03 15:02:10 +02001#! /usr/bin/env perl
2# Copyright 2016 The OpenSSL Project Authors. All Rights Reserved.
3#
4# Licensed under the OpenSSL license (the "License"). You may not use
5# this file except in compliance with the License. You can obtain a copy
6# in the file LICENSE in the source distribution or at
7# https://www.openssl.org/source/license.html
8
9use strict;
10use warnings;
11
12# First argument is name;
13my $name = shift @ARGV;
Richard Levitte5cdad222016-08-05 00:32:36 +020014my $name_uc = uc $name;
Richard Levittebffb1492016-06-03 15:02:10 +020015# All other arguments are ignored for now
16
17print <<"_____";
18/*
19 * Generated with test/generate_buildtest.pl, to check that such a simple
20 * program builds.
21 */
Richard Levitte5cdad222016-08-05 00:32:36 +020022#include <openssl/opensslconf.h>
23#ifndef OPENSSL_NO_STDIO
24# include <stdio.h>
25#endif
26#ifndef OPENSSL_NO_${name_uc}
27# include <openssl/$name.h>
28#endif
Richard Levittebffb1492016-06-03 15:02:10 +020029
30int main()
31{
32 return 0;
33}
34_____